VBA

Le
David Vincent
Bonjour,

je recherche comment se traduit en VBA :

Tirer vers le bas (colonne B) jusqu'à la dernière ligne renseignée colonne
A.

Merci d'avance

DV
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Ellimac
Le #5460541
Bonjour,

En partant de la cellule à recopier :

Sub Macro1()
der = Range("a65000").End(xlUp).Row
deb = ActiveCell.Row
ActiveCell.AutoFill Destination:=Range("E" & deb & ":E" & der)
End Sub

Camille

"David Vincent" news: 4808cc6e$0$842$
Bonjour,

je recherche comment se traduit en VBA :

Tirer vers le bas (colonne B) jusqu'à la dernière ligne renseignée colonne
A.

Merci d'avance

DV




Frédéric Sigonneau
Le #5460421
Ou :

Range("B3:B" & Cells(Rows.Count, "a").End(xlUp).Row) = Range("B3").Formula

(en supposant que la 1ère cellule renseignée en colonne B soit la cellule B3)

FS
---
Frédéric Sigonneau
http://frederic.sigonneau.free.fr

Bonjour,

je recherche comment se traduit en VBA :

Tirer vers le bas (colonne B) jusqu'à la dernière ligne renseignée colonne
A.

Merci d'avance

DV




Publicité
Poster une réponse
Anonyme