%let aaa=%nrstr((a,b,c,d,f),(d,f,w,g),(q,t,y),(e,f,e,f,g,t));
%macro test;
%do i=1 %to 4;
%put %sysfunc(compress(%scan("%sysfunc(translate(&aaa,'  ','(,'))",&i,")")));
%end;
%mend;
%test

相当好啊                                                                        
                                       
                                                     
                                                     
                                             
                                                                 
                                                                                 

非常感谢您的热心帮助，能否分别写出调用字符串以及调用字符串里字符的代码。
我的步骤是先调用字符串，然后再把字符串里面的字符当做参数赋给data或者proc步，谢谢

高手，能否先把其中的一些字符串赋给一个宏变量，再取这个字符串宏变量里面的每个字符作为单个宏变量。十分感谢。就是类似把   naaa=(a,b,c,d,f)   然后naaa1=a, naaa2=b naaa3=c naaa=d naaa=f 这样