Excel VBA - Selectarea mai multor coli

Problema

Am un anumit cod VBA pe care îl folosesc pentru grup / ungroup pe foaia protejată. Funcționează foarte bine, dar numai pe o singură coală. Cum o pot modifica pentru a lucra pe două?

 Private Sub Workbook_open () Cu Sheet1 .Protect Password: = "secret", userinterfaceonly: = Adevărat .EnableOutlining = True End With End Sub 

Nu știu cum să adaug mai mult de o foaie. Poate cineva să mă ajute?

Soluţie

Incearca asta:

 Private Sub Workbook_open () Cu foi ("Sheet1 name") .Protect Password: = "secret", userinterfaceonly: = Adevărat .EnableOutlining = True End With With foi ("Sheet2 name"). : = Adevărat .EnableOutlining = Atingere finală cu sfârșit de sfârșit 

Notă

Mulțumită lui Excelguru pentru acest sfat pe forum.