[發問] regexp的replace？

etybgm

[FL-clover、door、(天満春華)]返せ、かわり、○○で。[2007年、2009年]
[FL-clover,door,(天満春華)]返せ、かわり、○○で。[2007年、2009年]

如上例若限定只將第一個[]範圍的n個、取代成,  n不固定


^([^\n[]*?\[[^]]*?)、([^]]*\])
$1,$2
上面一次只能取代一個，請問要怎才能處理n個？

(?=\[*)(、)(?=[^]]*\])
這行也不對

那位大大能教一下嗎
thx

ikboy

1. Sub zz()
   
2. s = "[FL-clover、door、(天満春華)]返せ、かわり、○○で。[2007年、2009年]"
   
3. With CreateObject("vbscript.regexp")
   
4.     .Pattern = "、(?=.*?\].*?\])"
   
5.     .Global = True
   
6.     Debug.Print .Replace(s, ",")
   
7. End With
   
8. End Sub

複製代碼