OVH Cloud OVH Cloud

MACRO renvoie àala derniere ligne

2 réponses
Avatar
e.platet
bonsoir à tous.



pouvez vous me dire comment réaliser une petite macro qui dans mon cas me
renverrai automatiquement à la dernier ligne d'une colonne.

exemple

A B C D E

1 titi rty fgh

2 toto rdf ygg

3 tutu rt tt dftg

4

5

6

donc je voudrai via un petit bouton je lance ma macro qui placerai mon
curseur par exemple en A4 etc... si je remplis jusqu'a A200 qu'il me place
en A201 voila



merci de votre aide





manu

2 réponses

Avatar
MichelB
Bonsoir

Voici deux méthodes :

Comment trouver la première cellule vide?
Méthode 1:
ActiveCell.End(xlDown)(2).Select

Méthode 2:
[A65536].Select
Selection.End(xlUp)(2).Select

Par la deuxième, on est sur d'avoir la dernière cellule vide de la colonne.

--
Salut
Michel ---- ;o)
Enlever _nospam pour me répondre

e.platet wrote:
bonsoir à tous.



pouvez vous me dire comment réaliser une petite macro qui dans mon
cas me renverrai automatiquement à la dernier ligne d'une colonne.

exemple

A B C D E

1 titi rty fgh

2 toto rdf ygg

3 tutu rt tt dftg

4

5

6

donc je voudrai via un petit bouton je lance ma macro qui placerai mon
curseur par exemple en A4 etc... si je remplis jusqu'a A200 qu'il me
place en A201 voila



merci de votre aide





manu


Avatar
Clément Marcotte
Bonjour,

donc je voudrai via un petit bouton je lance ma macro qui placerai
mon

curseur par exemple en A4 etc... si je remplis jusqu'a A200 qu'il me
place

en A201 voila



Puisque, contrairement à d'autre(s) tu as eu le cerveau assez rapide
pour donner la règle.

Par exemple pour la deniereligne occupée en colonne A
Sub SurLaDerniereLigneOccupeeDeLaColonneA()
derniereligneoccupee = range("a65536").end(xup).row
premierelignevide = range("a65536").end(xup).row + 1
end sub



--
On n' apprend pas à un vieux singe à faire des grimaces