搜索并替换一个宏变量的内容

现有一个宏变量, varslist, 内容为“Model & Variable & _name_ & South_Afri & U_K_ & U_S_”。如何把里边的“_” 替换为 空格" "。多谢各位高手。

现在  %put &varslist的结果为：
Model & Variable & _name_ & South_Afri & U_K_ & U_S_

目标 %put &varslist的结果为：
Model & Variable & name & South Afri & U K & U S

1. %let varlist=Model & Variable & _name_ & South_Afri & U_K_ & U_S_;
   
2. %let var=%sysfunc(compbl(%sysfunc(translate(&varlist,' ','_'))));
   
3. %put &var;

复制代码

宏变量， varslist，里存的是一个SAS数据库里的变量的名字。如果可以通过修改数据库变量的名字实现也可以。

找到一段code。不过那个空格加不上。不过也无所谓了。

来源：http://www.sascommunity.org/wiki ... ng_Replace_Function
                                                                              
%macro strreplace(in_what, from_what, to_what);   
    %global s;
    %let s=&in_what;                                                            
    %do %while(%index(&s, &from_what) > 0);                  
        %let pos_fw = %index(&s, &from_what);
        %if &pos_fw > 0 %then %do;                                             
            %let l_str = %substr(&s, 1, %eval(&pos_fw - 1));              
            %let r_str = %substr(&s, %eval(&pos_fw + %length(&from_what)));     
            %let s=&l_str&to_what&r_str;                                       
        %end;                                                                  
    %end;                                                                       
   %let in_what= &s;                                                                          
%mend;   

%let str1=Model & Variable & _name_ & South_Afri & U_K_ & U_S_;
%let ts=%strreplace(&str1, _, );

%put &s;

看不大懂呢。呵呵。看来要好好好好的学习啊

又见牛人，未测试，但往上的2个人的思路都很有意思

这种情况用translate和tranwrd都可以～  如果想去掉多余空格，compbl函数需要用上

1. %let varlist=Model & Variable & _name_ & South_Afri & U_K_ & U_S_;
   
2. %let var=%sysfunc(tranwrd(&varlist.,_, ));
   
3. %put &var;

复制代码

处理文本的话，我比较喜欢用正则。

1. %let varlist=Model & Variable & _name_ & South_Afri & U_K_ & U_S_;
   
2. %let re=%sysfunc(prxparse(s/ *\_ */ /));
   
3. %let var=%sysfunc(prxchange(&re.,-1,&varlist.));
   
4. %put &var;

复制代码

看看