Ajout et protection

Bonjour la communauté, cela fait des années que je me sers de ce forum et je vous remercie tous pour cette contribution qui m'a tant aidé.

Néanmoins, aujourd'hui je souhaite faire quelque chose de plus costaux, qui nécessitera probablement du vba (que je ne maitrise pas du tout), je m'explique ;

J'ai un tableau ou de tierces personnes doivent encodé des chiffres sur une ligne, une fois la ligne encodée, je souhaiterai par le moyen d'un bouton qu'il soit possible de validé la ligne et que cette dernière se verrouille pour que la personne ne puisse plus modifié les cellules qu'il vient d'encoder.

Merci pour votre attention et votre réflexion.

Erik

Bonjour, et bienvenue en tant que participant actif !

Un essai

4verrou.xlsm (14.76 Ko)

Bonjour Stelson,

Un énorme merci c'est parfaitement ce que je souhaitais faire.

Auriez vous une technique pour que lorsque j'ai cliquer sur le bouton qu'il disparaisse ?

Merci

On peut tout faire mais tu m'intrigues ... est-ce bien raisonnable ?

Sub verrouillage()
    ActiveSheet.Unprotect
    ligne = Selection.Row
    Range("A" & ligne & ":H" & ligne).Select
    ActiveSheet.Shapes("Rectangle à coins arrondis 1").Visible = False
    Selection.Locked = True
    Selection.FormulaHidden = False
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
6verrou.xlsm (14.54 Ko)
Rechercher des sujets similaires à "ajout protection"