mit dem folgenden Code versuche ich in der Zeile 1 das Datum zu suchen. Alle Datumsangaben ab dem 2.1. sind per Formel ermittelt.
Er bringt mir jedoch einen "Laufzeitfehler 91". Was habe ich hier falsch gemacht?
Private Sub Worksheet_Change(ByVal Target As Range)
Dim lngCheckIn&, lCol&
If Target.Column = 4 Then
lngCheckIn = Target.Value
lCol = Tab2_Übersicht.Range("1:1").Find(What:=lngCheckIn).Column
End If
End Sub
Gruß Alf