L lauradala XLDnaute Nouveau 5 Décembre 2018 #1 Bonjour, J'ai un bouton avec un code VBA qui m'ajoute une ligne à la fin de mon tableau sauf que j'aimerais que cette ligne soit ajoutée sous la ligne sélectionnée. Merci d'avance, Laura VB: Ajout_ligne_dessous_action Macro ' ActiveSheet.Unprotect ("") ActiveCell(2).EntireRow.Insert ActiveSheet.Protect ("") Pièces jointes Document Unique macro 3.xlsm 32.6 KB · Affichages: 10
Bonjour, J'ai un bouton avec un code VBA qui m'ajoute une ligne à la fin de mon tableau sauf que j'aimerais que cette ligne soit ajoutée sous la ligne sélectionnée. Merci d'avance, Laura VB: Ajout_ligne_dessous_action Macro ' ActiveSheet.Unprotect ("") ActiveCell(2).EntireRow.Insert ActiveSheet.Protect ("")
youky(BJ) XLDnaute Barbatruc 5 Décembre 2018 #2 Bonsoir Lauradala, ceci doit suffir. Bruno VB: Sub AjoutLigneDessousEval() ActiveSheet.Unprotect ("") Rows(Selection.Row + 1).Insert ActiveSheet.Protect ("") End Sub Vote positif 0 Vote négatif
Bonsoir Lauradala, ceci doit suffir. Bruno VB: Sub AjoutLigneDessousEval() ActiveSheet.Unprotect ("") Rows(Selection.Row + 1).Insert ActiveSheet.Protect ("") End Sub