VBA思路和方法

hejia-690403732

原始数据                                                                           效果
3[abc]2[b]                                                           abcabcabcbb
3[2[ac]2[bd]]                                                           acacbdbdacacbdbdacacbdbd
2[1[a]3[b]2[3[c]4[d]]]4[e]                                           abbbcccddddcccddddabbbcccddddcccddddeeee
请求各位大神给予解决这个问题的思路以及方法，谢谢

LIUZHU

这个不好弄地方在于存在嵌套

zhangmi

应该是用递归吧，但具体写法还是挺麻烦

pc087

hejia-690403732

pc087 发表于 2022-7-4 16:46

感谢大神  我会仔细研究的  非常感谢

hejia-690403732

pc087 发表于 2022-7-4 16:46

大神好  很感谢您的帮助   结果不对的。看3个原始数据得出的  3各效果，里面涉及到[]的嵌套个数

pc087

代码文件。。。。

看见星光

这个对JSA来说是比较简单的，就两句代码的事：

LIUZHU

JSA的，试试。

1. function REPT_STRING(rng){
   
2.         let abc=rng.Value2;
   
3.         //反向查找
   
4.         for (let i=abc.length-1;i>=0;i--){
   
5.                 //正向查找
   
6.                 if (abc[i]=="["){
   
7.                         let k=abc[i-1];
   
8.                         for (let j=i+1;j<abc.length;j++){
   
9.                                 if (abc[j]=="]"){
   
10.                                         let startstr=abc.substr(0,i-1);
    
11.                                         let endstr=abc.substr(j+1,abc.length-j-1);
    
12.                                         let repstr=abc.substr(i+1,j-1-i).repeat(k);
    
13.                                         abc=startstr + repstr + endstr;
    
14.                                         break;
    
15.                                 }
    
16.                         }
    
17.                 }
    
18.         }
    
19.         return abc;
    
20. }

复制代码

LIUZHU

附件在此，请测试，写的function，可以单元格中直接使用。
需要使用WPS，Excel不能使用。