OVH Cloud OVH Cloud

Vlookup dans Workbook

3 réponses
Avatar
vswildcat
Bonjour,

J'ai un souci de syntaxe je pense dans un Vlookup :

En gros, le workbook 2 s'ouvre (le 1 étant le personal)
La macro retraite les colonnes, puis ouvre un autre fichier, dans lequel je
dois faire un Vlookup sur le workbook 2 :

ActiveCell.FormulaR1C1 = _

"=IF(ISNA(VLOOKUP(RC[-2],[workbooks(2)]Sheet1!C:F,4,0)),"""",VLOOKUP(RC[-2],[workbooks(2)]Sheet1!C:F,4,0))"

Je pense que '[workbooks(2)]Sheet1!' ne lui plait pas : soit cela n'est pas
possible d'utiliser 'worbooks'en lieu et place d'un nom de classeur
déterminé, soit il manque un point, ou un caractère spécial...

D'avance, merci pour votre aide

3 réponses

Avatar
Elliac
Bonjour,

Quand ton Workbook2 est ouvert récupère son nom :
NomFic¬tiveWorkbook.Name

Puis ta formule :
ActiveCell.FormulaR1C1 = _

"=IF(ISNA(VLOOKUP(RC[-2],[" & Windows(NomFic)
&"]Sheet1!C:F,4,0)),"""",VLOOKUP(RC[-2],[workbooks(2)]Sheet1!C:F,4,0))"

Camille

"vswildcat" wrote:

Bonjour,

J'ai un souci de syntaxe je pense dans un Vlookup :

En gros, le workbook 2 s'ouvre (le 1 étant le personal)
La macro retraite les colonnes, puis ouvre un autre fichier, dans lequel je
dois faire un Vlookup sur le workbook 2 :

ActiveCell.FormulaR1C1 = _

"=IF(ISNA(VLOOKUP(RC[-2],[workbooks(2)]Sheet1!C:F,4,0)),"""",VLOOKUP(RC[-2],[workbooks(2)]Sheet1!C:F,4,0))"

Je pense que '[workbooks(2)]Sheet1!' ne lui plait pas : soit cela n'est pas
possible d'utiliser 'worbooks'en lieu et place d'un nom de classeur
déterminé, soit il manque un point, ou un caractère spécial...

D'avance, merci pour votre aide


Avatar
JB
Bonjour,


Técupère un champ dans un classeur fermé avec Recherchev():

Sub EcritRecherchev()
ChDir ActiveWorkbook.Path ' fichier dans le même répertoire
ChampFormule = "C2:C4"
Chemin = ActiveWorkbook.Path
Fichier = Range("F2") ' nom du fichier en F2
onglet = Range("F5")
TableRecherche = "R2C4:R6C5"
Range(ChampFormule).FormulaR1C1 = _
"=VLOOKUP(RC[-1]," & "'" & Chemin & "[" & Fichier & "]" & onglet
& "'!" & TableRecherche & ",2,false)"
Range(ChampFormule).Formula = Range(ChampFormule).Value 'sup
formule
End Sub

http://cjoint.com/?cwqLevHdVC

JB

On 22 fév, 12:45, vswildcat
wrote:
Bonjour,

J'ai un souci de syntaxe je pense dans un Vlookup :

En gros, le workbook 2 s'ouvre (le 1 étant le personal)
La macro retraite les colonnes, puis ouvre un autre fichier, dans lequel je
dois faire un Vlookup sur le workbook 2 :

ActiveCell.FormulaR1C1 = _

"=IF(ISNA(VLOOKUP(RC[-2],[workbooks(2)]Sheet1!C:F,4,0)),"""",VLOOKUP(RC [-2]­,[workbooks(2)]Sheet1!C:F,4,0))"

Je pense que '[workbooks(2)]Sheet1!' ne lui plait pas : soit cela n'est p as
possible d'utiliser 'worbooks'en lieu et place d'un nom de classeur
déterminé, soit il manque un point, ou un caractère spécial...

D'avance, merci pour votre aide


Avatar
vswildcat
Bon sang mais c'est biensûr !!! :-)

Merci !! Je n'y ai même pas penser, et de toute façon je n'aurais jamais
trouvé pour le &

Merchi beaucoup :-)


Bonjour,

Quand ton Workbook2 est ouvert récupère son nom :
NomFic¬tiveWorkbook.Name

Puis ta formule :
ActiveCell.FormulaR1C1 = _

"=IF(ISNA(VLOOKUP(RC[-2],[" & Windows(NomFic)
&"]Sheet1!C:F,4,0)),"""",VLOOKUP(RC[-2],[workbooks(2)]Sheet1!C:F,4,0))"

Camille

"vswildcat" wrote:

Bonjour,

J'ai un souci de syntaxe je pense dans un Vlookup :

En gros, le workbook 2 s'ouvre (le 1 étant le personal)
La macro retraite les colonnes, puis ouvre un autre fichier, dans lequel je
dois faire un Vlookup sur le workbook 2 :

ActiveCell.FormulaR1C1 = _

"=IF(ISNA(VLOOKUP(RC[-2],[workbooks(2)]Sheet1!C:F,4,0)),"""",VLOOKUP(RC[-2],[workbooks(2)]Sheet1!C:F,4,0))"

Je pense que '[workbooks(2)]Sheet1!' ne lui plait pas : soit cela n'est pas
possible d'utiliser 'worbooks'en lieu et place d'un nom de classeur
déterminé, soit il manque un point, ou un caractère spécial...

D'avance, merci pour votre aide