SAS好像有个专门存储工作表中变量名的表vtable，不知是否可以利用下
1# vieri32

网上找来的

options macrogen mprint mlogic;
%macro rename(lib,dsn);
options pageno=1 nodate;
proc contents data=&lib..&dsn;
title "Before Renaming All Variables";
run;
proc sql noprint;
  select nvar into :num_vars
from dictionary.tables
where libname="&LIB" and
        memname="&DSN";
  select distinct(name) into :var1-
:var%TRIM(%LEFT(&num_vars))
  from dictionary.columns
where libname="&LIB" and
        memname="&DSN";
quit;
run;
proc datasets library=&LIB;
   modify &DSN;
rename
  %do i=1 %to &num_vars;
&&var&i=NEWNAME_&&var&i.
  %end;
;
quit;
run;
options pageno=1 nodate;
proc contents data=&lib..&dsn;
title "After Renaming All Variables";
run;
%mend rename;
%rename(WORK,ONE)

3# ntsean
这么复杂啊...

这是macro，你只需要代入你的东西就可以了

就是最后一行括号里面把work改为你的library name, one改为你的dataset

还有一个地方就是里面 一个 NEWNAME 改为你的新name，应该是 open
然后run macro就可以了

嗯....十分感謝您....

雖然我只是部分變量要改....不過這個MACRO太有用了...謝謝!