Récupérer coordonnées

[Arapao]

Bonjour le forum,

Je cherche comment récupérer les coordonnées d'une cellule apres une recherche.

un exemple serait surement plus explicite:


voici ma recherche:


With Worksheets('6 EME').Range('a2:gt2')
Set c = .Find(Sheets('Proposition').Range('d4').Text, LookIn:=xlValue)
If Not c Is Nothing Then
firstaddress = c.Address
c.Select
End If

le résultat me donne la cellule $a$62.

Comment faire pour ne récupérer que le a ou le 62 de la cellule.

Merci beaucoup

 

[michel_m]

Bonjour,

Pour avoir le n° de ligne utilise la propriété Row et pour les n)de colonne 'column'

si ta cellule active est en B4 par exemple

activecell.row renvoie 4 et activecell.column renvoie 2

Michel

 

[Arapao]

Merci beaucoup Michel

 

[Arapao]

Merci beaucoup Michel

 

[arapao]

Maintenant que j'ai recupere les coordonées, comment les reutilisées?


ex: 1 recherche => résultat $a$62
2 recherche => résultat $g$1


comment séléctionner la cellule g 62

Merci

 

[Hellboy]

Bonjour arapao, michel_m

Lorsque que l'on obtien en nombre le numéro de la colonne et de la ligne ex: ligne = selection.row & colonne = selection.column, pour pouvoir réutiliser ses valeur on utilise la commande:
Cells(ligne,colonne).select

A remarquer, que Cells inverse la colonne et la ligne si on compare avec une commande équivalente de Range(Colonne,Ligne)


Pas assez rapide sur la gachette

Message édité par: Hellboy, à: 23/06/2005 13:47

 

[arapao]

un grand merci,

ca fonctionne parfaitement

bonne journée