1、多个sheet来自同一个excel的代码：
libname test excel "f:\data_model\book_data\chapt12\mul_sas.xls";
libname chapt12 'f:\data_model\book_data\chapt12';
%macro muldata(cnt);
    proc datasets lib=test nolist;
        %do i=1 %to &cnt;
            copy out=chapt12;
            select test&i;
        %end;
    quit;
%mend;
%muldata(2);

2、是多个sheet来自多个excel的代码：
filename fil "f:\data_model\book_data\chapt12\xls";
%let dir=%str(f:\data_model\book_data\chapt12\xls);
%macro test(filname);
    data w;
        length f1 8;
        stop;
    run;
    %let filrf=&filname;
    %let did=%sysfunc(dopen(&filrf));
    %let lstname=;
    %let memcount=%sysfunc(dnum(&did));
    %put &memcount;
    %if &memcount gt 0 %then %do i=1 %to &memcount;
        %let lstname=%sysfunc(dread(&did,&i));
        %put &lstname;
        PROC IMPORT OUT= w_&i
            DATAFILE= "&dir.\&lstname"
            DBMS=Excel REPLACE;
            SHEET="sheet1$";
            GETNAMES=NO;
            MIXED=NO;
            SCANTEXT=YES;
            USEDATE=YES;
            SCANTIME=YES;
        RUN;
        proc append base=w data=w_&i(where=(f1 ne .));run;
    %end;
    %let rc=%sysfunc(dclose(&did));
%mend;
%test(fil);

这2段代码引自：
姚志勇，SAS编程与数据挖掘商业案例. 2010,P221-222.