???不能完成吗？

不知你的意思是不是批量导出work library下的数据集，以下代码供你参考。

*Output the names of all datasets in work library to a dataset;
ods output members=name;
ods listing close;
proc datasets lib=work MEMTYPE=data;
quit;
ods output close;
ods listing;

*Create macro variables to save these filenames;
data _null_;
  set name end=last;
  call symput ('file'||strip(put(num,8.)),name);
  if last then call symput ('file_num',num);
run;

*Output excel files;
%macro output;
%do i= 1 %to &file_num;
proc export data=&&file&i
  outfile="c:\&&file&i..xls"
  DBMS=excel replace;
run;
%end;
%mend;

%output

嗯，是批量导出work library下的数据集，谢谢了！你的代码太及时了！