Excel-Inside Newsletter


Empfange HTML?

Wir haben 32 Gäste online

 

- Preiswert und schnell -
Stellen Sie Ihre Anfrage,
wir unterbreiten Ihnen gerne
ein kostenloses Angebot.
Weiterlesen ...

Pay a Coffee

Möchten Sie uns uns einen Betrag zur Deckung der Kosten spenden oder weil Sie von der Seite begeistert sind, dann klicken Sie bitte auf die Schaltfläche.

Follow Excel Inside
   

   RSS-Feed abbonieren 

Anmeldung

Angemeldeten Besuchern steht weitere Funktionen wie der Zugriff auf den Online- Shop und das Office 2010- Forum zur Verfügung.



Übersetzen der Seite nach:


Länder

71.6%Germany Germany
14.3%United States United States
4.9%Austria Austria
4.7%Switzerland Switzerland
1%United Kingdom United Kingdom

Besucher

Total: 1781975


Verschiedenes Rund um den Blattschutz

102003


Verschiedenes Rund um den Blattschutz
 

Blattschutz herstellen und das Gruppieren erlauben

Privat Sub Workbook_Open()

ActiveSheet.Protect password:="Geheim" Contents:=True, UserInterfaceOnly:=True

ActiveSheet.EnableOutlining=True

End Sub



Blattschutz herstellen und Gruppieren und Autofilter erlauben

Privat Sub Workbook_Open()

ActiveSheet.Protect password:="Geheim" Contents:=True, UserInterfaceOnly:=True

ActiveSheet.EnableOutlining=True

ActiveSheet.EnableAutoFilter=True

End Sub



Blattschutz mit Passwort in Variable abgelegt

Public Sub Schutz()

pwd = "Geheim" oder pwd = sheets("Optionen").Range("B2").Value

ActiveSheet.Protect password:=pwd, Contents:=True, UserInterfaceOnly:=True

ActiveSheet.EnableOutlining=True

End Sub



Blattschutz aufheben

Public Sub Schutz_aufheben()

pwd = "Geheim" oder pwd = sheets("Optionen").Range("B2").Value

ActiveSheet.Unprotect (pwd)

End Sub

< Zurück   Weiter >