如何在长string中每四位数字之后添加％u

我有很多很长的string，例如：

我想在每四位数后加上%u来使它成为一个合适的Unicode。 string是不同的大小。

任何人都可以帮助我的Excelfunction？

Answer 1

试试这个小UDF（） ：

 Public Function StringFixer(inpt As String) As String Dim i As Long, j As Long i = Len(inpt) - 3 For j = 1 To i Step 4 StringFixer = StringFixer & "%u" & Mid(inpt, j, 4) Next j StringFixer = Mid(StringFixer, 3) & "%u" End Function 

用A1中的数据，在A2中input：

 =StringFixer(A1) 

你的例子：

编辑＃1

要将分隔符放在每个四个字符集的开头 ，而不是每四个字符集之后，请使用此版本：

 Public Function StringFixer(inpt As String) As String Dim i As Long, j As Long i = Len(inpt) - 3 For j = 1 To i Step 4 StringFixer = StringFixer & "%u" & Mid(inpt, j, 4) Next j End Function