inssere les lignes entre deux ligne en VBA

G

Gelinotte

XLDnaute Accro

• 31 Août 2013

• #2

Re : inssere les lignes entre deux ligne en VBA

Bonsoir,

Il y a bien des façons ... en voilà une :

Code:

Sub InsererDesLines()
Dim X As Integer
Dim Y as integer

X = Cells(74, 9).Value
    
    For Y = 1 To X
       Rows(74 + 1).Insert
    Next Y

End Sub

Geli

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 31 Août 2013

• #3

Re : inssere les lignes entre deux ligne en VBA

Bonsoir
merci pour la réponse c'est bien ce que je cherchais 😎
grazie et Bon week end

 

Vote positif 0 Vote négatif

G

Gelinotte

XLDnaute Accro

• 31 Août 2013

• #4

Re : inssere les lignes entre deux ligne en VBA

Bonsoir,

Rows(74 + 1).Insert ou Rows(75).Insert c'est la même chose.

Mais 74 +1 est plus facile de se souvenir qu'on lit la ligne 74 dans la colonne i (9). Le +1 sert à descendre d'une ligne, sinon l'insertion se fait au dessus de la ligne 74.

Bon long congé (car ici au Canada, lundi c'est la Fête du travail, un jour férié).


Geli

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 2 Septembre 2013

• #5

Re : inssere les lignes entre deux ligne en VBA

Bonjour Ilino, Gelinotte,

Bien tardivement mais comme il est dit :

Ilino à dit:

je souhaiterai insérer des ligne entre la ligne 75 et 76

Cliquez pour agrandir...

Code:

Rows(76).Resize([I74]).Insert

Pas besoin de boucle.

A+

 

Vote positif 0 Vote négatif