VBA:使用韩文/法文的Excel(.xlxs)文件的换行符和回车符

我在Excel文件(2010年美国版和.xlxs扩展名)中替换换行符和回车符时遇到了一些麻烦。

以前,我已经编写了一个宏,可以在带有以下代码的英文常规Excel文件上成功完成此操作。

newStr = Replace(originalStr, newline/carriage return/both, replacementStr)

Newline/carriage return/both would be vbNewLine (Chr(10)), vbCr (Chr(13)), or vbCrLf, respectively.

I now have an Excel file with Koreans and French in it, and the newline and CR characters seem to be something else. How do I go about finding what they actually are, in terms of Chr()) or some VBA constant, and replace these characters? I need to remove all of the newlines and replace with
.

0
额外 编辑
意见: 1

1 答案

你可以选择一个相关的单元格并检查包含的字符,如下所示:

s = Sheets("Sheet3").[e2]

For i = 1 To Len(s)
    If Asc(Mid(s, i, 1)) < 32 Then
        Debug.Print Asc(Mid(s, i, 1)); " -- "; i
    End If
Next
0
额外
嗯哇..这很奇怪。使用 Replace()Chr(10)现在可以工作。我发誓它昨天没有工作,我也无法赶上PHP的换行符!我想知道是否将语言从美国英语改为韩语,然后回到美国有所作为?我注意到我创建的一些Excel表格的列宽全部改变了。
额外 作者 musicliftsme,
根据最近的研究,在73.231%的案例中,报告问题消失了:)
额外 作者 Fionnuala,