Renvoi des coordonnées d'une cellule

[David]

Bonjour le forum.

J'ai réalisé une recherche avec une macro.
Recherche qui se termine par la selection de la cellule recherchée: Cellule.Select

Est t'il possible de connaitre les coordonnées de cette cellule.(ligne et colonne).

Merci d'avance

 

[David]

Re

J'aimerai obtenir l'information sous la forme suivante. (ligne;colonne)

J'aimerai en fait pouvoir me déplacer par la suite.
(ligne;colonne+1)


Voila

Merci

 

[JC de Lorient]

salut David

regarde avec Cellule.Address


JC

 

[JC de Lorient]

re

un petit exemple qui te met 'moi' dnas la 5ème colonne et la même ligne que ta callule active

Sub test()
Dim a
a = ActiveCell.Offset(0, 5).Address
Range(a) = 'moi'
End Sub


JC

 

[David]

Merci JC de Lorient

Ton code me permet de faire exactement ce que je voulais.

Sub test()
Dim a
a = ActiveCell.Offset(0, 5).Address
Range(a) = 'moi'
End Sub


David