Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. Sub test() Dim c As Range Set c = Sheets("PARAMETRES").Range("LISTE_DES_CHAMPS").Find("toto") MsgBox c.Address End Sub Cordialement. Daniel "Alfred WALLACE" a écrit dans le message de news:
Bonjour,
dans PARAMETRES!LISTE_DES_CHAMPS
(feuille PARAMETRES zone LISTE_DES_CHAMPS) la zone est en colonne.
je recherche une valeur "toto".
comment, en VBA je peux connaitre la position de toto dans la zone ?
Merci.
José
Bonjour.
Sub test()
Dim c As Range
Set c = Sheets("PARAMETRES").Range("LISTE_DES_CHAMPS").Find("toto")
MsgBox c.Address
End Sub
Cordialement.
Daniel
"Alfred WALLACE" <jose6a@gmail.com> a écrit dans le message de news:
1155203150.713032.255490@i42g2000cwa.googlegroups.com...
Bonjour,
dans PARAMETRES!LISTE_DES_CHAMPS
(feuille PARAMETRES zone LISTE_DES_CHAMPS) la zone est en colonne.
je recherche une valeur "toto".
comment, en VBA je peux connaitre la position de toto dans la zone ?
Bonjour. Sub test() Dim c As Range Set c = Sheets("PARAMETRES").Range("LISTE_DES_CHAMPS").Find("toto") MsgBox c.Address End Sub Cordialement. Daniel "Alfred WALLACE" a écrit dans le message de news:
Bonjour,
dans PARAMETRES!LISTE_DES_CHAMPS
(feuille PARAMETRES zone LISTE_DES_CHAMPS) la zone est en colonne.
je recherche une valeur "toto".
comment, en VBA je peux connaitre la position de toto dans la zone ?
Merci.
José
Alfred WALLACE
Daniel wrote:
Bonjour. Sub test() Dim c As Range Set c = Sheets("PARAMETRES").Range("LISTE_DES_CHAMPS").Find("toto") MsgBox c.Address End Sub Cordialement. Daniel
Bonsoir Daniel, heu, non, je me suis mal expliqué, je ne recherche pas l'adresse d'une la cellule (A34 par exmple) mais plutot la place de "toto" dans la liste des autres entrées de cette plaage.
J'ai eu la réponse avec
position = Application.Match("toto", [Ma_Zone], 0)
je n'ai pas compris comment çà marche (quoique google pourra surement m'aider) mais, si "toto" est le 3eme, ben dans position, j'ai bien 3.
voilà voilou et merci à AV.
José
Daniel wrote:
Bonjour.
Sub test()
Dim c As Range
Set c = Sheets("PARAMETRES").Range("LISTE_DES_CHAMPS").Find("toto")
MsgBox c.Address
End Sub
Cordialement.
Daniel
Bonsoir Daniel, heu, non, je me suis mal expliqué, je ne recherche pas
l'adresse
d'une la cellule (A34 par exmple) mais plutot la place de "toto" dans
la liste
des autres entrées de cette plaage.
J'ai eu la réponse avec
position = Application.Match("toto", [Ma_Zone], 0)
je n'ai pas compris comment çà marche (quoique google pourra surement
m'aider)
mais, si "toto" est le 3eme, ben dans position, j'ai bien 3.
Bonjour. Sub test() Dim c As Range Set c = Sheets("PARAMETRES").Range("LISTE_DES_CHAMPS").Find("toto") MsgBox c.Address End Sub Cordialement. Daniel
Bonsoir Daniel, heu, non, je me suis mal expliqué, je ne recherche pas l'adresse d'une la cellule (A34 par exmple) mais plutot la place de "toto" dans la liste des autres entrées de cette plaage.
J'ai eu la réponse avec
position = Application.Match("toto", [Ma_Zone], 0)
je n'ai pas compris comment çà marche (quoique google pourra surement m'aider) mais, si "toto" est le 3eme, ben dans position, j'ai bien 3.