Discussion :

[Picotman56]

Bonjour,

j'ai crée un module ou je demande par INPUTBOX de rentrer une donnée (qui est en fait le nom d'un fichier excel) a qui je donne le nom d'une variable (FICHIER).
Le résultat de la variable (le fichier excel) je voudrais la récupéré dans une formule de recherche (VLOOKUP)
J'ai fait comme ceci sauf que le resultat de la variable avec la fonction VLOOKUP est toujours FICHIER et non le résultat demandé.
Comment faire pour qu'il mette le résultat et pas le nom de la variable.
merci d'avance.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
FICHIER = InputBox("TAPER LA SOCIETE:", "DONNEE")
       If FICHIER = False Then
       Exit Sub
       End If
    MsgBox "VOUS AVER TAPER:" & FICHIER
    Range("A1").Select
    ActiveCell.FormulaR1C1 = _
        "=VLOOKUP(RC[1],FICHIER!PLANCOMPTA,2,FALSE)"
    Range("A1").Select
    Selection.Copy
    Range("A1:A2000").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    Range("A1").Select

[Invité]

Bonjour,

Il faut modifier cette ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[1]," & FICHIER & "!PLANCOMPTA,2,FALSE)"

[Picotman56]

c'est juste comme il faut
Merci encore