Macro protection cellule

Re Yann,

il te faut rajouter dans le code la ligne avant de reprotéger ta feuille :

listbox1.enabled = false

Bon le nom de ta liste déroulante n'est probablement pas listbox1, donc a
adpater comme toujours mais sinon c'est ca. tu peux même la faire disparaitre
pas un listbox1.visible = false si tu veux.

Cordialement
Benjamin

Re-bonjour,
OK, trop bien, merci beaucoup.
Il me reste un seul hic :
J'ai une colonne avec une liste déroulante.
Avec ma macro telle qu'elle est, je ne peux plus suprimer une sélection déjà
faite (ça c'est OK), mais je peux encore sélectionner un choix dans les
listes (ça c'est pas bon). Comment faire ? Paramétrage des listes ?

Ci après, mon code écrit en vba :


Sub MacroDévSélVér()
'
' MacroDévSélVér Macro
ActiveSheet.Unprotect "passe"
Cells.Locked = True
ActiveSheet.Protect "passe"
'
End Sub

bonjour,

je partage bien sur l'avis de tous tes répondnats sur la nécessité de faire
un peu d'enrgistreur de macros pour apprendre.
Ceci dit l'enregistreur de macros ecrit exactement ce que tu fais et donc
alourdit u peu le code.
Exemple: dasn ce que tu veux faire si tu utilsies l'enregistreur, il
écrirait pour verrouiller l'ensemble des cellules d'1 feuille
cells.select
selection.locked=true

On peut réaliser la même chose en écrivant directement cells.locked=true. Eh
oui, la transitivité existe aussi en informatique.

A+

Bonjour, *YANN24*
J'ai lu ton post 951F546A-A397-4B47-9735-1B9D145421CF@microsoft.com
avec le plus grand intéret :

As-tu essayé l'enregistreur de macro ?

Bien cordialement,

Patrick.

Bonjour,

en fait j'ai une feuille avec des cellules vérouillées, et certaines
non verrouillées.
Ma macro devrait me dévérouiller ma feuille (activesheet.unprotect
"motdepasse"), sélectionner toutes les cellules (ça je sais pas), les
vérouiller toutes (ça je sais pas non plus), et ensuite verouillé (ça
je sais par contre : activesheet.protect)

Donc si vous avez les 2 formules qui me manquent.

Merci d'avance.
YANN

Bonjour anomymousA

En fait, l'enregistreur est encore + verbeux que tu ne le dis :

Voici ce qu'on obtient :

Sub Macro1()
'
' Macro6 Macro
' Macro enregistrée le 27/01/2005 par Michel Gaboly
'

'
Cells.Select
Selection.Locked = True
Selection.FormulaHidden = False
End Sub

Outre la valeur de la propriété Locked (Verrouillée), il enregistre
également celle correspondant à FormulaHidden (Masquée). ;-((

L'enregistreur est un bon outil d'apprentissage de VBA, mail il faut
toujours ou presque élaguer le code.

bonjour,

je partage bien sur l'avis de tous tes répondnats sur la nécessité de faire
un peu d'enrgistreur de macros pour apprendre.
Ceci dit l'enregistreur de macros ecrit exactement ce que tu fais et donc
alourdit u peu le code.
Exemple: dasn ce que tu veux faire si tu utilsies l'enregistreur, il
écrirait pour verrouiller l'ensemble des cellules d'1 feuille
cells.select
selection.locked=true

On peut réaliser la même chose en écrivant directement cells.locked=true. Eh
oui, la transitivité existe aussi en informatique.

A+

Bonjour, *YANN24*
J'ai lu ton post 951F546A-A397-4B47-9735-1B9D145421CF@microsoft.com
avec le plus grand intéret :

As-tu essayé l'enregistreur de macro ?

Bien cordialement,

Patrick.

Bonjour,

en fait j'ai une feuille avec des cellules vérouillées, et certaines
non verrouillées.
Ma macro devrait me dévérouiller ma feuille (activesheet.unprotect
"motdepasse"), sélectionner toutes les cellules (ça je sais pas), les
vérouiller toutes (ça je sais pas non plus), et ensuite verouillé (ça
je sais par contre : activesheet.protect)

Donc si vous avez les 2 formules qui me manquent.

Merci d'avance.
YANN

--
Cordialement,

Michel Gaboly
www.gaboly.com

Re poy-poy,

Ok, mais, par contre, ma liste n'a pas de nom, comment voir son nom, ou
comment lui en donner un?
merci encore.
YANN

Re Yann,

il te faut rajouter dans le code la ligne avant de reprotéger ta feuille :

listbox1.enabled = false

Bon le nom de ta liste déroulante n'est probablement pas listbox1, donc a
adpater comme toujours mais sinon c'est ca. tu peux même la faire disparaitre
pas un listbox1.visible = false si tu veux.

Cordialement
Benjamin

Re-bonjour,
OK, trop bien, merci beaucoup.
Il me reste un seul hic :
J'ai une colonne avec une liste déroulante.
Avec ma macro telle qu'elle est, je ne peux plus suprimer une sélection déjà
faite (ça c'est OK), mais je peux encore sélectionner un choix dans les
listes (ça c'est pas bon). Comment faire ? Paramétrage des listes ?

Ci après, mon code écrit en vba :


Sub MacroDévSélVér()
'
' MacroDévSélVér Macro
ActiveSheet.Unprotect "passe"
Cells.Locked = True
ActiveSheet.Protect "passe"
'
End Sub

bonjour,

je partage bien sur l'avis de tous tes répondnats sur la nécessité de faire
un peu d'enrgistreur de macros pour apprendre.
Ceci dit l'enregistreur de macros ecrit exactement ce que tu fais et donc
alourdit u peu le code.
Exemple: dasn ce que tu veux faire si tu utilsies l'enregistreur, il
écrirait pour verrouiller l'ensemble des cellules d'1 feuille
cells.select
selection.locked=true

On peut réaliser la même chose en écrivant directement cells.locked=true. Eh
oui, la transitivité existe aussi en informatique.

A+

Bonjour, *YANN24*
J'ai lu ton post 951F546A-A397-4B47-9735-1B9D145421CF@microsoft.com
avec le plus grand intéret :

As-tu essayé l'enregistreur de macro ?

Bien cordialement,

Patrick.

Bonjour,

en fait j'ai une feuille avec des cellules vérouillées, et certaines
non verrouillées.
Ma macro devrait me dévérouiller ma feuille (activesheet.unprotect
"motdepasse"), sélectionner toutes les cellules (ça je sais pas), les
vérouiller toutes (ça je sais pas non plus), et ensuite verouillé (ça
je sais par contre : activesheet.protect)

Donc si vous avez les 2 formules qui me manquent.

Merci d'avance.
YANN

re,

j'ai pas bien compris ton problème. Peux-tu expliciter un peu plus avec un
exemple au cas où?

Merci

A+

Re-bonjour,
OK, trop bien, merci beaucoup.
Il me reste un seul hic :
J'ai une colonne avec une liste déroulante.
Avec ma macro telle qu'elle est, je ne peux plus suprimer une sélection déjà
faite (ça c'est OK), mais je peux encore sélectionner un choix dans les
listes (ça c'est pas bon). Comment faire ? Paramétrage des listes ?

Ci après, mon code écrit en vba :


Sub MacroDévSélVér()
'
' MacroDévSélVér Macro
ActiveSheet.Unprotect "passe"
Cells.Locked = True
ActiveSheet.Protect "passe"
'
End Sub

bonjour,

je partage bien sur l'avis de tous tes répondnats sur la nécessité de faire
un peu d'enrgistreur de macros pour apprendre.
Ceci dit l'enregistreur de macros ecrit exactement ce que tu fais et donc
alourdit u peu le code.
Exemple: dasn ce que tu veux faire si tu utilsies l'enregistreur, il
écrirait pour verrouiller l'ensemble des cellules d'1 feuille
cells.select
selection.locked=true

On peut réaliser la même chose en écrivant directement cells.locked=true. Eh
oui, la transitivité existe aussi en informatique.

A+

Bonjour, *YANN24*
J'ai lu ton post 951F546A-A397-4B47-9735-1B9D145421CF@microsoft.com
avec le plus grand intéret :

As-tu essayé l'enregistreur de macro ?

Bien cordialement,

Patrick.

Bonjour,

en fait j'ai une feuille avec des cellules vérouillées, et certaines
non verrouillées.
Ma macro devrait me dévérouiller ma feuille (activesheet.unprotect
"motdepasse"), sélectionner toutes les cellules (ça je sais pas), les
vérouiller toutes (ça je sais pas non plus), et ensuite verouillé (ça
je sais par contre : activesheet.protect)

Donc si vous avez les 2 formules qui me manquent.

Merci d'avance.
YANN

Pour illustrer vos propos :
ce matin j'avais les idées plus claires et avec des indications données
à une heure du mat par anonymous j'ai obtenu ce code très éclairant pour
enlever un menu :

Sub viremenumois()
'
' viremenumois Macro
' Macro enregistrée le 27/01/2005 par tm
'

'
Application.CommandBars("Worksheet Menu Bar").Controls(9).Delete
End Sub


Tout cela pour dire que c'est un bon prof aussi. La conjugaison des deux
est super. Enregistreur et plusieurs profs es VBA...

à+twinley

Bonjour anomymousA

En fait, l'enregistreur est encore + verbeux que tu ne le dis :

Voici ce qu'on obtient :

Sub Macro1()
'
' Macro6 Macro
' Macro enregistrée le 27/01/2005 par Michel Gaboly
'

'
Cells.Select
Selection.Locked = True
Selection.FormulaHidden = False
End Sub

Outre la valeur de la propriété Locked (Verrouillée), il enregistre
également celle correspondant à FormulaHidden (Masquée). ;-((

L'enregistreur est un bon outil d'apprentissage de VBA, mail il faut
toujours ou presque élaguer le code.

bonjour,

je partage bien sur l'avis de tous tes répondnats sur la nécessité de
faire un peu d'enrgistreur de macros pour apprendre.
Ceci dit l'enregistreur de macros ecrit exactement ce que tu fais et
donc alourdit u peu le code.
Exemple: dasn ce que tu veux faire si tu utilsies l'enregistreur, il
écrirait pour verrouiller l'ensemble des cellules d'1 feuille
cells.select
selection.locked=true

On peut réaliser la même chose en écrivant directement
cells.locked=true. Eh oui, la transitivité existe aussi en informatique.

A+

Bonjour, *YANN24*
J'ai lu ton post 951F546A-A397-4B47-9735-1B9D145421CF@microsoft.com
avec le plus grand intéret :

As-tu essayé l'enregistreur de macro ?

Bien cordialement,

Patrick.

Bonjour,

en fait j'ai une feuille avec des cellules vérouillées, et certaines
non verrouillées.
Ma macro devrait me dévérouiller ma feuille (activesheet.unprotect
"motdepasse"), sélectionner toutes les cellules (ça je sais pas), les
vérouiller toutes (ça je sais pas non plus), et ensuite verouillé (ça
je sais par contre : activesheet.protect)

Donc si vous avez les 2 formules qui me manquent.

Merci d'avance.
YANN

En fait, j'ai un tableau Excel avec :

A B C D E

date liste commentaires formules commentaire 2

Donc en fait, à la base, dans ma feuille, seules mes cellules B8:B38, C8:C38
et E8:E38 ne sont pas vérouilleé.
Il me faut une macro qui me sélectionne toute mes cellules, qui les passent
en vérouillage, et après une protection mot de passe.

Pour l'instant, ma macro est comme ça :

Sub MacroDévSélVér()
'
' MacroDévSélVér Macro
ActiveSheet.Unprotect "passe"
Cells.Locked = True
listbox1.Enabled = False
ActiveSheet.Protect "passe"
' Macro enregistrée le 27/01/2005 par User144

Le hic, c'est que je ne sais pas quel nom à ma liste.

Voilà, j'espère avoir résumé la situation.
Merci.
YANN

re,

j'ai pas bien compris ton problème. Peux-tu expliciter un peu plus avec un
exemple au cas où?

Merci

A+

Re-bonjour,
OK, trop bien, merci beaucoup.
Il me reste un seul hic :
J'ai une colonne avec une liste déroulante.
Avec ma macro telle qu'elle est, je ne peux plus suprimer une sélection déjà
faite (ça c'est OK), mais je peux encore sélectionner un choix dans les
listes (ça c'est pas bon). Comment faire ? Paramétrage des listes ?

Ci après, mon code écrit en vba :


Sub MacroDévSélVér()
'
' MacroDévSélVér Macro
ActiveSheet.Unprotect "passe"
Cells.Locked = True
ActiveSheet.Protect "passe"
'
End Sub

bonjour,

je partage bien sur l'avis de tous tes répondnats sur la nécessité de faire
un peu d'enrgistreur de macros pour apprendre.
Ceci dit l'enregistreur de macros ecrit exactement ce que tu fais et donc
alourdit u peu le code.
Exemple: dasn ce que tu veux faire si tu utilsies l'enregistreur, il
écrirait pour verrouiller l'ensemble des cellules d'1 feuille
cells.select
selection.locked=true

On peut réaliser la même chose en écrivant directement cells.locked=true. Eh
oui, la transitivité existe aussi en informatique.

A+

Bonjour, *YANN24*
J'ai lu ton post 951F546A-A397-4B47-9735-1B9D145421CF@microsoft.com
avec le plus grand intéret :

As-tu essayé l'enregistreur de macro ?

Bien cordialement,

Patrick.

Bonjour,

en fait j'ai une feuille avec des cellules vérouillées, et certaines
non verrouillées.
Ma macro devrait me dévérouiller ma feuille (activesheet.unprotect
"motdepasse"), sélectionner toutes les cellules (ça je sais pas), les
vérouiller toutes (ça je sais pas non plus), et ensuite verouillé (ça
je sais par contre : activesheet.protect)

Donc si vous avez les 2 formules qui me manquent.

Merci d'avance.
YANN

Hum...
Tu fais comme si tu voulais en creer une autre (control toolbox, design
mode) et là tu doubleclick dessus. Tu vas arriver sous vba, dans ta feuille
ou excel t'auras créer un début de code :
Private sub listbox1_click()

end sub
et voila ton nom listbox1.

Cordialement
Benjamin

Re poy-poy,

Ok, mais, par contre, ma liste n'a pas de nom, comment voir son nom, ou
comment lui en donner un?
merci encore.
YANN

Re Yann,

il te faut rajouter dans le code la ligne avant de reprotéger ta feuille :

listbox1.enabled = false

Bon le nom de ta liste déroulante n'est probablement pas listbox1, donc a
adpater comme toujours mais sinon c'est ca. tu peux même la faire disparaitre
pas un listbox1.visible = false si tu veux.

Cordialement
Benjamin

Re-bonjour,
OK, trop bien, merci beaucoup.
Il me reste un seul hic :
J'ai une colonne avec une liste déroulante.
Avec ma macro telle qu'elle est, je ne peux plus suprimer une sélection déjà
faite (ça c'est OK), mais je peux encore sélectionner un choix dans les
listes (ça c'est pas bon). Comment faire ? Paramétrage des listes ?

Ci après, mon code écrit en vba :


Sub MacroDévSélVér()
'
' MacroDévSélVér Macro
ActiveSheet.Unprotect "passe"
Cells.Locked = True
ActiveSheet.Protect "passe"
'
End Sub

bonjour,

je partage bien sur l'avis de tous tes répondnats sur la nécessité de faire
un peu d'enrgistreur de macros pour apprendre.
Ceci dit l'enregistreur de macros ecrit exactement ce que tu fais et donc
alourdit u peu le code.
Exemple: dasn ce que tu veux faire si tu utilsies l'enregistreur, il
écrirait pour verrouiller l'ensemble des cellules d'1 feuille
cells.select
selection.locked=true

On peut réaliser la même chose en écrivant directement cells.locked=true. Eh
oui, la transitivité existe aussi en informatique.

A+

Bonjour, *YANN24*
J'ai lu ton post 951F546A-A397-4B47-9735-1B9D145421CF@microsoft.com
avec le plus grand intéret :

As-tu essayé l'enregistreur de macro ?

Bien cordialement,

Patrick.

Bonjour,

en fait j'ai une feuille avec des cellules vérouillées, et certaines
non verrouillées.
Ma macro devrait me dévérouiller ma feuille (activesheet.unprotect
"motdepasse"), sélectionner toutes les cellules (ça je sais pas), les
vérouiller toutes (ça je sais pas non plus), et ensuite verouillé (ça
je sais par contre : activesheet.protect)

Donc si vous avez les 2 formules qui me manquent.

Merci d'avance.
YANN

RE poy-poy,

en fait, je n'ai de liste comme ça car, moi je suis passé par
Données/Validation/, et j'ai ensuite sélectionner "Autoriser " "listes", en
sélectionnant ma plage de base (dans ma liste, j'ai 10 codes différents, qui
sont saisis sur le classeur :

A B C D
date j'y ai affecté liste 1 signification de la
colonne C

J'espère que je suis assez clair.
Merci.

YANN

Hum...
Tu fais comme si tu voulais en creer une autre (control toolbox, design
mode) et là tu doubleclick dessus. Tu vas arriver sous vba, dans ta feuille
ou excel t'auras créer un début de code :
Private sub listbox1_click()

end sub
et voila ton nom listbox1.

Cordialement
Benjamin

Re poy-poy,

Ok, mais, par contre, ma liste n'a pas de nom, comment voir son nom, ou
comment lui en donner un?
merci encore.
YANN

Re Yann,

il te faut rajouter dans le code la ligne avant de reprotéger ta feuille :

listbox1.enabled = false

Bon le nom de ta liste déroulante n'est probablement pas listbox1, donc a
adpater comme toujours mais sinon c'est ca. tu peux même la faire disparaitre
pas un listbox1.visible = false si tu veux.

Cordialement
Benjamin

Re-bonjour,
OK, trop bien, merci beaucoup.
Il me reste un seul hic :
J'ai une colonne avec une liste déroulante.
Avec ma macro telle qu'elle est, je ne peux plus suprimer une sélection déjà
faite (ça c'est OK), mais je peux encore sélectionner un choix dans les
listes (ça c'est pas bon). Comment faire ? Paramétrage des listes ?

Ci après, mon code écrit en vba :


Sub MacroDévSélVér()
'
' MacroDévSélVér Macro
ActiveSheet.Unprotect "passe"
Cells.Locked = True
ActiveSheet.Protect "passe"
'
End Sub

bonjour,

je partage bien sur l'avis de tous tes répondnats sur la nécessité de faire
un peu d'enrgistreur de macros pour apprendre.
Ceci dit l'enregistreur de macros ecrit exactement ce que tu fais et donc
alourdit u peu le code.
Exemple: dasn ce que tu veux faire si tu utilsies l'enregistreur, il
écrirait pour verrouiller l'ensemble des cellules d'1 feuille
cells.select
selection.locked=true

On peut réaliser la même chose en écrivant directement cells.locked=true. Eh
oui, la transitivité existe aussi en informatique.

A+

Bonjour, *YANN24*
J'ai lu ton post 951F546A-A397-4B47-9735-1B9D145421CF@microsoft.com
avec le plus grand intéret :

As-tu essayé l'enregistreur de macro ?

Bien cordialement,

Patrick.

Bonjour,

en fait j'ai une feuille avec des cellules vérouillées, et certaines
non verrouillées.
Ma macro devrait me dévérouiller ma feuille (activesheet.unprotect
"motdepasse"), sélectionner toutes les cellules (ça je sais pas), les
vérouiller toutes (ça je sais pas non plus), et ensuite verouillé (ça
je sais par contre : activesheet.protect)

Donc si vous avez les 2 formules qui me manquent.

Merci d'avance.
YANN

Re salut,
tu n'as pas d'idée pour m'aider alors?

Merci encore.

YANN

Hum...
Tu fais comme si tu voulais en creer une autre (control toolbox, design
mode) et là tu doubleclick dessus. Tu vas arriver sous vba, dans ta feuille
ou excel t'auras créer un début de code :
Private sub listbox1_click()

end sub
et voila ton nom listbox1.

Cordialement
Benjamin

Re poy-poy,

Ok, mais, par contre, ma liste n'a pas de nom, comment voir son nom, ou
comment lui en donner un?
merci encore.
YANN

Re Yann,

il te faut rajouter dans le code la ligne avant de reprotéger ta feuille :

listbox1.enabled = false

Bon le nom de ta liste déroulante n'est probablement pas listbox1, donc a
adpater comme toujours mais sinon c'est ca. tu peux même la faire disparaitre
pas un listbox1.visible = false si tu veux.

Cordialement
Benjamin

Re-bonjour,
OK, trop bien, merci beaucoup.
Il me reste un seul hic :
J'ai une colonne avec une liste déroulante.
Avec ma macro telle qu'elle est, je ne peux plus suprimer une sélection déjà
faite (ça c'est OK), mais je peux encore sélectionner un choix dans les
listes (ça c'est pas bon). Comment faire ? Paramétrage des listes ?

Ci après, mon code écrit en vba :


Sub MacroDévSélVér()
'
' MacroDévSélVér Macro
ActiveSheet.Unprotect "passe"
Cells.Locked = True
ActiveSheet.Protect "passe"
'
End Sub

bonjour,

je partage bien sur l'avis de tous tes répondnats sur la nécessité de faire
un peu d'enrgistreur de macros pour apprendre.
Ceci dit l'enregistreur de macros ecrit exactement ce que tu fais et donc
alourdit u peu le code.
Exemple: dasn ce que tu veux faire si tu utilsies l'enregistreur, il
écrirait pour verrouiller l'ensemble des cellules d'1 feuille
cells.select
selection.locked=true

On peut réaliser la même chose en écrivant directement cells.locked=true. Eh
oui, la transitivité existe aussi en informatique.

A+

Bonjour, *YANN24*
J'ai lu ton post 951F546A-A397-4B47-9735-1B9D145421CF@microsoft.com
avec le plus grand intéret :

As-tu essayé l'enregistreur de macro ?

Bien cordialement,

Patrick.

Bonjour,

en fait j'ai une feuille avec des cellules vérouillées, et certaines
non verrouillées.
Ma macro devrait me dévérouiller ma feuille (activesheet.unprotect
"motdepasse"), sélectionner toutes les cellules (ça je sais pas), les
vérouiller toutes (ça je sais pas non plus), et ensuite verouillé (ça
je sais par contre : activesheet.protect)

Donc si vous avez les 2 formules qui me manquent.

Merci d'avance.
YANN

Re Yann,

Tu devineras jamais ce que je suis allé faire....Manger !!! Désolé, mais
c'est quand mem plus important que ton problème.
Sinon j'avoue que je suis un peu perdu... Il me semble (si j'ai bien
compris) que
tu veux empécher de selectionner un mot dans une cellule B2 de ta liste de
validation.
Dans ce cas, tu verras que la protection empeche dejà de le modifier. Si tu
veux que la liste de validation n'apparraisse plus, il faut la supprimer. Tu
ne peux pas la conserver et ne pas la faire apparaitre, du coup il faudra la
recréer si tu en as besoin à nouveau un jour.
tu rajoutes dans ton code avant protection :
cells.validation.delete (si tu veux en conserver certaine, remplace cells
par le range des cellules sur lesquelles tu veux la supprimer)

J'espere que c'est ce qu'il te fallait :-)
Cordialement
Benjamin

Re salut,
tu n'as pas d'idée pour m'aider alors?

Merci encore.

YANN

Hum...
Tu fais comme si tu voulais en creer une autre (control toolbox, design
mode) et là tu doubleclick dessus. Tu vas arriver sous vba, dans ta feuille
ou excel t'auras créer un début de code :
Private sub listbox1_click()

end sub
et voila ton nom listbox1.

Cordialement
Benjamin

Re poy-poy,

Ok, mais, par contre, ma liste n'a pas de nom, comment voir son nom, ou
comment lui en donner un?
merci encore.
YANN

Re Yann,

il te faut rajouter dans le code la ligne avant de reprotéger ta feuille :

listbox1.enabled = false

Bon le nom de ta liste déroulante n'est probablement pas listbox1, donc a
adpater comme toujours mais sinon c'est ca. tu peux même la faire disparaitre
pas un listbox1.visible = false si tu veux.

Cordialement
Benjamin

Re-bonjour,
OK, trop bien, merci beaucoup.
Il me reste un seul hic :
J'ai une colonne avec une liste déroulante.
Avec ma macro telle qu'elle est, je ne peux plus suprimer une sélection déjà
faite (ça c'est OK), mais je peux encore sélectionner un choix dans les
listes (ça c'est pas bon). Comment faire ? Paramétrage des listes ?

Ci après, mon code écrit en vba :


Sub MacroDévSélVér()
'
' MacroDévSélVér Macro
ActiveSheet.Unprotect "passe"
Cells.Locked = True
ActiveSheet.Protect "passe"
'
End Sub

bonjour,

je partage bien sur l'avis de tous tes répondnats sur la nécessité de faire
un peu d'enrgistreur de macros pour apprendre.
Ceci dit l'enregistreur de macros ecrit exactement ce que tu fais et donc
alourdit u peu le code.
Exemple: dasn ce que tu veux faire si tu utilsies l'enregistreur, il
écrirait pour verrouiller l'ensemble des cellules d'1 feuille
cells.select
selection.locked=true

On peut réaliser la même chose en écrivant directement cells.locked=true. Eh
oui, la transitivité existe aussi en informatique.

A+

Bonjour, *YANN24*
J'ai lu ton post 951F546A-A397-4B47-9735-1B9D145421CF@microsoft.com
avec le plus grand intéret :

As-tu essayé l'enregistreur de macro ?

Bien cordialement,

Patrick.

Bonjour,

en fait j'ai une feuille avec des cellules vérouillées, et certaines
non verrouillées.
Ma macro devrait me dévérouiller ma feuille (activesheet.unprotect
"motdepasse"), sélectionner toutes les cellules (ça je sais pas), les
vérouiller toutes (ça je sais pas non plus), et ensuite verouillé (ça
je sais par contre : activesheet.protect)

Donc si vous avez les 2 formules qui me manquent.

Merci d'avance.
YANN