habe folgenden VBA in "DieseArbeitsmappe" eingegeben:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False
If Sheets("Lizenz").[C9].NumberFormat = ";;;" Then
Application.Sheets("Lizenz").[E31] = Delete
Application.Sheets("Lizenz").[C9] = Delete
End If
End Sub
funktioniert ohne Blattschutz hervorragdend, jedoch bei gesetztem Blattschutz ergibt sich Laufzeitfehler 1004?.....Gibts ne Lösung?
Danke
Peter S