criscris11
XLDnaute Accro
Salut à tous,
J'ai le code suivant :
A ce stade, je suis obligé de sélectionner une ligne complète pour insérer une ligne vierge. Quelle partie faut il modifier pour ne pas être obligé de sélectionner une ligne mais d'insérer une ligne au dessus de la cellule active ?
Merci d'avance et bon après-midi à tous.
J'ai le code suivant :
Code:
Sub Insertion_ligne()
Selection.Insert Shift:=xlDown
Selection.FillDown
Selection.SpecialCells(xlCellTypeConstants, 23).Select
Selection.ClearContents
End Sub
Merci d'avance et bon après-midi à tous.