用VBA替换特殊字符

时间:2016-11-21 10:03:40

标签: vba special-characters

我正在尝试使用VBA从Excel文件中替换罗马尼亚字符(例如“şţŞŢ”),但我无法理解。

在VBA编辑器中,如果我尝试输入“ş”或“ţ”,则将其替换为“?”。为什么???

我甚至试过了一种不同的方法:

<div ng-repeat="x in userdata">
      <item data="y" ng-repeat="y in x.content"></item>
    </div>

但绝对没有... 请帮忙。

1 个答案:

答案 0 :(得分:2)

我刚尝试了一个快速的解决方案,其中包含ascii代码351.所以可以用

来描述
ChrW(351)

所以这是我的代码:

Sub replance()

Dim rng As Range

Set rng = Worksheets(1).Columns("A:G")

rng.Replace What:=ChrW(351), Replacement:="s", SearchOrder:=xlByColumns, MatchCase:=True

End Sub