title image


Smiley Re: Bei Blattschutz Gruppieren?
Hi Jan,



probier mal folgendes:



Option Explicit

Private Sub Workbook_Open()

With Sheets("Tabelle1")

.EnableOutlining = True

.Protect contents:=True, Password:="xxx", UserInterfaceOnly:=True

End With

End Sub



Den Tabellennamen musst Du natürlich anpassen.



Viel Erfolg.



Gruß

Marc










Für den ersten Eindruck gibt es keine zweite Chance!

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: