Question

我正在尝试创建一个excel宏，它找到工作表的最后一列，然后选择整个列。但是，此列将始终不同 - 有些日子它将是列'H'，其他日期将是列'GX'，因为工作表中的数据会不断更新。到目前为止，我已经看到了如何找到最后一列然后将其删除，但是一旦宏再次运行，它就会特别引用某个列。我需要它始终引用最后一列，无论可能是哪一列。谢谢！

这是代码。我是VBA等新手，这是通过宏录音机和我在网上发现的其他东西创建的，所以请耐心等待！

`Sub Macro11()
Sheets("Sheet25").Cells(1, 1).Activate
ActiveCell.SpecialCells(xlLastCell).Select
lastCol = ActiveCell.Column
Columns("W:W").Select
Selection.Delete Shift:=xlToLeft
End Sub`

Answer 1

以下是示例代码
避免在代码中使用Select / Activate。要知道为什么要引用此link

Sub Macro11()
    Dim LastCol As Long

    With ThisWorkbook.Sheets("Sheet25")
        LastCol = .Cells(1, .Columns.Count).End(xlToLeft).Column
        .Columns(LastCol).Delete
    End With

End Sub

如何在VBA中查找并选择最后一列？

1 个答案: