%do i=1 %to 30 %by 1;
A&i=E&i;                                
%end;
这段宏其实是替换为文本
A1=E1 A2=E2......A30=E30
所以它应该写在rename和;(分号)中间
即你代码的rename A&i=E&i;中的A&i=E&i由这段宏来替代

哎，明白了，我说你的那段代码怎么后面有个分号呢，这样就对了！感谢你！

请问我这段代码，什么最后只剩下了A132 和B132了呢？谢谢！难道是do语句套用的地方不对？
%macro t;
%do i=1 %to 132 %by 1;
data b(keep=A&i B&i);
set a1;
%end;
run;
%mend t;
%t;

%macro t;
data b(keep=%do i=1 %to 132 %by 1;A&i B&i%end;);
set a1;
run;
%mend t;
%t;
嗯
记得宏只是文本替换
简单的宏完全可以人工解析出来自己看运行机制
楼上这段代码data步执行了132次，第&i次仅保留A&i和B&i变量
由于生成集都叫a
故后次覆盖前次
最后次就保留了A132和B132

明白了，很受用，太感谢你了！我真是才疏识浅啊，还需努力。

If you want to data step, it could be as simple as,

data t1;
  retain a1-a20 0;
  output;
run;

data t2;
   set t1(rename=(a1-a20=b1-b20));
run;

data t3;
   set t1;
   rename a1-a20=b1-b20;
run;

It is fine if the data set is small. The more efficient one in such a case is to use SAS utility procedure proc datasets.