Récupérer adresse d'une cellule en vba excel

japytou Messages postés 11 Date d'inscription lundi 19 novembre 2007 Statut Membre Dernière intervention 25 janvier 2011 - 26 déc. 2007 à 14:59
japytou Messages postés 11 Date d'inscription lundi 19 novembre 2007 Statut Membre Dernière intervention 25 janvier 2011 - 27 déc. 2007 à 03:28
Bonjour,

je suis nouveau dans la programme en vba excel.

Je sais stocker une adresse de cellule dans une autre cellule excel, cette adresse est du style $x$y

Or je voudrais récupérer cette adresse dans une variable (jusque là, j'y arrive). Mais quand avec cette adresse je veux atteindre la cellule $x$y avec l'instruction range, je n'y arrive pas. Comment faire ?

merci de votre réponse

JP

2 réponses

japytou Messages postés 11 Date d'inscription lundi 19 novembre 2007 Statut Membre Dernière intervention 25 janvier 2011 2
27 déc. 2007 à 03:28
Bonjour,

et merci pour la réponse, finalement j'y suis arrivé.

mon premier code me permet de stocker dans la cellule A1 les coordonnées de la cellule active, c'est :

Sub ColLigne()
Colonne = Left$(ActiveCell.Address(0, 0), (ActiveCell.Column < 27) + 2)
Ligne = ActiveCell.Row
Range("A1").Value = Colonne & Ligne
End Sub

mon second code me permet de récupérer les coordonnées de la cellule en question et de sélectionner cette dernière :

Sub atteindre()
    Range("A1").Select
    cel = ActiveCell.Value
    Range(cel).Select
End Sub

encore merci pour la réponse

JP
2