ich möchte mir über ein Makro eine Spalte nach der aktuellen Woche filtern lassen
(Montag-Freitag) wollte folgenden Code dafür benutzen
Private Sub CommandButton2_Click()
Dim varDate As Date
varDate = Date
Sheets("ToDo&PrioListe").Range("K5").AutoFilter Field:=11, Criteria1:="=" & CDbl(varDate) + 2 - Weekday(Date)
End Sub
Die Spalte wird gefiltert doch heute fehlt z.B. der Montag ich schätze ich hatte nur einen "Glücksgriff" da es gestern und vorgestern noch geklappt hat. Könnte man das besser und sicherer programmieren?
Schön wäre es auch wenn das Makro mir dann die entsprechende Woche auch noch in eine Zelle X schreibt.
Liebe Grüße
Pascal