Fonction Application.Match VBA

Question

Bonjour, 

J'ai un soucis avec la fonction Match de exel en VBA.

Dans une de mes fonction , je désire trouvé la ligne ou se trouve un élément de recherche 
donc j'ai utilisé la fonction approprié : 

Voici ma ligne de code : 

Dim ligne as double

ligne = Application.Match("STBS", Sheets("STBS ref").Range("G1:G100"), 0)

Je désire donc trouvé le mot STBS dans la colonne G des ligne 1 à 100.
Mais lors d'un pas a pas , arrivé sur cette ligne, rien ne se passe.... 

J'ai bien un mots STBS dans la colonne G10

Si j'affecte la valeur ligne à une case, la case prend #VALEUR...
J'ai cherché pendant longtemps sur les forum, et ça marche pour plein de gens....

Je suis sous exel 2003 Version FR
Pouvez vous m'aider ???

Configuration: Windows XP / Firefox 3.5.9

eriiic · Answer

Bonjour,

Et tu as contrôlé que la fonction dans la feuille te retournait bien le résultat ?
Il y a peut-être un espace ou autre chose qui gène...
eric

aziatedu13 · Answer

oui, en faisait CTRL + F et "STBS" je trouve bien la case G10.

De plus, dans mon code j'ai mis 

ligne = Application.Match("*"&"STBS"&"*", Sheets("STBS ref").Range("G1:G100"), 0) 

Donc les "*" en plus pour etre sur qu'il n'y a pas de caractère " parasite".
Mais aucun résultat....

Polux31 · Answer

Bonjour aziatedu13, bonjour eric,

Peut être en faisant comme ça:

ligne = Application.WorksheetFunction.Match("STBS", Sheets("STBS ref").Range("G1:G100"), 0) 

;o)

aziatedu13 · Answer

Bonjour,

Merci de vos réponse, mais rien n'y fait....toujours pas de bon résultat...
Je suis passé par une autre fonction : Range("G:G)..Find(What:="STBS", LookIn:=xlValues, LookAt _
                :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
            False, SearchFormat:=False).Rows

Celle ci me renvoie la ligne.

Dommage pour Match....

Fonction Application.Match VBA

4 réponses

Discussions similaires

Newsletters