Discussion :

[AllXS7117]

Bonjour,

J'aimerais savoir ce qui ne va pas avec ma macro export DDE-excel. Le fichier excel qui s'ouvre ne s'appelle pas "indic&nom_&ficxls..xls" (excel me dit que indic_ est introuvable) et ne se remplit pas

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
libname sorties "T:\STATS\NE\sorties";
%let nom= &sortie2;
 
%macro filename2(ficxls);
 
FILENAME sortie DDE "excel|&ficxls.!l7c1:l540c32" notab;
DATA _null_;
SET sorties.indic&nom2_&ficxls;
FILE sortie lrecl=20000;
PUT nb_D123'09'x nb_FM678'09'x recurrence1'09'x;
run;
 
%mend;
 
%macro export3();
%do a = 1 %to 12; /*scan les noms*/
%let nom2 =%scan(&nom,&a.,'-');
 
*option noXwait xsync;
Data _null_;
X start excel " T:\STATS\NE\sorties\indic_&nom2\&ficxls..xls";
RUN;
 
%filename2(recurrence1);
%end;
 
%mend;
%export3

[tdiallo]

Bonjour,

Il faut enlever les cotes de ce code:

Code :

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

1
2
3
4
5
 
option noxwait xsync;
data _null_;
	X start T:\STATS\NE\sorties\indic_&nom2\&ficxls..xls ;
run;

Aussi dans ta macro filename2 il faut rajouter un point &nom2._:

Code :

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

1
2
 
SET sorties.indic&nom2._&ficxls;

[AllXS7117]

merci pour les corrections.
&sortie2 correspond à un indicateur ventilé par rapport à une de mes variables. du coup maintenant j'ai une vingtaine de pages excel vides qui s'affichent (et me disent ne pas reconnaître le chemin).

Le fait que j'utilise &nom2 avant de le définir par la fonction scan est-il un problème ? (je crois que les macro ne sont pas procédurales contrairement au langage SAS)

[m.brahim]

Bonjour AllXS7117,
sur ta question

Code :

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

Le fait que j'utilise &nom2 avant de le définir par la fonction scan est-il un problème ?

je crois que non,
Avec l'exemple ci-dessous, j'ai réussi à ouvrir les différents fichiers Excel déclarés au préalable dans une macro variable

voici comment j'ai procedé:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
%let repertoire =alpha - beta - omega ;
%macro ouvert;
data _null_;
do i=1 to 3;
call symputx ('rep'||trim(left(i)),scan("&repertoire",trim(LEFT(i)),'-'));
end;
run;
 
OPTION noXwait xsync;
	 %do i=1 %to 3;
      X start excel "C:\indic_\indic_&&rep&i.";
 %end;
 
%mend;
 
%mend ouvert;
%ouvert;

Cordialement

[AllXS7117]

Merci à toi, c'est beaucoup plus simple et ça marche ! Le seul problème c'est que j'aimerais mettre une macro-variable déjà créée à la place des valeurs de "repertoire". Cette macro-variable correspond en fait à des tables dans lesquelles il y a quelques lignes de calculs. Et ce sont ces tables que je veux exporter vers excel.

J'ai essayé de mettre '&& avant répertoire en laissant mes valeurs telles quelles, puis de mettre %let repertoire = &macro-variable1, puis de mettre un set &macro-variable1 mais excel ne reconnait pas dans tous les cas

[m.brahim]

Voici une solution:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
data tab_1;
set sashelp.class;
run;
data tab_2;
set sashelp.class;
run;
data tab_3;
set sashelp.class;
run;
 
%let table=tab_1 - tab_2 - tab_3;
%Let fichier=alpha - beta - omega ;
%let repertoire =&fichier;
 
/*Ouverture de fichiers Excel*/
%macro ouvert;
DATA _null_;
do i=1 TO 3;
call symputx ('rep'||trim(LEFT(i)),scan("&repertoire",trim(LEFT(i)),'-'));
call symputx ('tab'||trim(LEFT(i)),scan("&table",trim(LEFT(i)),'-'));
end;
run;
 
 
OPTION noXwait xsync;
 %do i=1 %TO 3;
      X start excel "C:\indic_\indic_&&rep&i.";
 %end;
 
 %mend ouvert;
%ouvert;
 
/*Insertion des données dans les différents fichiers ouverts*/
 
option symbolgen;
%macro filename2;
 %do i=1 %TO 3;
      filename sortie dde "%bquote(EXCEL|C:\indic_\[indic_&&rep&i...xlsx]Feuil1!L1C1:L13C10)" notab ;
      data _null_;
      set &&tab&i;
      file sortie;
      put name $8. '09'x sex $8. '09'x age numx5.2 '09'x height numx5.2 '09'x weight 6. '09'x;
      run; 
 %end;
%mend;
%filename2;

[AllXS7117]

non, ça ne fonctionne pas. J'ai pourtant créé les fichiers excel avec les variables. Peut-être faut-il faire une macro-variable supplémentaire pour la localisation LC:LC dans la feuille excel, voire une macro sur l'onglet

Sur le journal j'ai

SYMBOLGEN: && est transmis à &.
SYMBOLGEN: Variable macro I traitée dans 12
SYMBOLGEN: Variable macro REP12 traitée dans var12
SYMBOLGEN: && est transmis à &.
SYMBOLGEN: Variable macro I traitée dans 12
SYMBOLGEN: Variable macro TAB12 traitée dans tab12

ERREUR : le fichier physique n'existe pas (puis le chemin excel)

180 : impossible de déterminer LINE et COLUMN
NOTE: NOSPOOL est actif. Relancer avec l'OPTION SPOOL peut permettre de trouver la LIGNE et la COLONNE où
l'erreur est intervenue

Je me demande si je ne vais pas me tourner vers une solution plus simple et revoir mes programmes du coup.

[m.brahim]

Ajouter un tempo après l'ouverture des fichiers Excel
Par exemple

Code :

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

1
2
3
DATA _NULL_ ;
CALL SLEEP(20,1) ;
RUN ;

Cordialement

[AllXS7117]

Non toujours pas. ça me fait les mêmes erreurs.
Je vais essayer une autre solution d'export avec une maquette de fichier excel