Makro mit Passwortabfrage
23.10.2007 08:33:00
Andreas
Ich habe folgendes Makro:
Sub Blattschutz_aus()
'Blattschutz aufheben
Dim Blatt As Worksheet
For Each Blatt In Worksheets
Blatt.Unprotect "Test"
Next Blatt
End Sub
Jedoch möchte ich das Makro soweit änder, das zuerst noch eine Passwortabfrage kommt, und dann erst der Blattschutz in allen Mappen aufgehoben wird.
Im Voraus vielen Dank
Andreas