VBA Hilfe
27.02.2009 11:54:44
Micha
Durch den unten stehenden Code wird die MsgBox beim öffnen der schreibgeschützten Datei aktiviert.
Ich möchte das die Warnung aber erst bei der ersten Zelleingabe angezeigt wird.
Könnt Ihr mir helfen?
Gruß
Micha
Private Sub Workbook_Open()
If Me.ReadOnly Then
MsgBox "Achtung, die Datei ist schreibgeschützt", vbExclamation, "Warnung"
End If
End Sub