从excel转换为utf8并在VBA中返回信息的问题

问题描述

我对一段代码有疑问。我需要在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 (将#修改为@)