Sélection d'une cellule

Bonjour,

Renvoie l'addresse de la première cellule vide
A = Range("A1").End(xlDown)(2).Address

Il y a aussi :

A = Range("A" & Range("A65536").End(xlUp)(2).Row).Address


Salutations!



"News pour Elie" <elie.chayo@libertysurf.fr> a écrit dans le message de news: cmo2h0$ag3$1@news.tiscali.fr...
Bonjour à tous
Y a-t-il une commande dans une macro qui permettre de sélectionner dans une
feuille la cellule se trouvant juste au-dessous de la dernière cellule d'un
tableau?
Pour l'instant j'écris sur cette dernière cellule le mot fin, fais une
recherche de ce mot, et sélectionne la cellule juste au-dessous, ce qui
n'est pas très automatique.
Merci de nous prodiguer votre savoir

bonjour,

voilà un exemple pour la première cellule vide de la colonne A,

Range("A" & Range("A65536").End(xlUp).Row + 1).Select

ou la cellule juste après la dernière cellule du tableau,

Range([A:IV].Find("*", [A:IV].Item(1), , , , xlPrevious).Address).Offset(1, 0).Select

isabelle

Bonjour à tous
Y a-t-il une commande dans une macro qui permettre de sélectionner dans une
feuille la cellule se trouvant juste au-dessous de la dernière cellule d'un
tableau?
Pour l'instant j'écris sur cette dernière cellule le mot fin, fais une
recherche de ce mot, et sélectionne la cellule juste au-dessous, ce qui
n'est pas très automatique.
Merci de nous prodiguer votre savoir

Bonjour,
la cellule après la dernière de la feuille :

ActiveCell.SpecialCells(xlLastCell).Offset(1, 0).Select

Denis

-----Message d'origine-----
Bonjour à tous
Y a-t-il une commande dans une macro qui permettre de
sélectionner dans une

feuille la cellule se trouvant juste au-dessous de la
dernière cellule d'un

tableau?
Pour l'instant j'écris sur cette dernière cellule le mot
fin, fais une

recherche de ce mot, et sélectionne la cellule juste au-
dessous, ce qui

n'est pas très automatique.
Merci de nous prodiguer votre savoir


.