XL 2016 Protection ou verrouillage d'une case!

zinoukrimo

XLDnaute Nouveau
Bonjour à tous j'ai un fichier ou je veut protéger ou verrouiller contre les modifications, il y a trois cases de chiffre donner par des formules "Masse Volumétrique Gasoil Kg/m3" & "Résultat en KG" ainsi "Résultat Finale en Tonne".
Merci de me dire les étapes à suivre pour faire cette opération, je suis sous office 2016.
 

Pièces jointes

  • -04- Calculateur de Gasoil & Essence Rapport Mensuel Amont.xlsx
    13.8 KB · Affichages: 4

don_pets

XLDnaute Occasionnel
Hello,

si tu veux bloquer une zone voici un code qui peut t'aider

VB:
Dim Plage As Range
Set Plage = Application.InputBox("Sélectionnez la plage à verrouiller", "Sélection de cellules", Type:=8)

MsgBox ("La plage que vous avez sélectionnée est :" & Plage.Address)
    
    If MsgBox("êtes-vous certain de valider ?" & Chr(13) & _
   "Vous ne pourrez plus modifier les entrées.", vbQuestion + vbYesNo) = vbYes Then
           ActiveSheet.Unprotect
        ActiveSheet.Cells.Locked = False
        Plage.Copy
        Plage.Locked = True
        ActiveSheet.Protect
    End If

Enjoy
 

zinoukrimo

XLDnaute Nouveau
Hello,

si tu veux bloquer une zone voici un code qui peut t'aider

VB:
Dim Plage As Range
Set Plage = Application.InputBox("Sélectionnez la plage à verrouiller", "Sélection de cellules", Type:=8)

MsgBox ("La plage que vous avez sélectionnée est :" & Plage.Address)
   
    If MsgBox("êtes-vous certain de valider ?" & Chr(13) & _
   "Vous ne pourrez plus modifier les entrées.", vbQuestion + vbYesNo) = vbYes Then
           ActiveSheet.Unprotect
        ActiveSheet.Cells.Locked = False
        Plage.Copy
        Plage.Locked = True
        ActiveSheet.Protect
    End If

Enjoy

bonjour don_pets je suis désolé je ne maîtrise pas bien le VB impossible de faire quoique ce soit.
tu peux m'aider autrement.
 

don_pets

XLDnaute Occasionnel
Alors pour le faire autrement,

tu sélectionnes toute ta feuille, ensuite tu fais clic droit format, ensuite protection et tu décoches "Vérouillée". Tu valides.

Ensuite tu sélectionnes la cellule que tu veux protéger et tu fais la même manipe.

Enfin, tu vas dans Révision / Protéger le document et tu valides
 

Membres actuellement en ligne

Statistiques des forums

Discussions
312 105
Messages
2 085 350
Membres
102 870
dernier inscrit
Armisa