Verrouillage et déverrouillage de cellule

Salut le forum,

j'ai un petit problème de verrouillage lorsque je protège mon fichier.

En effet, lorsque j'appuis sur un bouton, le contenu de ma cellule A1 doit être copié dans la cellule B1. Cependant, la cellule est protégée pour qu'il n'y ait pas de saisie dedans. Et ça me crée un bug.

J'ai essayé d'inclure dans mon code la procédure suivante :

Range("B1").unprotect

[B1] = [A1]

Range("B1").protect

mais ça ne fonctionne pas.

Merci pour votre aide.

Salut Eric

Ne serais-ce pas la Feuille que tu devrais déprotéger, puis protéger?

Cordialement

Salut Amadéus,

j'essais d'inclure le code :

Activesheet.unprotect

et ça me cause quand même un bug.

Peut-être que je ne le place pas au bon endroit.

Voici mon code :

Private Sub Modifier_Click()

[B1] = [F2]

[B2] = [F3]

[B3] = [F1]

[B5] = [F5]

[B6] = [F6]

[B9] = [F9]

[B10] = [F10]

[B11] = [F11]

[B12] = [F12]

dateinscription.Visible = False

[B13] = [F13]

[B14] = [F14]

[D20] = [E20]

[D22] = [E21]

If [F4] = "H" Then

OptionButton1.Value = True

End If

If [F4] = "F" Then

OptionButton2.Value = True

End If

Call effac 'Efface les données de la colonne F

Call listes2 'permet le rappel des régions en fonction du pays pour afficher la région choisie dans la liste déroulante

End Sub

Salut le forum

Eric regarde du côté de la protection avec UserInterfaceOnly

ActiveSheet.Protect userInterfaceOnly:=True

UserInterfaceOnly(Tiré de l'aide)

Argument de type Variant facultatif. Cet argument a la valeur True pour protéger

l'interface utilisateur, mais pas les macros. Si cet argument n'est pas spécifié, la

protection s'applique à la fois aux macros et à l'interface utilisateur.

Mytå

Merci beaucoup Myta,

ça fonctionne parfaitement.