Transfert AS400 vers Excel

[famu]

Bonjour,
Je souhaite modifier une macro VBA (qui fonctionne très bien) en y mettant une variable.
Tout se déroule sans problème sauf à ce stade :

Code initial: celui qui va bien

Print #fn, "del c:\temp\GPOMST.dwl"
Print #fn, "rtopcb c:\temp\GPOMST.tto"
Print #fn, "del c:\temp\GPOMST.tto"
Print #fn, "exit"
Close #fn

Code avec Variable: celui qui ne va pas !

VariableDirectory= "c:\temp"

Print #fn, "del VariableDirectory &'\GPOMST.dwl'"
Print #fn, "rtopcb VariableDirectory &'\GPOMST.tto'"
Print #fn, "del VariableDirectory &'\GPOMST.tto'"
Print #fn, "exit"
Close #fn

Je pense que c'est un problèlme de " " ou de ' ' ou de ??? J'ai tout essayé...
Merci pour votre aide,
Famu.

 

[Paf]

Re : Transfert AS400 vers Excel

bonjour

peut-être

Print #fn, "del " & VariableDirectory & "\GPOMST.dwl"
....

A+

 

[famu]

Re : Transfert AS400 vers Excel

Bonjour et merci Paf.
J'avais déjà essayé cette option. J'avais d'ailleurs commencé par celle-ci.
Mais non...ça ne va pas.

 

[Paf]

Re : Transfert AS400 vers Excel

Re

Pourtant, si l'on écrit dans un fichier texte,les instructions

Print #fn, "del c:\temp\GPOMST.dwl"

et

VariableDirectory= "c:\temp"
Print #fn, "del " & VariableDirectory & "\GPOMST.dwl"

donnent le même résultat ?

A+

 

[famu]

Re : Transfert AS400 vers Excel - RESOLU

C'est tout bon. Il fallait mettre un espace après : del et rtopcb (Peut-être ce que tu m'avais proposé mais je ne l'avais pas vu)

Print #fn, "del " & VariableDirectory & "\GPOMST.dwl"
Print #fn, "rtopcb " & VariableDirectory & "\GPOMST.tto"
Print #fn, "del " & VariableDirectory & "\GPOMST.tto"
Print #fn, "exit"
Close #fn

J'avais testé ceci : (et ça, ça ne va pas)

Print #fn, "del" & VariableDirectory & "\GPOMST.dwl"
Print #fn, "rtopcb" & VariableDirectory & "\GPOMST.tto"
Print #fn, "del" & VariableDirectory & "\GPOMST.tto"
Print #fn, "exit"
Close #fn

Un grand merci.