Discussion :

[zebi42]

Bonjour,

J'essaie de récupérer l'adresse de la dernière cellule d'une feuille excel avec le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
ActiveCell.SpecialCells(xlLastCell).Select
    Range(ActiveCell).Select
    adresse = ActiveCell.adress

Bien sûr cela ne fonctionne pas , mais le ne vois pas où est le problème.

Merci pour votre aide

[tototiti2008]

Bonjour zebi42,

tu n'es pas obligé de sélectionner la cellule, et Address prend 2 d en anglais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

adresse=ActiveCell.SpecialCells(xlLastCell).Address

[Didier Gonard]

Bonjour,

le mieux est de faire une recherche sur le forum et dans la FAQ

genre : http://www.developpez.net/forums/d91...erniere-ligne/


Dernière ligne et dernière colonne renseignées d'une feuille de calculs:
http://www.developpez.net/forums/d33...uille-calculs/


l'utilisation de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.SpecialCells(xlLastCell)

est génératrice de très mauvaises surprises, en effet elle a un effet mémoire !

sous tes données, 3 lignes plus bas, tu rempli une cellule avec toto, tu lances ta macro

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub titi()
 
Debug.Print ActiveCell.SpecialCells(xlLastCell).Address
 
End Sub

ensuite tu supprimes carrément la ligne de toto (comme ça pas de doute),
et tu relances ta macro


tu enregistre le fichier, tu fermes et tu le ré-ouvre, tu lances ta macro ... mais bizarre si on ne connaît pas.


cordialement,

Didier

[zebi42]

Merci toto....
Je n'avais pas vue cette erreur d'orthographe.

[Didier Gonard]

Bonjour,

voir ajouts de mon post de 10h19 sur les dangers de xllastcell

cordialement,

Didier