Macro & colonnes groupées

Pierrot93

XLDnaute Barbatruc

• 21 Mars 2008

• #2

Re : Macro & colonnes groupées

Bonjour Jouxte

pour faire cela, il faut protéger la feuille par vba, en utilisant l'argument "userinterfaceonly", comme dans le code ci dessous, à placer dans le module "thisworkbook" :

Code:

Private Sub Workbook_Open()
With Sheets("Feuil1")
    .EnableOutlining = True
    .Protect Password:="toto", userinterfaceonly:=True
End With
End Sub

bon après midi
@+

 

Vote positif 0 Vote négatif

Jouxte

XLDnaute Occasionnel

• 21 Mars 2008

• #3

Re : Macro & colonnes groupées

Bonjour Pierrot93, le Forum,

En réalité je suis à la fin d'une macro quand il faut reprotéger la feuille.

Ma macro se termine ainsi :

ActiveSheet.Protect "toto", DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowSorting:=True, AllowFiltering:=True
End Sub


C'est là que j'aurais souhaité que l'on autorise l'action sur les + et - .

Merci encore pour ton aide.

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 21 Mars 2008

• #4

Re : Macro & colonnes groupées

Re

alors essaye en modifiant la fin de ta macro comme suit :

Code:

With ActiveSheet
    .EnableOutlining = True
    .Protect Password:="toto", DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowSorting:=True, AllowFiltering:=True, userinterfaceonly:=True
End With
End Sub

@+

 

Vote positif 0 Vote négatif

Jouxte

XLDnaute Occasionnel

• 21 Mars 2008

• #5

Re : Macro & colonnes groupées

Re,

Trop top.

Merci encore pour ton aide.

 

Vote positif 0 Vote négatif