excel/vba fonction trouver un mot dans une plage

Marsh Posté le 08-09-2007 à 14:21:41

salut
je cherche une fonction pour trouver un mot en M1 qui se trouve dans une plage (A1:A50)

j en ai essayé des fonctions que ja i trouvé sur des sites et aucune ne me vont meme apres quelque modif
pourtant cela me parrait simple et j y arrive pas

merci pour votre aide

Marsh Posté le 08-09-2007 à 14:21:41

Marsh Posté le 08-09-2007 à 16:58:23

euh, une fonction jOre somme.si() ?
sinon ton explication est un peu limitée pour qu'on aide vriament...

Marsh Posté le 08-09-2007 à 17:45:55

Avez-vous essayé VLOOKUP ? ou RECHERCHEV (si on a une version française (j'en ai une et j'aurais aimé que le nom des fonctions ne fut pas traduit)) ?

Marsh Posté le 08-09-2007 à 20:33:16

en fait voila

sur feuille 1 j ai une liste de (nom et prenom )de A1:A55

et en M1 j ai concatener K1 et L1 sur M1

je cherche une fonction qui me dise oui j ai le nom et prenom ou non

et en M3 j ai une recherchev qui me donne le bon resulltat mais ce qui me bloque c est le #N/A

Sub controle()

If Range("M3" ) = "" Then
msgbox" le nom y est"
else
msgbox"le nom y est pas"
end if

et ca marche pas
car #N/A pose probleme en vba

merci pour votre aide

Marsh Posté le 08-09-2007 à 21:21:47

On ne peut comparer que deux choses de même nature.
Comparer tout un range et juste une valeur ne va pas.

La documentation de Microsoft donne l'exemple suivant :

' Cet exemple montre comment rechercher
' toutes les cellules de la plage A1:A500 de la première feuille de calcul
' qui contiennent la valeur 2, puis grise ces cellules.

With Worksheets(1).Range("a1:a500" )
Set c = .Find(2, lookin:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
c.Interior.Pattern = xlPatternGray50
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With

Marsh Posté le 08-09-2007 à 21:45:31

merci beaucoup ca a marche avec mes modifs

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *