[VBA] rechercheV qui ne fonctionne pas...

[bdx-77]

Bonjour,

Je viens vers vous car j'ai un petit soucis d'une ligne, qui m'empêche de continuer...

Je cherche a faire, en VBA, une recherche verticale dans un tableau... sauf qu'il ne veut pas me prendre le tableau...

' Recherche verticale pour connaitre les types à cocher
    contenuCelluleCode = Range("I8").Value
    codeInterExtrait = Right(contenuCelluleCode, 2)

    rechercheVerticale = recherchev(codeInterExtrait, Paramètres!D39:I51, 6)

Il me mets la dernière ligne en rouge !!

Merci par avance !!!
Vincent

 

[jeanpierre]

Re : [VBA] rechercheV qui ne fonctionne pas...

Bonjour Vincent,

VBA ne cause pas la france, essaie en remplaçant recherchev par VlookUp soit :

rechercheVerticale = Vlookup(codeInterExtrait, Paramètres!D39:I51, 6)

Bonne journée.

Jean-Pierre

 

[bdx-77]

Re : [VBA] rechercheV qui ne fonctionne pas...

Bonjour Jean-Pierre !

Merci pour ta réponse !
Là où est mon soucis c'est que quelque soit la langue, ca ne fonctionne pas... toujours cette erreur avec le ":"...

Je continue mes recherches... Bizarre quand même...

Vincent

 

[Pierrot93]

Re : [VBA] rechercheV qui ne fonctionne pas...

Bonjour Vincent, Jean-Pierre

pas sûr d'avoir tout compris et sans exemple concret.... regarde tout de même le code ci-dessous si il peut t'aider....

Dim x As Variant, y As String, z As Range
y = Range("A1").Value 'valeur à chercher
Set z = Sheets("NomFeuille").Range("B1:C25") 'plage où chercher
x = Application.VLookup(y, z, 2, 0) 'pour renvoyer la valeur en colonne 2 de la matrice

bon après midi
@+

 

[bdx-77]

Re : [VBA] rechercheV qui ne fonctionne pas...

Bonjour !

Même en utilisant cette solution, il me bloque sur cette ligne:

Application.VLookup(codeInterExtrait, z, 6, 0)

Erreur de Compilation...

Vinc'

 

[Pierrot93]

Re : [VBA] rechercheV qui ne fonctionne pas...

Re,

sans voir comment sont initialisées les variables, difficile à dire... mets le code complet dans un tout petit fichier représentant bien le problème posé.... car là en l'état....

@+