我最近写过类似的 我贴给你


%macro inst_output(ds_in=, var=dpt, line= );

proc freq data=&ds_in noprint;
  tables &var/ out=cnt&var;
run;
data _null_;
set cnt&var  nobs=N_count;
if &var ne '' then call symput( 'I_'||left(_n_), &var);
              if _n_=N_count  then call symput( 'N1', N_count);
run;
%do i=1 %to &N1;
       data cnt_&i;
         set &ds_in;
         where  &var= "&&I_&i";
    run;

PROC EXPORT DATA= USER.cnt_&i
            OUTFILE= "D:\.............."
            DBMS=EXCEL REPLACE label;
     sheet="......";
Run;
%end;

%mend;

你改改就行了

顶上去

非常感谢，我研究一下哈

参考了一下楼上输出到excel的程序，用proc sql将程序改写了一下，如下：
%repeat(cond= , table= ,out= );
proc sql;
        create table &table. as
        select *
        from origin_dataset
        where school_name=&cond.;
quit;
proc export data=...
        outfile=...
        dbms=...
        sheet=...
run;
%mend;