VBA inserer n ligne à la fois

geo -  
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   -

Bonjour, quelqu'un pourrait-il m'aider !
je voudrais insérer n lignes en une seule fois à l'aide d'une macro
cette macro insère une seule ligne mais comment lui faire comprendre qu'il m'en faut n sans avoir a répéter cette macro n fois. je voudrais à partir d'une liste déroulante , insérer le nombre ligne en fonction du nombre qui s'affiche.
 


Windows / Chrome 118.0.0.0

A voir également:

4 réponses

Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 

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 ?


0
geo
 

    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

0
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 

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
 


0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 

Bonjour à tous,

ou bien comme ça :

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

eric
 


0