Hier mein CODE:
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
WorksheetFunction.VLookup(LabelSN, Sheets("Teile").Range("A3:AX57"), 41, 0) = "JA"
Else
WorksheetFunction.VLookup(LabelSN, Sheets("Teile").Range("A3:AX57"), 41, 0) = "Nein"
End If
End Sub
Ich bekomme aber die Meldung Objekt erforderlich... Hat jemand eine Idee wo der Fehler ist ?