Nach Schleife zurück auf Ausgangs-Tabelle (Sheet)
MarkusB.
Ich habe folgendes Problem, ich starte ein Makro, von jedem Tabellenblatt kann ich folgendes Makro ausführen:
Sub Blattschutz_aufheben()
Dim i As Integer
Application.ScreenUpdating = False
For i = 1 To 14
ActiveWorkbook.Worksheets(i).Activate
ActiveSheet.Unprotect Password:="harryk10"
Next i
Application.ScreenUpdating = True
End Sub
Vielen Dank im Voraus!
Viele Grüße
MarkusB.