XL 2016 Protéger des cellules de formules sur Excel

Ayem · 14 Novembre 2020

Bonjour a tous,
j’ai essayé de protéger uniquement les cellules de mon tableau Excel contenant des formules. J’y suis parvenu mais lorsque j’essaie d’exécuter le macro associer à un bouton me permettant d’ajouter une nouvelle ligne à mon tableau pour un nouvel enregistrement, la mise en forme de la nouvelle ligne ne correspond plus à celle des lignes précédentes et je n’arrive plus à exécuter de nouveau mon Macro. A noter que tout cela se produit uniquement une fois que je protège les cellules avec formule de mon tableau. Les cellules que je veux protéger sont les cellules des colonnes A, F, G et P de mes tableaux. Voici ci joint mon fichier Excel. Merci

cp4 · 14 Novembre 2020

Bonjour Ayem

à tester

VB:

Sub Ajouteruneligneventes()
  Dim lig As Long
ActiveSheet.Unprotect 'si mot de pass--> Activesheet.unprotect "ton password" sans "
    lig = Cells(Rows.Count, 1).End(xlUp).Row + 1
   'Cells(lig, 1) = Cells(lig - 1, 1) + 1
   Cells(lig, 2) = Date
   Cells(lig, 3).Select
ActiveSheet.Protect
End Sub

Bon week-end.

XL 2016 Protéger des cellules de formules sur Excel

Ayem

XLDnaute Nouveau

Pièces jointes

cp4

XLDnaute Barbatruc

Discussions similaires