excel - Trim 函数和 WorksheetFunction.Trim 不删除前导或尾随空格

Question

我从工作表中的网站复制了一些数据，注意到一些单元格除了预期值外，还包含尾随空格。

由于给我的代码带来麻烦，我想删除这些空格。我发现了一个有这个空间的特定单元格并尝试了:

Worksheets(2).Range("D17").Value = Trim(Worksheets(2).Range("D17").Value)

• 空间还在。

然后我尝试了:

Worksheets(2).Range("D17").Value = WorksheetFunction.Trim(Worksheets(2).Range("D17").Value)

• 仍然没有运气。

Replace 函数不仅去除了前导和尾随，还去除了字符串中的空格:

Worksheets(2).Range("D17").Value = Replace(Worksheets(2).Range("D17").Value," ","")

• 一些单元格包含两个词，所以这不是一个选项。

我可以检查最后一个字符是否为空格并为每个单元格删除它，但这似乎不是一个优雅的解决方案，主要问题仍然存在:为什么 Trim 函数不起作用？

Answer 1

在网上搜索了很久之后，我找到了here还有另一个空格字符，Chr(160) 的输出，出于某种原因，Trim 函数忽略了它。所以我的解决方案是首先替换所有这些“不同的”空格然后修剪值:

Worksheets(2).Range("D17").Value = Replace(Worksheets(2).Range("D17").Value, Chr(160), " ")
Worksheets(2).Range("D17").Value = Trim(Worksheets(2).Range("D17").Value)

如果您遇到类似的问题并遇到与Chr(160) 不同的“未知”字符，您可以通过隔离此字符并使用Asc 函数。