Excel导入到SAS从第15列到188列第3行到4798行快速查找空值并删除左移导出到一个新的Excel的SAS代码

/* 读取Excel文件 */ proc import datafile="C:\data\example.xlsx" out=mydata dbms=excel replace; sheet="Sheet1"; getnames=yes; run;

/* 选择第15列到188列，第3行到4798行的数据 */ data mydata_subset; set mydata (firstobs=3 obs=4798 keep=col15-col188); run;

/* 查找空值并删除左移 / data mydata_clean; set mydata_subset; array cols[] col15-col188; do i=1 to dim(cols); if cols[i] = . then do; cols[i] = cols[i+1]; cols[i+1] = .; end; end; drop i; run;

/* 导出到新的Excel文件 */ proc export data=mydata_clean outfile="C:\data\new_example.xlsx" dbms=excel replace; sheet="Sheet1"; run;