Copier la derniere Ligne VIDE

bibbip35 · 8 Février 2016

Bonjour à tous

Je souhaiterais réaliser par macro

Une copie de la dernière ligne NON vide des cellules de A à E
jusqu'à la dernière ligne NON VIDE correspondant a la colonne F

Merci à tous

BIBBIP35

mutzik · 8 Février 2016

Re : Copier la derniere Ligne VIDE

bonjour

dans un module standard

Code:

Sub copie()Dim derligA, derligF


derligA = Range("A" & Rows.Count).End(xlUp).Row
derligF = Range("F" & Rows.Count).End(xlUp).Row
If derligA >= derligF Then Exit Sub
Range("A" & derligA & ":E" & derligA).Copy Range("A" & derligA & ":E" & derligF)


End Sub

bibbip35 · 8 Février 2016

Re : Copier la derniere Ligne VIDE

Merci BERTRAND

Ca fonctionne parfaitement

Copier la derniere Ligne VIDE

bibbip35

XLDnaute Occasionnel

Pièces jointes

mutzik

XLDnaute Barbatruc

bibbip35

XLDnaute Occasionnel

Discussions similaires

Copier la derniere Ligne VIDE

bibbip35

XLDnaute Occasionnel

Pièces jointes

mutzik

XLDnaute Barbatruc

bibbip35

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency