Discussion :

[supertoms]

Salut à tous,

Je génère sous access une feuille excel.
Je n'arrive pas à vérouiller cette feuille, j'ai essayé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
ActiveSheet.Protect AllowFiltering:=True

...mais cca ne marche pas !
J'ai aussi essayé ca :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
With ActiveSheet
   .Cells.Locked = False 'Déverrouiller toutes les cellules
   .Range("A1").Locked = True 'Verrouiller la cellule A1
   .Protect AllowFiltering:=True 'Verrouiller la feuille
End With

Ca ne marche pas non plus !
Que faire ?

[Godzestla]

Mets ton Post sur le forum VBA Excel,

Quelqu'un t'aidera.

Il me semble que pour que la protection fonctionne, il faut d'abord sauver ton fichier avec des options

File -> Save As -> Tools > general Option et mettre un password.

As-tu essayé ?

[supertoms]

Tu crois qu'il faut que je mette en section excel ?
Si je vais dans cette section je sens qu'ils vont me donner le code que j'ai déjà essayé.
Et je ne vois pas ce que tu veux dire avec ses save ?

[mayekeul]

bonjour,
a chaud

si tu es sous access
il te manque la référence à l'application

genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

xlapp.sheets(1).protect

[Godzestla]

Re,

oublie j'ai pédallé dans la choucroute.

C'est mayekeul qui est dans le bon.

[supertoms]

Merci ca fonctionne !