Grouper/Dissocier des lignes dans feuille protégée

[tinet]

Bonsoir le forum,

Après avoir fait des recherches je n'ai pas trouvé de solution.

Voici mon problème.

Quand on utilise dans une feuille la fonction groupée et dissocier des lignes avec une protection.
cette fonction est inactive.
Je ne souhaitent pas enlever la protection

La solution que j'ai trouvée et de rajouter dans ThisWorbook cette fonction qui marche très bien pour une feuille

Private Sub Workbook_Open()
With Sheets("Feuil1")
.EnableOutlining = True
.Protect userInterfaceOnly:=True
End With
End Sub

Mon problème est, comment faire pour toutes les feuilles du classeur.
En sachant que je ne connais pas d'avance le nom des feuilles qui seront créées.

La feuill1 et le modèle, qui sera dupliqué en fonction de la demande, puis ses feuilles seront renommées.

est-ce que quelqu'un à trouver une solution à ce type de problème

merci de votre aide

 

[camarchepas]

Re : Grouper/Dissocier des lignes dans feuille protégée

Bonsoir,

Comme ceci cela devrait fonctionner

Private Sub Workbook_Open()
dim Onglet as worksheet
for each onglet in thisworkbook.worksheets
With onglet
.EnableOutlining = True
.Protect userInterfaceOnly:=True
End With
next onglet
End Sub

 

[tinet]

Re : Grouper/Dissocier des lignes dans feuille protégée

bonsoir
Camarchepas.

Un plus, aprés la création d'une copie, il faut faire une sauvegarde
Sortir du fichier pour que la feuille soi prise en compte.

Si pas d'autre solution je fais avec.

 

[camarchepas]

Re : Grouper/Dissocier des lignes dans feuille protégée

Dans le même module thisworkbook qui contient déjà le workbook_open

Ajoute l'évenementiel nouvelle feuille comme ci dessous

Private Sub Workbook_NewSheet(ByVal Sh As Object)
With Sh
.EnableOutlining = True
.Protect userInterfaceOnly:=True
End With
End Sub

 

[tinet]

Re : Grouper/Dissocier des lignes dans feuille protégée

Non pas de changement.

 

[camarchepas]

Re : Grouper/Dissocier des lignes dans feuille protégée

Comment créées tu les nouveaux onglets ?

 

[tinet]

Re : Grouper/Dissocier des lignes dans feuille protégée

Je duplique la feuille

 

[camarchepas]

Re : Grouper/Dissocier des lignes dans feuille protégée

Avec un code vba ou en manuel ?

 

[tinet]

Re : Grouper/Dissocier des lignes dans feuille protégée

En manuel
Pas de code

 

[tinet]

Re : Grouper/Dissocier des lignes dans feuille protégée

Si compliquer la sauvegaede pas genant6