excel - 如何修剪数据字体中的空格？

Question

我想在 中修剪我的数据，column O当Column N我使用它时它可以工作function =Trim(O2)，但我需要使用 ExcelVBA代码来执行此操作。

在我运行下面的代码后，它显示的内容与我要修剪的数据Column O相同。Column N

可以帮助任何人这是我的问题。

以下是我的代码和数据

Sub TRY()
    Columns("N:N").Select
    Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove

    Dim row1 As Long

    With Worksheets("Sheet1")

        row1 = .Range("N2").End(xlDown).Row

        For i = 2 To row1
            .Cells(i, "N").Value = Trim(.Cells(i, "O").Value)
        Next i
    End With
End Sub

标签： excelvba

Answer 1

代替：

.Cells(i, "N").Value = Trim(.Cells(i, "O").Value)

和：

.Cells(i, "N").Value = LTrim(.Cells(i, "O").Value)

这将仅删除字符串中的前导空格。