Problème de recherche v
Bonjour
J'essaye d'automatiser et de rendre paramétrable un recherchev qui va chercher des données dans un autre fichier sur mon c: :
Ma macro plante ...
Dans ma macro sans généralisation cela marche. J'avais:
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[1],'c::\[Mes données.xls]liste'!R1C12:R65536C15,4,0)"
En généralisant
c:\ par la variable "chemin"
"Mes données.xls" par une variable "Fichier"
cela faisait pour moi...
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[1]," '" & chemin & "[" & Fichier & "]" & "liste" & "'" & "!"R1C12:R65536C15,4,0)"
Mais cela ne marche pas...
Si quelqu'un pouvait m'aider ce serait sympa.
D'avance merci
Bibi
Salut
Sans chercher bien loin petite erreur de syntaxe ?
"=VLOOKUP(RC[1],'c::\[Mes données.xls]liste'!R1C12:R65536C15,4,0)"
"=VLOOKUP(RC[1]," '" & chemin & "[" & Fichier & "]" & "liste" & "'" & "!"R1C12:R65536C15,4,0)"
Sans doute à enlever
Sinon astuce perso, je fabrique ma chaine avant de l'imbriquer dans un active........
A voir
Je me doute qu'il y a une erreur de syntaxe qq part mais je vois vraiment pas ou....
Désolé, peut-être pas trop visible
Regarde mon petit caractère rouge dans la deuxième ligne de formule le " entre le ! et le R
Je l'avais pris en compte....
Du coup j'ai suivi ton conseil j'ai fais les choses en dehors de l'active cell et cela marche mais il ne ecrit betement formule!
Formule = "'" & chemin & "[" & Fichier & "]" & "liste" & "'" & "!"
msgbox (Formule)
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[1],FormuleR1C12:R65536C15,4,0)"
Plus dans ce style là
dim maformule as string
maformule = "=VLOOKUP(RC[1], '" & chemin & "[" & Fichier & "]" & "liste" & "'" & "!R1C12:R65536C15,4,0)"
ActiveCell.FormulaR1C1 = maformuleOn avait encore une petite erreur de syntaxe après VLOOKUP(RC[1],
Du coup
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[1]," '" & chemin & "[" & Fichier & "]" & "liste" & "'" & "!"R1C12:R65536C15,4,0)"
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[1], '" & chemin & "[" & Fichier & "]" & "liste'" & "!R1C12:R65536C15,4,0)"
A plus