Was ist an diesem Code nicht in Ordnung.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "B4" Then Barcode2
End Sub
Ich bekomme andauernd die Meldung
Fehler beim Kompilieren:
Sub oder Function nicht defieniert.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "B4" Then Barcode2
End Sub