Live-Forum - Die aktuellen Beiträge
Datum
Titel
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
13.10.2025 12:24:02
Zählen in Abhängigkeit einer Jahreszahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1240to1244
1240to1244
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datum mittels VBA finden

Forumthread: Datum mittels VBA finden

Datum mittels VBA finden
Lorenz
Hallo Excelianer(innen)
Ich möchte das Datum aus wksWE.Cells(2, 2) in wksKalender.Range("H12:ABJ12") suchen, anschließend die Adresse des "gefundenen" anzeigen. Mit dem unten eingefügten Code wills leider nicht.
Dim rngSuchDatum As Range, datDatum As Date
datDatum = CDate(wksWE.Cells(2, 2))
Set rngSuchDatum = wksKalender.Rows(12).Find(CDate(datDatum), lookat:=xlWhole)
MsgBox rngSuchDatum.Address
(wks... sind jeweils CodeName der Sheets)
Was ist am Code falsch?
Gruß
Lorenz
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Datum mittels VBA finden
13.12.2011 11:07:56
Rudi
Hallo,
versuchs mal mit
Set rngSuchDatum = wksKalender.Rows(12).Find(datDatum, lookat:=xlWhole, LookIn:=xlFormulas)
Gruß
Rudi
AW: Datum mittels VBA finden
13.12.2011 11:16:04
Lorenz
Hallo Rudi!
Hab´s probiert.
liefert leider auch "Laufzeitfehler 91" "Objektvariable oder With-Objektblock nicht festgelegt"
Grüße
Lorenz
Anzeige
AW: Datum mittels VBA finden
13.12.2011 12:50:17
Rudi
Hallo,
gibt es das Datum sicher?
Gruß
Rudi
AW: Datum mittels VBA finden
13.12.2011 13:12:39
Lorenz
Hallo Rudi
Ja, das Datum gibt es!
Habe es folgendermaßen abgerufen
MsgBox CDate(wksWE.Cells(2, 2))
MsgBox CDate(wksKalender.Cells(12, "AL"))
Grüße
Lorenz
AW: Datum mittels VBA finden
13.12.2011 14:37:29
Rudi
Hallo,
mit CDate wandelst du Text in ein Datum um.
Wenn in Zeile 12 Text ist und kein Datum, wird das nicht gefunden.
Evtl. so:
MsgBox Rows(12).Find(Format(Cells(2, 2), "DD.MM.YYYY"), LookIn:=xlValues).Address
Gruß
Rudi
Anzeige
AW: Datum mittels VBA finden
13.12.2011 16:29:10
Lorenz
Hallo Rudi,
Danke für´n Tipp.
Wurde in meinem Code
eingebaut.
Danke & Grüße
Lorenz
;

Forumthreads zu verwandten Themen

Mittels VBA Zellbereich einfärben
Fred

Hallo zusammen
Ich habe da ein Problem, und zwar stehen bei mir in der Tabelle im Bereich D2 bis AD100 unterschiedliche Datums. Wenn das Datum kleiner ist als das heutige, hätte ich gerne, das sich die entsprechende Zelle Rot färbt. Ich habe das mal mit bedingter Formatierung versucht, aber...
13.08.2008 18:52:00
Thread-ID: 1001623
13 Beiträge
Mit VBA In Zelle Excelformel schreiben
Gho-Reg

Hi Leute
Ich habe hier diesen netten VBA Code geschrieben und leider wie solls auch anders sein kommt dauernd eine Fehlermeldung :)
CODE:
rowbeforeinteger = 2
Dim text As String
text = "=IF(" & epsoldcolumn & rowbeforeinteger & "=""x"";1;0)+IF(" & emailsoldco...
25.08.2008 11:08:33
Thread-ID: 1004403
6 Beiträge
Anzeige
Ersetzen mit VBA in allen Arbeitsblättern
Walter

Hallo,
ich habe eine Frage:
Wenn ich einen Text in der ganzen Arbeitsmappe ersetzen will, so treffe ich im Dialogfeld SUCHEN/ERSETZEN einfach die Einstellung: Suchen --- "Arbeitsblatt".
Wenn ich disen Vorgang aufzeichen, kommt folgender Code heraus:
Selection.Replace What:= _
11.09.2008 15:35:53
Thread-ID: 1009157
6 Beiträge
Diagrammveränderung mit VBA unterbinden
Karl

Hallo zusammen
Ich habe da ein für mich unlösbares Problem. Ich möchte gerne all meine Diagramme vor Größen veränderung schützen. Doch leider kann ich auch im Netzt nichts brauchbares finden. Ich habe zwar mein Blatt schreib geschützt, wenn ich jedoch mit VBA Code mir das Diagramm als Bild...
04.01.2009 19:21:00
Thread-ID: 1036824
2 Beiträge
VBA Code mit VBA in Tabelle kopieren - Fehler?!
Andreas

Hallo Herber Fans,
ich habe mir heute aus der Recherche eine Möglichkeit rausgesucht, einen Code über VBA in ein anderes VBA Worksheet zu kopieren. Das dies in VBA überhaupt geht ist ja schon genial. Es soll ein Code in das VBA Worksheet des activeworkbooks kopiert werden.
Der Code dafü...
11.02.2009 15:56:00
Thread-ID: 1049657
3 Beiträge
Anzeige
Lange Matrixformel mittels VBA in Zelle eintragen
hoffi

Hallo zusammen,
auch nach einer längeren Internetrecherche konnte ich folgendes Problem leider nicht lösen.
Ich möchte in Excel 2003 mittels VBA eine Matrixformel in eine Zelle schreiben lassen. Der Programmiercode sieht vereinfacht so aus:
A = "=sum(if(XXX,YYY,ZZZ))"
Cells(1,1)...
25.03.2009 13:09:25
Thread-ID: 1063729
5 Beiträge
Anzeige
HEIMAT-Workbook eines VBA-Makros ermitteln?
Johann

Hallo,
ich habs irgendwo einmal gelesen, aber mit den Schlüsselworten +Workbook +Makro +ursprung findet man immer zu viele Treffer, aber nie die richtigen.....
Meine Frage:
Ich habe ein VBA-Makro, welches generell mit dem Activeworkbook arbeitet. Das ist irgendeine Excel-Datei in d...
01.04.2009 12:37:23
Thread-ID: 1065958
2 Beiträge
Letzte Stelle einer Zahl mittels VBA in 0 umwand.
Josef

Guten Morgen!
Ich habe in der Spalte A in einem Arbeitsblatt eine Menge siebenstelliger Zahlen, am Schluß mit einer Prüfziffer versehen, stehen. Ich möchte nun, wenn möglich, mittels VBA immer die letzte Zahl in eine 0 umwandeln.
Wie würde hier bitte eine VBA Lösung lauten?
Danke
10.04.2009 06:26:04
Thread-ID: 1068138
12 Beiträge
Mit VBA Zeilen in neue Register kopieren
Andreas

Ein Tabellenblatt soll nach einem bestimmten Kriterium durchsucht werden. Immer wenn das Suchkriterium gefunden wird, soll die Zeile kopiert und in ein neues Tabellenblatt eingefügt werden. Dies soll solange geschehen bis alle Zeilen durchsucht worden sind.
Im Detail soll dies wie folgt fun...
08.06.2009 12:29:49
Thread-ID: 1079883
3 Beiträge
Zelleinhalt mittels VBA in Programm einfügen
marspoki

Hallo,
ich möchte mittels VB in einem externen Programm eine Bummer einfügen.
mein Code sieht zur Zeit so aus.
Private Sub Form_Load() AnwID = Shell("notepad.exe", 1) SendKeys "TTTTTTTTT", True End Sub
Jetzt werden ja die TTTTTTTTT eingefügt.
Das funktioniert auch gut.
29.06.2009 16:47:14
Thread-ID: 1085187
3 Beiträge
Formel in VBA mit " funktioniert nicht
ChrisW

Hallo Leute,
ich möchte der Variablen Fo4 folgende Formel zuweisen:
Fo4 = "=SUMPRODUCT(('Detailed Table'!$G$4:$G$63556="PR")*(('Detailed Table'!$A$4:$A$63556)=$A3)*(('Detailed Table'!$J$4:$J$63556)))"
Excel meckert aber und markiert mir PR was wohl an den Anführungszeichen liegt die...
28.08.2009 15:22:19
Thread-ID: 1099200
6 Beiträge
Anzeige
In VBA mit Spalten vergleichen
Ralph_III

Hallo zusammen, ich bin in VBA leider noch ein ziemlicher Laie, versuche das aber gerade zu ändern. Ich habe allerdings ein Problem und bräuchte Hilfe:
in Zelle L2 von Tabelle1 steht ein Wert, den ich mit der Spalte C (C3 bis C600) von Tabelle2 vergleichen will. Wenn er sich darin befindet,...
10.09.2009 09:45:18
Thread-ID: 1101667
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige