Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel VBA

VBA

2 réponses
Avatar
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
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Ellimac
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" a écrit dans le message de
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




Avatar
Frédéric Sigonneau
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