Pb deverouiller plage cellules

Bonjour,

Je recherche activement une personne plus doué que moi, pouvant repondre à ma question.
En effet, je cherche a deverouiller par une macro une plage de cellule d'une feuille protegée...Dans la logique de mon programme, la macro demande a l'utilisateur un mot de passe(ca j'ai reussit) qui lui ouvre l'acces à une feuille deverouillée dans certaines plages de cellules...

Les lignes de codes qui me resistent sont les suivantes:

Code:

---

1 2 3 4

ActiveSheet.Unprotect ActiveSheet.Protection.AllowEditRanges.Add Title:="Plage1", Range:=Rows( _ "22:22") ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

---

'dans ce cas precis, je cherche a deverouiller une ligne

Please help me....

Clement

Bonjour
As tu essayé de remplacer:

Code:

---

1 2	ActiveSheet.Protection.AllowEditRanges.Add Title:="Plage1", Range:=Rows( _ "22:22")

---

par

Code:

---

1 2	Rows("22:22").Select Selection.Locked = False

---

Slts

Oui j'ai essayé, malheuresement ce ne fonctionne pas...

Le message d'erreur est le suivant:

'Erreur d'execution 1004
'Impossible de définir la proporiété Locked dans la classe Range

je t'envoie toutes les lignes des programme, ca pourra peu etre d'aider...

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Private Sub CommandButton3_Click() Sheets("Recherche").Select   'Sauvegarde des fichiers modifiers Dim reponse As String     reponse = InputBox("Donner numero de la ligne à modifier", "Identification", "")   If IsNumeric(reponse) Then Range("A" & reponse).Select     Rows("22:22").Select Selection.Locked = False     End Sub

---

MErci beaucoup de ton aide....;)

Rebonjour,

J'ai essayé ce que tu m'a dis sur une nouvelle feuille excel et cela foctionne...
Je ne sais pas pourquoi ca ne fonctionne pas sur ma feuille....
As tu une idée?

Merci

Bonjour
Peut être que tu n'avais pas dévérouillé ta feuille
Parce que j'ai testé ton code et il marche chez moi
Slts
PF3

OK, et merci encore de ton aide....

Si ton problème est résolu, peux-tu cliquer sur le bouton du même nom en bas de discussion?

Merci.