问题描述
我对一段代码有疑问。我需要在excel单元中转换相同的信息,然后VBA转换字符。
示例: 代码如下:
Option Explicit
Sub EliminarEspaciosCeldas()
Dim celda As Range
For Each celda In Selection
celda.Value = Trim(celda.Value)
celda.Value = StrConv(celda.Value,vbProperCase)'Here is the problem transformation
Next
End Sub
例如对字母进行了变换 我的语言是西班牙语(UTF8)
'ñ=˜ á=Á é= í=" ó=Ž ú=Ú Á É Í=› Ó Ú
谢谢!
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)