Hallo Zusammen,

ich habe gerade versucht ein Makro in Excel 2010 zuschreiben.

Ich wollte das, dass Makro ab der Zeile I2 nach Daten sucht und alle mit dem Datum von heute vergleicht. Alle die das Datum von Heute haben oder in der Vergangenheit liegen sollen dann in eine andere Tabelle kopiert werden. Ich sitze jetzt schon seit ein paar Stunden da ran und bekomme es nicht hin vielleicht könnt ihr mir weiterhelfen.

Hier das von mir geschriebene Makro:

Sub VorbestellungPrüfen()

Vorbestellt.Select

Dim Zeile As Long

Dim ZeileMax As Long

ZeileMax = Datenbank.UsedRange.Rows.Count

For Zeile = 2 To ZeileMax

If Cells(Zeile, 9) <= Date Then

.Cells(Zeile, 9).Copy Destination:=Worksheets("Tablle6").Range("E5")

Else

MsgBox ("Keine neuen Vorbestellungen erschienen")

End If

Next Zeile

End Sub

Ps.: Nicht schlagen bin in VBA noch ein blutiger anfänger.

LG

Baudi