Macro insérer une ligne

**anonymous1.0** · 04/02/2011, 13h29

Bonjour,

Je souhaite insérer, à l'aide d'une macro, une ligne entre la 6ème et la 7ème...

Merci d'avance!

**rjamin** · 04/02/2011, 13h45

Bonjour,

Code :

1
2
3
4
5
6
7
8
Sub Macro1()
'
' Insérer une ligne entre A6 et A7
'
 
Range("A7").Select
    Selection.EntireRow.Insert
End Sub

**fring** · 04/02/2011, 14h07

Bonjour,

Evitez les "Select"

Code :

Range("A7").EntireRow.Insert

Et pour éviter que cela part en cacahuète si l'on ne se trouve pas sur la bonne feuille lorsqu'on exécute la macro il est prudent de la spécifier

Code :

Sheets("LaFeuille").Range("A7").EntireRow.Insert

**anonymous1.0** · 04/02/2011, 14h45

Merci à vous 2!

Macro insérer une ligne [XL-2003]