Export table SAS sous Excel avec noms des libellés [Résolu]

[ash_rmy]

Bonsoir tout le monde,

Savez vous comment exporter une table SAS sous Excel en conservant les noms des libellés ?

Merci d'avance.

ash_rmy.

[bahraoui]

Bonjour,

Je ne pense pas que c'est faisable avec la proc export (d'après mes connaisssances).
Je te propose de créer un fichier CSV en utilisant une étape data, ce qui te permettra de mettre les libelles comme nom de variables.
Après tu ouvres le fichier CSV sous Excel est tu l'enregistre sous format Excel.
Ce code est extrait du help SAS.

Code :

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
47
48
 
  /**********************************************************************
48    *   PRODUCT:   SAS
49    *   VERSION:   9.00
50    *   CREATOR:   External File Interface
51    *   DATE:      07FEB02
52    *   DESC:      Generated SAS Datastep Code
53    *   TEMPLATE SOURCE:  (None Specified.)
54    ***********************************************************************/
55       DATA _null_;
56       SET  SASHELP.CLASS                                end=EFIEOD;
57       %let _EFIERR_ = 0; /* set the ERROR detection macro variable */
58       %let _EFIREC_ = 0;     /* clear export record count macro variable */
59       file 'c:\myfiles\class' delimiter='&' DSD DROPOVER
59 ! lrecl=32767;
60          format Name $8. ;
61          format Sex $1. ;
62          format Age best12. ;
63          format Height best12. ;
64          format Weight best12. ;
65       IF _n_ = 1 then        /* write column names */
66        do;
67          put
68          'Name'
69          '&'
70          'Sex'
71          '&'
72          'Age'
73          '&'
74          'Height'
75          '&'
76          'Weight'
77          ;
78        end;
79        do;
80          EFIOUT + 1;
81          put Name $ @;
82          put Sex $ @;
83          put Age @;
84          put Height @;
85          put Weight ;
86          ;
87        end;
88       IF _ERROR_ then call symput('_EFIERR_',1);  /* set ERROR detection
88 ! macro variable */
89       IF EFIEOD then
90          call symput('_EFIREC_',EFIOUT);
91       run;

[ash_rmy]

merci bahraoui !

voici un autre code (plus simple) que j'ai trouvé sur le net :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
DATA GOT (LABEL = 'GOT DATA') ;
LABEL A = 'VAR A'
      Z = 'VAR Z';
INPUT A Z;
CARDS;
1 2
3 4
;
RUN;
 
%LET WHATMONTH = %SYSFUNC(MONTH(%SYSFUNC(TODAY())),MONNAME3);
%PUT &WHATMONTH.; 
 
DATA _NULL_;
  NEWNAME = CATT('EXTRACTION_ACE'," &WHATMONTH.",".XLS",' ');
  CALL SYMPUT('XLS_NAME',TRIM(NEWNAME));
  PUT NEWNAME;
RUN; 
 
PROC DBLOAD DBMS = XLS DATA = GOT;
  PATH = "C:\DOCUMENTS AND SETTINGS\A\MES DOCUMENTS\NOUVEAU DOSSIER (2)\&XLS_NAME";
  PUTNAMES = YES;
  LABEL; RESET ALL; LIMIT = 0; LOAD;
RUN;

ash_rmy.