Discussion :

[AlexandraN78]

Bonjour bonjour !

J'ai besoin d'un peu d'aide pour un export de tables.

Ma Work contient un grand nombre de tables : ctrl_001, ctrl_002, ..., erreur_003, erreur_005, ...
J'aimerai exporter dans un ficher Excel toutes mes tables erreur_XXX, avec un onglet par table.
Petite difficulté supplémentaire (pour moi du moins), le nombre de tables à exporter peut varier d'un jour à l'autre (j'ai 10 tables erreur_XXX aujourd'hui, mais demain en relançant le programme j'en aurai peut-être moins), donc j'aimerai passer par une macro pour que le programme sache tout seul quelles tables exporter.
De plus, je souhaite conserver les labels existants sur mes variables (ce que je n'ai pas réussi à faire jusque là).

J'ai essayé avec des proc export, ods excel, ods tagsets.excelxp, mais je ne trouve rien de concluant...

Merci d'avance pour vos idées !

Alexandra

[m.brahim]

Bonjour,

Je te propose cette 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
 
 
/* 1/ Définir les tables à exporter */
 
/*Méthode 1 */
%let rep= %sysfunc(getoption(work));
 filename dir pipe "dir ""%unquote(&rep)\erreur_*"" /b";
 data tables;
 infile dir length=l;
 length table $200;
 input @;
 input @1 table $varying200. l;
 table=scan(table,1);
 run;
 
/*Méthode 2*/ 
 
proc sql noprint;
create table tables as select memname as table
from sashelp.vtable
where upcase(LIBNAME) ="WORK" and upcase(memname) like "ERREUR_%"   ;quit;
quit;
 
/*2/ Exporter les tables */
 
 %macro exportmultisheet;
 data _null_;
 set tables end=last;
 call symputx ('fic'||left(_n_),table);
 if last then call symput ('nbr',_n_);
 run;
  %do i = 1 %to &nbr;
 PROC EXPORT DATA =&&fic&i.
            OUTFILE="C:\sas\export.xls"
            DBMS= excel
			label
            REPLACE;
   sheet = "&&fic&i";
   RUN;
 %END;
 %mend exportmultisheet;
 
%exportmultisheet;

Cordialement

[AlexandraN78]

Super, c'est exactement ce que je voulais !

J'ai choisi la 2ème méthode pour la sélection de mes tables (plus simple à comprendre pour moi).

Merci beaucoup !