lerogertroutman
XLDnaute Junior
Bonjour,
Je réalise une macro qui crée des tableaux type à remplir par les utilisateurs.
Je souhaite que la première ligne de mon tableau, qui contient les titres des colonnes, soit verrouillée, mais que le reste du tableau soit modifiable.
1- pour y parvenir, j'ai rendu non verrouillable l'ensemble des cellules de ma feuille avec :
Range(A1:ZZ10000).Locked = False
Puis j'ai ajouté dans ma macro une ligne qui déverrouille la feuille :
worksheet("Tableaux").Unprotect ("MonMotdePasse")
puis qui crée le tableau en ajoutant pour les cellules de la première ligne :
Selection.Locked = True
Puis une ligne à la fin de la macro pour vérouiller la feuille :
worksheet("Tableaux").Protect ("MonMotdePasse")
--> Cela fonctionne, mais est-ce la meilleure méthode ?
2- une fois mon tableau créé, si je clique sur une des cellules vérouillées, un MsgBox apparaît ("La cellule est protégée et en lecture seule. Pour modifier une cellule etc...").
--> Comment faire en sorte que ce message n'apparaisse pas, mais sans désactiver les messages d'alerte pour tout le document ?
Un grand merci pour votre aide 🙂
LeRogerTroutman
Je réalise une macro qui crée des tableaux type à remplir par les utilisateurs.
Je souhaite que la première ligne de mon tableau, qui contient les titres des colonnes, soit verrouillée, mais que le reste du tableau soit modifiable.
1- pour y parvenir, j'ai rendu non verrouillable l'ensemble des cellules de ma feuille avec :
Range(A1:ZZ10000).Locked = False
Puis j'ai ajouté dans ma macro une ligne qui déverrouille la feuille :
worksheet("Tableaux").Unprotect ("MonMotdePasse")
puis qui crée le tableau en ajoutant pour les cellules de la première ligne :
Selection.Locked = True
Puis une ligne à la fin de la macro pour vérouiller la feuille :
worksheet("Tableaux").Protect ("MonMotdePasse")
--> Cela fonctionne, mais est-ce la meilleure méthode ?
2- une fois mon tableau créé, si je clique sur une des cellules vérouillées, un MsgBox apparaît ("La cellule est protégée et en lecture seule. Pour modifier une cellule etc...").
--> Comment faire en sorte que ce message n'apparaisse pas, mais sans désactiver les messages d'alerte pour tout le document ?
Un grand merci pour votre aide 🙂
LeRogerTroutman