使用修剪功能删除不需要的多余字符

Question

我正在尝试将C列​​中具有数据的所有单元格修剪到最左边的9个字符。

Sub TrimColumns()
    Dim LastRow As Long
    LastRow = Cells(Rows.Count, 1).End(xlUp).Row

     If LastRow > Columns("B").Row Then
        Range("C2:C" & LastRow).LTrim(1,9) ' getting syntax error on this line 
     End If 
End Sub

Range("C2:C" & LastRow).LTrim(1,9)'在此行上出现语法错误

Answer 1

仅使用Left？

Cells(1,1).value = Left(Cells(1,1).value,9)

这将在范围内循环

For i = 1 to LastRow Step 1
    Cells(i,3).value = Left(Cells(i,3).value,9)
Next i