J'ai honte

Arcangeli · 29 Septembre 2010

Bonjour le forum,
Je n'arrive plus et pourtant j'ai su le faire, adapter ma macro pour pouvoir changer le format de cellule lorsque le classeur est protégé par une macro.
J'ai mis un explemple en pièce jointe.
Déjà merci pour votre aide.

mth · 29 Septembre 2010

Re : J'ai honte

bonjour,

Je ne sais si c'est la même instruction sous 2003 (mais tu la retrouveras facilement avec l'enregistreur de macros), donc peut-être un complément à la ligne de protection, à tester:

Code:

Worksheets(i).Protect Password:="yes", [B]AllowFormattingCells:=True[/B]

Bon après-midi,

mth

Edit: 🙂 Bonjour CBernardT

CBernardT · 29 Septembre 2010

Re : J'ai honte

Bonjour Arcangeli, mth,

modifie le code comme suit :

Sub Protéger()
For i = 1 To Worksheets.Count
With Worksheets(i)
.EnableSelection = xlUnlockedCells
.Protect Password:="yes", DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFormattingCells:=True
End With
Next
End Sub

Arcangeli · 29 Septembre 2010

Re : J'ai honte

Un grand merci à vous deux, c'est parfait.

J'ai honte

Arcangeli

XLDnaute Occasionnel

Pièces jointes

mth

XLDnaute Barbatruc

CBernardT

XLDnaute Barbatruc

Arcangeli

XLDnaute Occasionnel

Discussions similaires

J'ai honte

Arcangeli

XLDnaute Occasionnel

Pièces jointes

mth

XLDnaute Barbatruc

CBernardT

XLDnaute Barbatruc

Arcangeli

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency