Muß mich leider nocheinmal mit einem Problem melden ....
Ich habe eine Formel die mir Automatisch mein Dokument ausdruckt wenn die Zahlen 123,1234 und 12345 vorkommen. Das Problem liegt darin das wenn ich die Spalten lösche die das Script überwacht bringt das Script einen Fehler und markiert diese Zeile gelb:
If Target.Value = 123 Or Target = 1234 Or Target = 12345 Then
Ich denke mir mal da fehlt bestimmt eine If Else Anweisung oder sowas oder eine Art schleife oder sowas das die Debug Fehler weg geht.
' column 7 entspricht "Spalte G"
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 7 Then
If Target.Value = 123 Or Target = 1234 Or Target = 12345 Then
ActiveWindow.SelectedSheets.PrintOut Copies:=1, _
Collate:=True
End If
End If
End Sub
Besten Dank für eure Hilfe
Gruß
Steffen