sas批量导入一个excel文件中的sheet-经管之家官网！

2054libname XLS"D:\数据分析人员-考题\日线.xls";
NOTE: 已成功分配逻辑库引用名 XLS，如下所示:
引擎: EXCEL
物理名: D:\数据分析人员-考题\日线.xls
2055proc sql noprint;
2056select count(*) as cnt into: cnt
2057from sashelp.vtable
2058where memtype="DATA" and libname="XLS" ;
2059select memname into: memlist separated by "*"
2060from sashelp.vtable
2061where memtype="DATA" and libname="XLS" and substr(memname,10,7)^="BK2001_";
2062quit;
NOTE: “PROCEDURE SQL”所用时间（总处理时间）:
实际时间 0.01 秒
CPU 时间 0.01 秒
2063%put &memlist;
'600000$'*'600001$'*'600003$'
2064%put &cnt;
6
2065
2066%macro fileinput(file_name,file_names);
2067 data &file_name ;
2068 set xls.&file_names;
2069 run;
2070%mend fileinput;
2071
2072%macro p();
2073%do i=1 %to &cnt;
2074%put &cnt;
2075%let memname=%qsubstr(%scan(&memlist,&i,*),1,9);
2076%let memnames=%qsubstr(%scan(&memlist,&i,*),1,9)n;
2077%put &memname;
2078%put &memnames;
2079%let leg=%eval(%length(&memname)-1);
2080%let mem=%substr(&memname,1,&leg);
2081%fileinput(&memname,&memnames);
2082%end;
2083%mend p;
2084%p;
6
'600000$'
'600000$'n
ERROR: 文字中包含不匹配的引号。
ERROR: 宏 P 将终止执行。