recherche d'une chaine de caractères

[moizaa]

Bonjour tout le monde,

Je suis newbie ici (en Excel avancé aussi) et suis assez impressionné par la qualité des réponses de ce forum.

Confronté à un problème et après avoir parcouru de nombreux forums, je sens qu'ici je vais trouver mon bonheur.

En fait, je cherche à trouver sur une colonne plusieurs chaines de caracteres, et pour chacune de celles-ci, j'aimerais que me soit retourné le numéro de la ligne.

J'ai expérimenté la fonction recherchev mais ce n'est pas exactement, ce que je souhaite. Savez-vous s'il existe une fontion EXCEL ou alors comment faire en VB pour obtenir ça ?

Merci par avance.

 

[Pierrot93]

Re : recherche d'une chaine de caractères

Bonsoir Moizza

tu devrais peut être nous mettre un fichier exemple, avec le modèle de chaine de caractère à rechercher, s il est toujour le même, le nombre, la position enfin les éléments que tu as.

bonne soirée
@+

 

[moizaa]

Re : recherche d'une chaine de caractères

Vu la confidentialite du doc, je ne peux pas me permettre de le poster ici.

Mais je vais expliciter mon propos avec l'image ci-dessous.

En fait, je dois faire un tableau à partir d'un autre tableau pour générer un histogramme. Les valeurs devant être récupérées correspondent à des chaines (en C). Ces valeurs sont uniques sur la colonne et ne sont pas toujours à la même ligne (ca serait trop simple).

Le but du jeu serait serait de déterminer la ligne d'"AC" par exemple, afin que je puisse récupérer les 150 euros et les inclure dans une somme. Et ce, plusieurs fois !!!

J'espère que c'est plus clair....

 

[Philippe]

Re : recherche d'une chaine de caractères

Bonsoir Moizaa,

tu peux essayer celà:

Tu tapes en A1 par exemple la chaine que tu cherches, "AC" dans ton exemple, tu as bien dit que cette valeur n'était présente qu'une seule fois par colonne ?

sub macro ()
for x = 1 to z ' z représente la dernière ligne de ton tableau
if cells(x,col)=range("A1") then 'col est la colonne (en chiffre,pas en
' lettre !!, ici 3) que tu désires explorer
lig=x
exit for
end if
next

valeur=cells(lig,col).offset(0,1) 'valeur= tes 150 €
end sub


Si çà peux t'aider... A adapter bien sur, si possuble avec des variables pour la colonne, etc...

A+
Philippe

 

[Staple1600]

Re : recherche d'une chaine de caractères

Bonsoir

Un exemple

Sub test()
'inspiré par :[B]Ce lien n'existe plus[/B]
'code original : Masquage conditionnel de lignes
'////////////////////////////////////////////////////////////
chaine = InputBox("Saisir la valeur recherchée,svp")
For Each ligne In ActiveSheet.UsedRange.Rows
r = ligne.Row
strg = Application.Find(chaine, Cells(r, 3))
If Not (IsError(strg)) Then _
Cells(r, 4).Value = Cells(r, 3).Address
Next
End Sub

 

[Mytå]

Re : recherche d'une chaine de caractères

Salut le forum

En C3: Cx -----tes lettres
En D3: Dx -----tes montants
En F2 --------le code à recherché

En G2

=SOMMEPROD((C3: Cx=F2)*(D3: Dx))

Mytå