Insertion de ligne

[morgan44]

Bonjour,

Je cherche à insérer des lignes dans un onglet en fonction d'une cellule qui est dans un autre onglet et dont la valeur est variable.

Par exemple, les lignes a insérées sont dans l'onglet récap et la cellule qui va définir le nombre de ligne à insérer est dans l'onglet info en B12.

Merci d'avance,

Morgan

 

[job75]

Re : Insertion de ligne

Bonjour morgan44,

Pour insérer les lignes à l'emplacement de la cellule A1 de Récap par exemple, utiliser le code :

Dim i As Integer
For i = 1 To Sheets("info").Range("B12").Value
Sheets("Récap").Range("A1").EntireRow.Insert
Next

A+

 

[morgan44]

Re : Insertion de ligne

merci bcp !

ca fonctionne très bien !

bonne fin de journée