Comment grouper et dissocier des lignes dans une feuille de calcul protégée?

Comme nous le savons tous, dans une feuille de calcul protégée, il existe de nombreuses limitations pour appliquer certaines opérations. Par exemple, nous ne pouvons pas basculer entre les données groupées et non groupées. Existe-t-il un moyen de regrouper ou de dissocier des lignes dans une feuille de calcul protégée?

Regrouper et dissocier des lignes dans une feuille de calcul protégée avec le code VBA

Regrouper et dissocier des lignes dans une feuille de calcul protégée avec le code VBA

Peut-être qu'il n'y a pas d'autre moyen de résoudre ce problème, mais en utilisant un code VBA, procédez comme suit:

1. Activez votre feuille de calcul que vous souhaitez utiliser, veuillez vous assurer que la feuille de calcul n'est pas encore protégée.

2. Puis maintenez le ALT + F11 clés, et il ouvre le Fenêtre Microsoft Visual Basic pour Applications.

3. Cliquez sur insérer > Moduleet collez le code suivant dans le Fenêtre du module.

Code VBA: regrouper et dissocier des lignes dans une feuille de calcul protégée

Sub EnableOutlining()
'Updateby Extendoffice
Dim xWs As Worksheet
Set xWs = Application.ActiveSheet
Dim xPws As String
xPws = Application.InputBox("Password:", xTitleId, "", Type:=2)
xWs.Protect Password:=xPws, Userinterfaceonly:=True
xWs.EnableOutlining = True
End Sub

4. Puis appuyez F5 clé pour exécuter ce code, et une boîte de dialogue apparaîtra pour vous rappeler d'entrer le mot de passe pour protéger la feuille de calcul actuelle. Voir la capture d'écran:

5. Puis cliquer OK, votre feuille de calcul a été protégée, mais vous pouvez développer et réduire les symboles de contour dans cette feuille de calcul protégée, voir capture d'écran:

Notez: Si votre feuille de calcul est déjà protégée, ce code ne fonctionnera pas.