Repérer une cellule nommée

Résolu
RussellD Messages postés 60 Statut Membre -  
zebulon2503 Messages postés 1229 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous,

est-ce que quelqu'un sait comment, lorsque l'on a une cellule nommée, trouver son adresse absolue.
Par exemple j'ai une cellule nommée "TEST" sur ma feuille mais je ne connais pas sa position absolue, y-a-t il une macro qui permettrait d'avoir en sortie cette position, genre "B12" ou "G58"?

Merci d'avance pour vos réponses !

4 réponses

  1. zebulon2503 Messages postés 1229 Date d'inscription   Statut Membre Dernière intervention   110
     
    Salut

    T'es sur quoi ? Tu la trouves comment ta cellule ?
    Détailles stp :-)
    0
    1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
       
      Bonjour Russel, Zebulon

      c'est expliqué en toutes lettres dans l'aide VBA!!! : touche F1!!!
      0
  2. RussellD Messages postés 60 Statut Membre 7
     
    Bonjour à tous les deux,

    je suis sur Excel 2003, et je programme en VBA.

    Ce que je veux faire precisemment c'est trouvé l'adresse absolue d'une cellule nommée, et la réutiliser ensuite dans une macro.
    Grossièrement ce serait quelquechose comme :

    Range("test").Address = XY
    Range("A1").Value = Range("XY").Value


    XY étant quelquechose comme B3, G45, N71...
    Mais voila je n'arrive pas à le faire...

    Michel : j'ai déjà regardé l'aide VBA, mais je n'ai rien trouvé qui m'interessait, à moins d'être passé à travers...

    Cordialement
    0
  3. zebulon2503 Messages postés 1229 Date d'inscription   Statut Membre Dernière intervention   110
     
    Salut

    Alors, voici un bout de code permettant de trouver une valeur précise dans ton tableau, puis d'enregistrer la position de la valeur.
    Après ce que t'en fait, je sais pas :-)

    Sub Trouver()
      Cells.Select ' selection de toutes les cellules
      Selection.Find(What:="Test").Activate 'fonction recherche dans la selection (la valeur que je cherche est "Test"
      Ligne=ActiveCell.Row 'enregistrement de la ligne de la cellule repondant aux criteres de recherche dans une variable
      Colonne=Activecell.Column 'enregistrement de la colonne dans une variable
      Set Coord=Worksheets("Feuil1").Cells(Ligne,Colonne) 'definition d'un set correspondant aux coordonnees de la cellule
      MsgBox Coord.Address() 'renvoi d'une boite de dialogue avec les coordonnees (format &E&33 par exemple)
    End Sub
    


    Ca te va ? Si t'as des questions, hésites pas :-)
    0
  4. RussellD Messages postés 60 Statut Membre 7
     
    Oui genial, merci beaucoup.

    Je l'ai legerement adapté à mon besoin, mais cela m'a été d'une grande aide, merci !

    Cordialement
    0
    1. zebulon2503 Messages postés 1229 Date d'inscription   Statut Membre Dernière intervention   110
       
      de rien :-)
      0