如何使用VBA从整个Excel列中删除空格？

Question

我正在尝试删除列中“A”的每个字段中的空格。这个空格位于字符串的末尾。一些字符串有3个空格，其他4.当我运行代码时，我不知道没有错误，所以我认为我有一个错误，因为在运行时什么都没发生。

<%@ ServiceHost Language="C#" Debug="true" Service="XXX.Web.Svc.XXX" CodeBehind="XXX.svc.cs" %>

Answer 1

目前你实际上并没有在循环中更新单元格，只是;

result = Replace(Cells(i, "A"), " ", "")

你应该：

Cells(i, "A") = Replace(Cells(i, "A"), " ", "")

或更好

Cells(i, "A") = rtrim$(Cells(i, "A"))

将删除所有正确的空格。您也可以删除if检查。