Vérifier dans une macro si une valeur déterminée se trouve dans un tableau

[Magic_Doctor]

Bonsoir à tous,

Je voudrais, au moyen d'une macro savoir si une certaine valeur, par exemple "zaza" se trouve dans une colonne d'un tableau.

Merci de vous lire.

 

[skoobi]

Re : Vérifier dans une macro si une valeur déterminée se trouve dans un tableau

Bonsoir,

parles-tu d'un tableau excel ou d'un tableau de variable VBA?

 

[Magic_Doctor]

Re : Vérifier dans une macro si une valeur déterminée se trouve dans un tableau

Bonsoir Skoobi,

Je parle d'un tableau Excel. Je voudrais que la macro analyse son contenu et vérifie si une certaine valeur s'y trouve.

Merci

 

[skoobi]

Re : Vérifier dans une macro si une valeur déterminée se trouve dans un tableau

Bonsoir,

voici un exemple à adapter à ton cas:

Columns("E:E").Find("zaza", LookIn:=xlValues).Select

tu trouveras les autres options de "Find" dans l'aide si besoin (correspond à Edition - Rechercher).

Edit:

ou ceci si la recherche ne donne rien:

Set trouve = Columns("E:E").Find("zaza", LookIn:=xlValues)
If Not trouve Is Nothing Then
    trouve.Select
Else: MsgBox "Recherche infructueuse."
End If

 

[Magic_Doctor]

Re : Vérifier dans une macro si une valeur déterminée se trouve dans un tableau

Malheureusement ta routine ne fonctionne pas, un message d'erreur me signale que les types ne coincident pas (err. 13)

 

[skoobi]

Re : Vérifier dans une macro si une valeur déterminée se trouve dans un tableau

Re bonjour,

Sans voir ta macro c'est difficile de t'aider plus....

 

[Magic_Doctor]

Re : Vérifier dans une macro si une valeur déterminée se trouve dans un tableau

Bonjour skoobi, je t'adresse ma macro

Bonne journée

 

[bqtr]

Re : Vérifier dans une macro si une valeur déterminée se trouve dans un tableau

Bonjour Magic_Doctor, skoobi

La macro corrigée :

Sub test()

Dim Recherche As Range, MaValeur As String

MaValeur = "Julie"
With Sheets("Feuil1")
 Set Recherche = .Range("ColonneJamaisContente").Find(MaValeur, LookIn:=xlValues, LookAt:=xlPart)
  If Not Recherche Is Nothing Then
      MsgBox "Trouvé à l'adresse " & Recherche.Address
  End If
End With
End Sub

Tu fais une recherche sur une plage nommée et non une colonne.

Bonne journée

 

[Magic_Doctor]

Re : Vérifier dans une macro si une valeur déterminée se trouve dans un tableau

Merci bqtr,

Maintenant ça marche !!

Bonne journée