VBA inserer n ligne à la fois

Bonjour,

Ou est comme tu écris "Cette macro" ?

et n veut dire combien de ligne ?

et les lignes à insérer sont à la suite d'un tableau ou à partir d'une ligne fixe ?

    Rows("2:2").Select
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove

salut Mike,

par "n" je veux dire le nombre de ligne que je veux. et effectivement ces lignes seront à inserer dans un tableau. il s'agira en fonction de variable qui changera que les ligne s'insere automatiquement quand le nombre de ligne dans la liste deroulante changera

Re,

comme cela, mais es ce que tes lignes s''ajoute toujours au dessus de la ligne 2 parce que ligne 2 tu as déjà le nombre de ligne de référence ou veux tu les ajouter au dessous ?

    For i = 1 To Range("A2")
        Rows("2:2").Insert Shift:=xlDown
    Next i
 

Bonjour à tous,

ou bien comme ça :

n = 5
Rows("2:2").Resize(n).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove

eric