Protéger uniquement le format d'une cellule
Bonjour,
Peut-on verrouiller uniquement le format d'une cellule sans empêcher les utilisateurs de modifier un contenu.
J'ai besoin que des utilisateurs puissent modifier le contenu d'une cellule, sans en modifier le format. Je travaille avec des utilisateurs qui ne connaissent pas la fonction copier-coller 123 et modifient le format à chaque copier-collé, ce qui donne un fichier dégueu.
En utilisant les options de protection, j'arrive à faire :
Cas 1 - la cellule est verrouillée et la feuille est protégée avec l'option "autoriser l'utilisateur à modifier le format" décochée (je ne veux pas qu'il modifie le format) => on ne peut effectivement pas modifier le format mais on ne peut pas non plus copier les valeurs.
Cas 2 - la cellule déverrouillée et la feuille est protégée avec l'option "autoriser l'utilisateur à modifier le format" décochée (je ne veux pas qu'il modifie le format) => on peut copier les valeurs mais on copie aussi le format.
La question revient régulièrement sur les forums, mais je n'ai trouvé aucune réponse qui apportait la bonne solution.
Je vous remercie !
Bonjour à toi,
Il me semble que l'on ne peut pas empécher la copie des formats tout en autorisant la copie des données cependant, tu peux interdire de coller avec les formats.
Cordialement
Merci pour ta réponse. J'essaie d'appliquer ton conseil : n'autoriser que le collage de valeurs.
J'ai trouvé la macro suivante :
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next
Target.PasteSpecial xlPasteValues
Application.CutCopyMode = True
End Sub
qui correspond à ce que je veux. Elle a juste un point ennuyeux : le collage se fait automatiquement (sans ctrl+V) dès que l'on se positionne sur une cellule. Du coup, il suffit de cliquer au mauvais endroit et paf le texte copié est collé.
Je ne m'y connais pas trop en macro, y a t'il possibilité de la modifier pour que le collage ne soit déclenché que via un classique ctrl+V ? Ou un clic droit+collage ?
Je vous remercie !
Je m'auto réponds, car j'ai trouvé sur un autre forum. Intégrée dans Thisworkbook, la macro fait le job : elle refait automatiquement la mise en forme après collage d'un texte.
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Source As Range)
On Error Resume Next 'sécurité
With Application
If .CutCopyMode Then
.EnableEvents = False
.Undo
Selection.PasteSpecial xlPasteValues
.OnUndo "", ""
.OnRepeat "", ""
.EnableEvents = True
End If
End With
End Sub
Bonjour,
Autre suggestion , ajouter une macro qui "remet en place" le format de tes cellules à la fermeture du fichier.