Makro Calculate / Ausführen /
20.03.2006 11:33:23
Marquez
kann mir jemand sagen wie ich meinem Makro die Funktion Berechnen hinzufügen?
Sub seite_schützen()
Sheets("T1").Select
ActiveSheet.Unprotect Password:="1"
ActiveSheet.EnableAutoFilter = True
ActiveSheet.EnableOutlining = True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, _
UserInterfaceOnly:=True, Password:="1"
End Sub
Danke Vorab
Anzeige