string - VBA: 文字列を分割して変更する

Question

次の文字列などを変更する必要があります153,154,155,156

に153**,**154**,**155**,**156

だから,に**,**

VBAでそれを行うにはどうすればよいですか？

Answer 1

良くはありませんが、異なります：

Sub SplitJoin()

    Debug.Print Join(Split("153,154,155,156", ","), "**,**")

End Sub

Answer 2

これを試して：

Dim s as String
s = "153,154,155,156"
s = Replace(s, ",", "**,**")