Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
588to592
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
588to592
588to592
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Suchen

Suchen
23.03.2005 16:45:38
Gregor
Hallo zäme
Mit fogendem Befehl suche ich in einer Spalte nach dem Eintrag "Hallo".
Ich möchte nun alle Einträge suchen in der zB in Spalte D irgend ein Datum steht (nicht bloss aktuelles). Welchen Eintrag muss ich anstelle von "Hallo" setzen. Evt. irgendwas mit Format(Date)?
Set SuBe = Worksheets(Quellblatt).Range(Cells(Beginn, 4), _
Cells(intLastRow, 4)).Find("Hallo", lookat:=xlWhole)
Vielen Dank

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Suchen
23.03.2005 17:11:54
Fritz
Hallo Gregor,
ich würde es mal so versuchen:

Sub xxx()
Dim I&, LetzteZeile&
LetzteZeile = Cells.SpecialCells(xlCellTypeLastCell).Row
For I = 1 To LetzteZeile
Cells(I, 4).Select
If IsDate(Cells(I, 4)) Then
MsgBox ("Datum")
Else
MsgBox ("kein Datum")
End If
Next
End Sub

AW: Suchen
23.03.2005 19:55:06
Gregor
Hallo Fritz
Danke für deinen Tipp, ich werde das so einbauen.
Gruss Gregor
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige