[E-02] utiliser une variable récupérée par inputbox
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:
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 |
