Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Vlookup - erreur de syntaxe dans un chemin repertoire

Vlookup - erreur de syntaxe dans un chemin repertoire

14 réponses
Avatar
Jmfr45000
Bonjour,
J'ai une erreur de syntaxe dans l'argument 2 de la fonction vlookup.
Je veux effectuer une recherche dans une plage situee dans un classeur
different que celui que j'utilise.
Votre aide sera precieuse. Merci d'avance .
Voici le code :

Chemin = Range("C:\Documents and Settings\XXXX\Desktop\BUDGET 2009")
Fichier = Range("CSS 2009.XLS")
Onglet = Range("Base")
TableRecherche = "R0C0:R80C1"
ChampFormule = "C6:C54"

Range(ChampFormule).Formula =
"=vlookup(R[0]C[-1],"&""&Chemin&\"["&Fichier&"]"&Onglet&"!"&TableRecherche&",
2, False)"
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2
Avatar
Jmfr45000
Bonjour ,
Merci pour votre aide qui se revel chaque fois fructueuse.
Le fichier dans lequel s'effectue la recherche ne doit etre obligatoirement
ouvert.
Nous avons le choix . Votre correction fonctionne tres bien. La boite de
dialogue s'affiche pour demande le nom du fichier mais si j'insere le chemin
alors de nouveau j'ai une erreur 13 pendant l'execution de VBA

Range(ChampFormule).FormulaR1C1 = "=vlookup(R[0]C[-1], & Chemin & " " '["
& Fichier & "]" & Onglet & "'!" & TableRecherche & ", 2, False)"
"Pounet95" wrote:
Derniere question pourquoi utiliser des apostrophes ? ex : "'!"
simple curiosite
.......... je me suis trahi ! ;o)))

Je voulais dire que je ne suis PAS un Troll caché
Vous aurez rectifié je pense

Pounet95

"Pounet95" a écrit dans le message de
news:
> Bonsoir,
> Après la menuiserie retour sur Excel ....
> P'tite question toute bête : est-ce que le fichier dans lequel la
> recherche doit être faite est ouvert ??
> Ensuite, il manque les simple coat devant [ et après
> Mets ceci :
>
> Range(ChampFormule).FormulaR1C1 = "=vlookup(R[0]C[-1],'[" & Fichier & "]"
> & Onglet & "'!" & TableRecherche & ", 2, False)"
> Je pense que ça le fait beaucoup mieux
>
> Bonne soirée
>
> PS : suis très étonné que personne d'autre ne ce soit interressé au fil
> !!! Aurais-je été désagréable avec quelqu'un ????
> Promis juré, suis un Troll caché !
>
> Pounet95
>
> "Jmfr45000" a écrit dans le message
> de news:
>> Bonjour ,
>> Voici mon code modifie ci dessous mais toujours la meme erreur 1004.Si je
>> modifie l'argument 2 et place ma TableRecherche dans la meme feuille .
>> Vlookup fonctionne sans erreur .Le chemin,le fichier et l'onglet existent
>> au
>> bon emplacement et correctement orthographie.
>> Merci
>>
>> Range("C6").Select
>> Chemin = ("C:Documents and SettingszzzzDesktopBUDGET 2009")
>> Fichier = ("xxxx.XLS")
>> Onglet = ("Base")
>> TableRecherche = "R1C1:R80C2"
>> ChampFormule = "C6:C54"
>>
>> Range(ChampFormule).Formula = "=vlookup(R[0]C[-1]," & "" & Chemin & "["
>> &
>> Fichier & "]" & Onglet & "!" & TableRecherche & ", 2, False)"
>>
>>
>>
>> "Pounet95" wrote:
>>
>>> Bonjour,
>>> Attention dans la formule, recherchev(quoi,où,num col,faux) il faut que
>>> la
>>> zone de recherche (où en l'occurence ) aient au moins autant de colonnes
>>> que
>>> le n° indiqué, et ça ne semble pas être le cas !!!
>>>
>>> Comme 2 est indiqué, TableRecherche devrait avoir a minima 2 colonnes
>>> afin
>>> de ramener la valeur voulue
>>> Corriges et dis-nous ( au forum, bien sûr ! )
>>> Pounet95
>>>
>>>
>>>
>>> "Jmfr45000" a écrit dans le
>>> message de
>>> news:
>>> > Merci de votre aide , je n'ai plus d'erreur de compilation mais j'ai
>>> > une
>>> > erreur 1004 lie certainement a l'argument 2 indiquant le chemin de mon
>>> > fichier .
>>> > merci de votre aide
>>> >
>>> > "Pounet95" wrote:
>>> >
>>> >> Re,
>>> >>
>>> >> Les double-coat éraient mal placés
>>> >> Comme ça il n'y parait plus
>>> >> Range(ChampFormule).Formula = "=vlookup(R[0]C[-1]," & "" & Chemin &
>>> >> "["
>>> >> &
>>> >> Fichier & "]" & Onglet & "!" & TableRecherche & ", 2, False)"
>>> >>
>>> >> Pounet95
>>> >>
>>> >> "Pounet95" a écrit dans le message de
>>> >> news:%
>>> >> > Bonjour,
>>> >> > Comme ça, à la lecture je dirais que les ligne 0 et colonne O
>>> >> > n'existent
>>> >> > pas.
>>> >> > TableRecherche=Range("R1C1:R80C1")
>>> >> >
>>> >> > Pounet95
>>> >> >
>>> >> >
>>> >> > "Jmfr45000" a écrit dans le
>>> >> > message
>>> >> > de news:
>>> >> >> Bonjour,
>>> >> >> J'ai une erreur de syntaxe dans l'argument 2 de la fonction
>>> >> >> vlookup.
>>> >> >> Je veux effectuer une recherche dans une plage situee dans un
>>> >> >> classeur
>>> >> >> different que celui que j'utilise.
>>> >> >> Votre aide sera precieuse. Merci d'avance .
>>> >> >> Voici le code :
>>> >> >>
>>> >> >> Chemin = Range("C:Documents and SettingsXXXXDesktopBUDGET
>>> >> >> 2009")
>>> >> >> Fichier = Range("CSS 2009.XLS")
>>> >> >> Onglet = Range("Base")
>>> >> >> TableRecherche = "R0C0:R80C1"
>>> >> >> ChampFormule = "C6:C54"
>>> >> >>
>>> >> >> Range(ChampFormule).Formula > >>> >> >> "=vlookup(R[0]C[-1],"&""&Chemin&"["&Fichier&"]"&Onglet&"!"&TableRecherche&",
>>> >> >> 2, False)"
>>> >> >>
>>> >> >
>>> >>
>>> >>
>>>
>>>
>




Avatar
Pounet95
Bonjour,

Pourquoi les simple coat ? Ca fait partie de la syntaxe d'Excel, tout
simplement.
Pour voir comment ça se passe, le leiux est d'utiliser l'enregistreur de
macro, une première fois dans le répertoire où se trouve le fichier de
référence, puis une seconde fois en étant n'importe où sur le PC.
Ensuite comparer les 2 codes devrait donner la solution pour l'erreur 13 qui
a priori ne doit pas être inséré correctement dans la chaine.
Essaie et dis-nous ( ... au forum toujours ! )
Si le pb persiste, écris la procédure ici

POUNET95

"Jmfr45000" a écrit dans le message de
news:
Bonjour ,
Merci pour votre aide qui se revel chaque fois fructueuse.
Le fichier dans lequel s'effectue la recherche ne doit etre
obligatoirement
ouvert.
Nous avons le choix . Votre correction fonctionne tres bien. La boite de
dialogue s'affiche pour demande le nom du fichier mais si j'insere le
chemin
alors de nouveau j'ai une erreur 13 pendant l'execution de VBA

Range(ChampFormule).FormulaR1C1 = "=vlookup(R[0]C[-1], & Chemin & " "
'["
& Fichier & "]" & Onglet & "'!" & TableRecherche & ", 2, False)"
"Pounet95" wrote:
Derniere question pourquoi utiliser des apostrophes ? ex : "'!"
simple curiosite
.......... je me suis trahi ! ;o)))

Je voulais dire que je ne suis PAS un Troll caché
Vous aurez rectifié je pense

Pounet95

"Pounet95" a écrit dans le message de
news:
> Bonsoir,
> Après la menuiserie retour sur Excel ....
> P'tite question toute bête : est-ce que le fichier dans lequel la
> recherche doit être faite est ouvert ??
> Ensuite, il manque les simple coat devant [ et après
> Mets ceci :
>
> Range(ChampFormule).FormulaR1C1 = "=vlookup(R[0]C[-1],'[" & Fichier &
> "]"
> & Onglet & "'!" & TableRecherche & ", 2, False)"
> Je pense que ça le fait beaucoup mieux
>
> Bonne soirée
>
> PS : suis très étonné que personne d'autre ne ce soit interressé au fil
> !!! Aurais-je été désagréable avec quelqu'un ????
> Promis juré, suis un Troll caché !
>
> Pounet95
>
> "Jmfr45000" a écrit dans le
> message
> de news:
>> Bonjour ,
>> Voici mon code modifie ci dessous mais toujours la meme erreur 1004.Si
>> je
>> modifie l'argument 2 et place ma TableRecherche dans la meme feuille .
>> Vlookup fonctionne sans erreur .Le chemin,le fichier et l'onglet
>> existent
>> au
>> bon emplacement et correctement orthographie.
>> Merci
>>
>> Range("C6").Select
>> Chemin = ("C:Documents and SettingszzzzDesktopBUDGET 2009")
>> Fichier = ("xxxx.XLS")
>> Onglet = ("Base")
>> TableRecherche = "R1C1:R80C2"
>> ChampFormule = "C6:C54"
>>
>> Range(ChampFormule).Formula = "=vlookup(R[0]C[-1]," & "" & Chemin &
>> "["
>> &
>> Fichier & "]" & Onglet & "!" & TableRecherche & ", 2, False)"
>>
>>
>>
>> "Pounet95" wrote:
>>
>>> Bonjour,
>>> Attention dans la formule, recherchev(quoi,où,num col,faux) il faut
>>> que
>>> la
>>> zone de recherche (où en l'occurence ) aient au moins autant de
>>> colonnes
>>> que
>>> le n° indiqué, et ça ne semble pas être le cas !!!
>>>
>>> Comme 2 est indiqué, TableRecherche devrait avoir a minima 2 colonnes
>>> afin
>>> de ramener la valeur voulue
>>> Corriges et dis-nous ( au forum, bien sûr ! )
>>> Pounet95
>>>
>>>
>>>
>>> "Jmfr45000" a écrit dans le
>>> message de
>>> news:
>>> > Merci de votre aide , je n'ai plus d'erreur de compilation mais
>>> > j'ai
>>> > une
>>> > erreur 1004 lie certainement a l'argument 2 indiquant le chemin de
>>> > mon
>>> > fichier .
>>> > merci de votre aide
>>> >
>>> > "Pounet95" wrote:
>>> >
>>> >> Re,
>>> >>
>>> >> Les double-coat éraient mal placés
>>> >> Comme ça il n'y parait plus
>>> >> Range(ChampFormule).Formula = "=vlookup(R[0]C[-1]," & "" & Chemin
>>> >> &
>>> >> "["
>>> >> &
>>> >> Fichier & "]" & Onglet & "!" & TableRecherche & ", 2, False)"
>>> >>
>>> >> Pounet95
>>> >>
>>> >> "Pounet95" a écrit dans le message de
>>> >> news:%
>>> >> > Bonjour,
>>> >> > Comme ça, à la lecture je dirais que les ligne 0 et colonne O
>>> >> > n'existent
>>> >> > pas.
>>> >> > TableRecherche=Range("R1C1:R80C1")
>>> >> >
>>> >> > Pounet95
>>> >> >
>>> >> >
>>> >> > "Jmfr45000" a écrit dans
>>> >> > le
>>> >> > message
>>> >> > de news:
>>> >> >> Bonjour,
>>> >> >> J'ai une erreur de syntaxe dans l'argument 2 de la fonction
>>> >> >> vlookup.
>>> >> >> Je veux effectuer une recherche dans une plage situee dans un
>>> >> >> classeur
>>> >> >> different que celui que j'utilise.
>>> >> >> Votre aide sera precieuse. Merci d'avance .
>>> >> >> Voici le code :
>>> >> >>
>>> >> >> Chemin = Range("C:Documents and SettingsXXXXDesktopBUDGET
>>> >> >> 2009")
>>> >> >> Fichier = Range("CSS 2009.XLS")
>>> >> >> Onglet = Range("Base")
>>> >> >> TableRecherche = "R0C0:R80C1"
>>> >> >> ChampFormule = "C6:C54"
>>> >> >>
>>> >> >> Range(ChampFormule).Formula >> >>> >> >> "=vlookup(R[0]C[-1],"&""&Chemin&"["&Fichier&"]"&Onglet&"!"&TableRecherche&",
>>> >> >> 2, False)"
>>> >> >>
>>> >> >
>>> >>
>>> >>
>>>
>>>
>






Avatar
Jmfr45000
Bonjour,
J'ai enfin trouve la bonne formule et ceci grace a votre aide.

Range(ChampFormule).FormulaR1C1 ="=vlookup(R[0]C[-1],'" & Chemin & "[" &
Fichier & "]" & Onglet & "'!" & TableRecherche & ", 2, False)"

Le probleme etait l'absence de l'apostrophe en debut de l'argument 2 .
Mon probleme est resolu et merci pour votre si precieuse collaboration et le
temps passe .

Bonne journee et a peut etre a bientot sur le forum.
jm

"Pounet95" wrote:

Bonjour,

Pourquoi les simple coat ? Ca fait partie de la syntaxe d'Excel, tout
simplement.
Pour voir comment ça se passe, le leiux est d'utiliser l'enregistreur de
macro, une première fois dans le répertoire où se trouve le fichier de
référence, puis une seconde fois en étant n'importe où sur le PC.
Ensuite comparer les 2 codes devrait donner la solution pour l'erreur 13 qui
a priori ne doit pas être inséré correctement dans la chaine.
Essaie et dis-nous ( ... au forum toujours ! )
Si le pb persiste, écris la procédure ici

POUNET95

"Jmfr45000" a écrit dans le message de
news:
> Bonjour ,
> Merci pour votre aide qui se revel chaque fois fructueuse.
> Le fichier dans lequel s'effectue la recherche ne doit etre
> obligatoirement
> ouvert.
> Nous avons le choix . Votre correction fonctionne tres bien. La boite de
> dialogue s'affiche pour demande le nom du fichier mais si j'insere le
> chemin
> alors de nouveau j'ai une erreur 13 pendant l'execution de VBA
>
> Range(ChampFormule).FormulaR1C1 = "=vlookup(R[0]C[-1], & Chemin & " "
> '["
> & Fichier & "]" & Onglet & "'!" & TableRecherche & ", 2, False)"
> "Pounet95" wrote:
> Derniere question pourquoi utiliser des apostrophes ? ex : "'!"
> simple curiosite
>> .......... je me suis trahi ! ;o)))
>>
>> Je voulais dire que je ne suis PAS un Troll caché
>> Vous aurez rectifié je pense
>>
>> Pounet95
>>
>> "Pounet95" a écrit dans le message de
>> news:
>> > Bonsoir,
>> > Après la menuiserie retour sur Excel ....
>> > P'tite question toute bête : est-ce que le fichier dans lequel la
>> > recherche doit être faite est ouvert ??
>> > Ensuite, il manque les simple coat devant [ et après
>> > Mets ceci :
>> >
>> > Range(ChampFormule).FormulaR1C1 = "=vlookup(R[0]C[-1],'[" & Fichier &
>> > "]"
>> > & Onglet & "'!" & TableRecherche & ", 2, False)"
>> > Je pense que ça le fait beaucoup mieux
>> >
>> > Bonne soirée
>> >
>> > PS : suis très étonné que personne d'autre ne ce soit interressé au fil
>> > !!! Aurais-je été désagréable avec quelqu'un ????
>> > Promis juré, suis un Troll caché !
>> >
>> > Pounet95
>> >
>> > "Jmfr45000" a écrit dans le
>> > message
>> > de news:
>> >> Bonjour ,
>> >> Voici mon code modifie ci dessous mais toujours la meme erreur 1004.Si
>> >> je
>> >> modifie l'argument 2 et place ma TableRecherche dans la meme feuille .
>> >> Vlookup fonctionne sans erreur .Le chemin,le fichier et l'onglet
>> >> existent
>> >> au
>> >> bon emplacement et correctement orthographie.
>> >> Merci
>> >>
>> >> Range("C6").Select
>> >> Chemin = ("C:Documents and SettingszzzzDesktopBUDGET 2009")
>> >> Fichier = ("xxxx.XLS")
>> >> Onglet = ("Base")
>> >> TableRecherche = "R1C1:R80C2"
>> >> ChampFormule = "C6:C54"
>> >>
>> >> Range(ChampFormule).Formula = "=vlookup(R[0]C[-1]," & "" & Chemin &
>> >> "["
>> >> &
>> >> Fichier & "]" & Onglet & "!" & TableRecherche & ", 2, False)"
>> >>
>> >>
>> >>
>> >> "Pounet95" wrote:
>> >>
>> >>> Bonjour,
>> >>> Attention dans la formule, recherchev(quoi,où,num col,faux) il faut
>> >>> que
>> >>> la
>> >>> zone de recherche (où en l'occurence ) aient au moins autant de
>> >>> colonnes
>> >>> que
>> >>> le n° indiqué, et ça ne semble pas être le cas !!!
>> >>>
>> >>> Comme 2 est indiqué, TableRecherche devrait avoir a minima 2 colonnes
>> >>> afin
>> >>> de ramener la valeur voulue
>> >>> Corriges et dis-nous ( au forum, bien sûr ! )
>> >>> Pounet95
>> >>>
>> >>>
>> >>>
>> >>> "Jmfr45000" a écrit dans le
>> >>> message de
>> >>> news:
>> >>> > Merci de votre aide , je n'ai plus d'erreur de compilation mais
>> >>> > j'ai
>> >>> > une
>> >>> > erreur 1004 lie certainement a l'argument 2 indiquant le chemin de
>> >>> > mon
>> >>> > fichier .
>> >>> > merci de votre aide
>> >>> >
>> >>> > "Pounet95" wrote:
>> >>> >
>> >>> >> Re,
>> >>> >>
>> >>> >> Les double-coat éraient mal placés
>> >>> >> Comme ça il n'y parait plus
>> >>> >> Range(ChampFormule).Formula = "=vlookup(R[0]C[-1]," & "" & Chemin
>> >>> >> &
>> >>> >> "["
>> >>> >> &
>> >>> >> Fichier & "]" & Onglet & "!" & TableRecherche & ", 2, False)"
>> >>> >>
>> >>> >> Pounet95
>> >>> >>
>> >>> >> "Pounet95" a écrit dans le message de
>> >>> >> news:%
>> >>> >> > Bonjour,
>> >>> >> > Comme ça, à la lecture je dirais que les ligne 0 et colonne O
>> >>> >> > n'existent
>> >>> >> > pas.
>> >>> >> > TableRecherche=Range("R1C1:R80C1")
>> >>> >> >
>> >>> >> > Pounet95
>> >>> >> >
>> >>> >> >
>> >>> >> > "Jmfr45000" a écrit dans
>> >>> >> > le
>> >>> >> > message
>> >>> >> > de news:
>> >>> >> >> Bonjour,
>> >>> >> >> J'ai une erreur de syntaxe dans l'argument 2 de la fonction
>> >>> >> >> vlookup.
>> >>> >> >> Je veux effectuer une recherche dans une plage situee dans un
>> >>> >> >> classeur
>> >>> >> >> different que celui que j'utilise.
>> >>> >> >> Votre aide sera precieuse. Merci d'avance .
>> >>> >> >> Voici le code :
>> >>> >> >>
>> >>> >> >> Chemin = Range("C:Documents and SettingsXXXXDesktopBUDGET
>> >>> >> >> 2009")
>> >>> >> >> Fichier = Range("CSS 2009.XLS")
>> >>> >> >> Onglet = Range("Base")
>> >>> >> >> TableRecherche = "R0C0:R80C1"
>> >>> >> >> ChampFormule = "C6:C54"
>> >>> >> >>
>> >>> >> >> Range(ChampFormule).Formula > >> >>> >> >> "=vlookup(R[0]C[-1],"&""&Chemin&"["&Fichier&"]"&Onglet&"!"&TableRecherche&",
>> >>> >> >> 2, False)"
>> >>> >> >>
>> >>> >> >
>> >>> >>
>> >>> >>
>> >>>
>> >>>
>> >
>>
>>




Avatar
Pounet95
Bonjour,
Merci ................ pour le merci !
Et nul doute qu'il y a des chances de se lire sur ce "super" forum que je
pratique depuis 2004
( assidûment en tant que lecteur, plus rarement en tant que 'dépanneur' car
il y a de nombreux bénévoles hyper compétents qui y "sévissent" )
A la prochaine

Pounet95


Jmfr45000" a écrit dans le message de
news:
Bonjour,
J'ai enfin trouve la bonne formule et ceci grace a votre aide.

Range(ChampFormule).FormulaR1C1 ="=vlookup(R[0]C[-1],'" & Chemin & "[" &
Fichier & "]" & Onglet & "'!" & TableRecherche & ", 2, False)"

Le probleme etait l'absence de l'apostrophe en debut de l'argument 2 .
Mon probleme est resolu et merci pour votre si precieuse collaboration et
le
temps passe .

Bonne journee et a peut etre a bientot sur le forum.
jm

"Pounet95" wrote:

Bonjour,

Pourquoi les simple coat ? Ca fait partie de la syntaxe d'Excel, tout
simplement.
Pour voir comment ça se passe, le leiux est d'utiliser l'enregistreur de
macro, une première fois dans le répertoire où se trouve le fichier de
référence, puis une seconde fois en étant n'importe où sur le PC.
Ensuite comparer les 2 codes devrait donner la solution pour l'erreur 13
qui
a priori ne doit pas être inséré correctement dans la chaine.
Essaie et dis-nous ( ... au forum toujours ! )
Si le pb persiste, écris la procédure ici

POUNET95

"Jmfr45000" a écrit dans le message
de
news:
> Bonjour ,
> Merci pour votre aide qui se revel chaque fois fructueuse.
> Le fichier dans lequel s'effectue la recherche ne doit etre
> obligatoirement
> ouvert.
> Nous avons le choix . Votre correction fonctionne tres bien. La boite
> de
> dialogue s'affiche pour demande le nom du fichier mais si j'insere le
> chemin
> alors de nouveau j'ai une erreur 13 pendant l'execution de VBA
>
> Range(ChampFormule).FormulaR1C1 = "=vlookup(R[0]C[-1], & Chemin & " "
> '["
> & Fichier & "]" & Onglet & "'!" & TableRecherche & ", 2, False)"
> "Pounet95" wrote:
> Derniere question pourquoi utiliser des apostrophes ? ex : "'!"
> simple curiosite
>> .......... je me suis trahi ! ;o)))
>>
>> Je voulais dire que je ne suis PAS un Troll caché
>> Vous aurez rectifié je pense
>>
>> Pounet95
>>
>> "Pounet95" a écrit dans le message de
>> news:
>> > Bonsoir,
>> > Après la menuiserie retour sur Excel ....
>> > P'tite question toute bête : est-ce que le fichier dans lequel la
>> > recherche doit être faite est ouvert ??
>> > Ensuite, il manque les simple coat devant [ et après
>> > Mets ceci :
>> >
>> > Range(ChampFormule).FormulaR1C1 = "=vlookup(R[0]C[-1],'[" & Fichier
>> > &
>> > "]"
>> > & Onglet & "'!" & TableRecherche & ", 2, False)"
>> > Je pense que ça le fait beaucoup mieux
>> >
>> > Bonne soirée
>> >
>> > PS : suis très étonné que personne d'autre ne ce soit interressé au
>> > fil
>> > !!! Aurais-je été désagréable avec quelqu'un ????
>> > Promis juré, suis un Troll caché !
>> >
>> > Pounet95
>> >
>> > "Jmfr45000" a écrit dans le
>> > message
>> > de news:
>> >> Bonjour ,
>> >> Voici mon code modifie ci dessous mais toujours la meme erreur
>> >> 1004.Si
>> >> je
>> >> modifie l'argument 2 et place ma TableRecherche dans la meme
>> >> feuille .
>> >> Vlookup fonctionne sans erreur .Le chemin,le fichier et l'onglet
>> >> existent
>> >> au
>> >> bon emplacement et correctement orthographie.
>> >> Merci
>> >>
>> >> Range("C6").Select
>> >> Chemin = ("C:Documents and SettingszzzzDesktopBUDGET 2009")
>> >> Fichier = ("xxxx.XLS")
>> >> Onglet = ("Base")
>> >> TableRecherche = "R1C1:R80C2"
>> >> ChampFormule = "C6:C54"
>> >>
>> >> Range(ChampFormule).Formula = "=vlookup(R[0]C[-1]," & "" & Chemin &
>> >> "["
>> >> &
>> >> Fichier & "]" & Onglet & "!" & TableRecherche & ", 2, False)"
>> >>
>> >>
>> >>
>> >> "Pounet95" wrote:
>> >>
>> >>> Bonjour,
>> >>> Attention dans la formule, recherchev(quoi,où,num col,faux) il
>> >>> faut
>> >>> que
>> >>> la
>> >>> zone de recherche (où en l'occurence ) aient au moins autant de
>> >>> colonnes
>> >>> que
>> >>> le n° indiqué, et ça ne semble pas être le cas !!!
>> >>>
>> >>> Comme 2 est indiqué, TableRecherche devrait avoir a minima 2
>> >>> colonnes
>> >>> afin
>> >>> de ramener la valeur voulue
>> >>> Corriges et dis-nous ( au forum, bien sûr ! )
>> >>> Pounet95
>> >>>
>> >>>
>> >>>
>> >>> "Jmfr45000" a écrit dans le
>> >>> message de
>> >>> news:
>> >>> > Merci de votre aide , je n'ai plus d'erreur de compilation mais
>> >>> > j'ai
>> >>> > une
>> >>> > erreur 1004 lie certainement a l'argument 2 indiquant le chemin
>> >>> > de
>> >>> > mon
>> >>> > fichier .
>> >>> > merci de votre aide
>> >>> >
>> >>> > "Pounet95" wrote:
>> >>> >
>> >>> >> Re,
>> >>> >>
>> >>> >> Les double-coat éraient mal placés
>> >>> >> Comme ça il n'y parait plus
>> >>> >> Range(ChampFormule).Formula = "=vlookup(R[0]C[-1]," & "" &
>> >>> >> Chemin
>> >>> >> &
>> >>> >> "["
>> >>> >> &
>> >>> >> Fichier & "]" & Onglet & "!" & TableRecherche & ", 2, False)"
>> >>> >>
>> >>> >> Pounet95
>> >>> >>
>> >>> >> "Pounet95" a écrit dans le message de
>> >>> >> news:%
>> >>> >> > Bonjour,
>> >>> >> > Comme ça, à la lecture je dirais que les ligne 0 et colonne O
>> >>> >> > n'existent
>> >>> >> > pas.
>> >>> >> > TableRecherche=Range("R1C1:R80C1")
>> >>> >> >
>> >>> >> > Pounet95
>> >>> >> >
>> >>> >> >
>> >>> >> > "Jmfr45000" a écrit
>> >>> >> > dans
>> >>> >> > le
>> >>> >> > message
>> >>> >> > de news:
>> >>> >> >> Bonjour,
>> >>> >> >> J'ai une erreur de syntaxe dans l'argument 2 de la fonction
>> >>> >> >> vlookup.
>> >>> >> >> Je veux effectuer une recherche dans une plage situee dans
>> >>> >> >> un
>> >>> >> >> classeur
>> >>> >> >> different que celui que j'utilise.
>> >>> >> >> Votre aide sera precieuse. Merci d'avance .
>> >>> >> >> Voici le code :
>> >>> >> >>
>> >>> >> >> Chemin = Range("C:Documents and
>> >>> >> >> SettingsXXXXDesktopBUDGET
>> >>> >> >> 2009")
>> >>> >> >> Fichier = Range("CSS 2009.XLS")
>> >>> >> >> Onglet = Range("Base")
>> >>> >> >> TableRecherche = "R0C0:R80C1"
>> >>> >> >> ChampFormule = "C6:C54"
>> >>> >> >>
>> >>> >> >> Range(ChampFormule).Formula >> >> >>> >> >> "=vlookup(R[0]C[-1],"&""&Chemin&"["&Fichier&"]"&Onglet&"!"&TableRecherche&",
>> >>> >> >> 2, False)"
>> >>> >> >>
>> >>> >> >
>> >>> >>
>> >>> >>
>> >>>
>> >>>
>> >
>>
>>






1 2