Discussion :

[Caroline31110]

Bonjour à tous!
Voilà, je souhaite ouvrir un document .rtf en utilisant l'instruction filename DDE afin d'enregistrer ce fichier en .txt. En fait, je souhaite automatiser cette action et ne pas être obligé d'ouvrir Word et d'enregistrer sous l'extension .txt
Le problème est que lorsque je soumets le code (plus bas), ma session SAS plante et je ne sais pas pourquoi...
Le %sysfunc ouvre bien word, mais dès que je lance l'étape data, ça plante...
Y aurait-il quelqu'un qui ait déjà rencontré ce problème?
Merci pour votre aide
Caroline

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
options noxwait noxsync;
%let rc=%sysfunc(system(start winword));
filename word DDE 'Winword|"C:\tmp\Test_CLE.doc"';
data _null_;
 file word;
 
 put '[FileOpen.Name = "' "C:\tmp\Test_CLE.doc" '"]';
 put "[FileSaveAs"
   ".Name=""C:\tmp\Test_CLE.txt"", "
   ".Format=2, "
   ".AddToMru=1]";
 put '[FileClose]';
run;

[RemiBousquet]

Je suis plutôt familier avec les liens dde vers Excel, mais je px essayer de t'aider.

1- As tu essayé en lancant seulement une commande de ton étape data ?
Le problème avec le dde c'est l'absence de message clair d'erreur. Il faut donc procéder pas à pas pour débugger.

2- Pour faire des commandes Word (ouvrir, sauvegarder, fermet, etc.), il faut sûrement définir un filename "générique" du type :

Code :

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

1
2
3
4
5
filename sys dde "winword|system"; 
data _null_;
file word;
put '[FileOpen.Name = "' "C:\tmp\Test_CLE.doc" '"]';
run ;

Les filenames où tu donnent le nom de fichier + l'emplacement dans le fichier (des signets je crois avec word) sont à réserver pour l'échange de données (import ou export)

3- Pour la gestion des "simples & doubles quotes", il est préférable d'utiliser les "doubles et doubles-doubles quotes" :

Code :

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

put "[FileOpen.Name = ""C:\tmp\Test_CLE.doc""]";

D'une part, c'est plus lisible à l'usage,
D'autre part, et c'est important, ça permet d'utiliser les macro-variables

Code :

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

put "[FileOpen.Name = ""&nom_repertoire.\&nom_fichier..doc""]";