-3

我有一些 VBA 代码,如果它们包含一个值,它会突出显示 A 中的单元格。

有没有办法让它从单元格 A2 开始,因为 A1 是一个标题。

    Option Explicit

Sub LRow()

    Dim ws As Worksheet: Set ws = ThisWorkbook.Sheets("Sheet1")  '<=== Edit Sheet Name
    Dim LRow As Long

    LRow = ws.Range("A" & ws.Rows.Count).End(xlUp).Row

    ws.Range("A1:A" & LRow).Select

End Sub
4

1 回答 1

2

您只需要将起始单元格更改为 A2:ws.Range("A2:A" & LRow).Select

在您的代码中,它看起来像这样:

Sub LRow()

    Dim ws As Worksheet: Set ws = ThisWorkbook.Sheets("Sheet1")  '<=== Edit Sheet Name
    Dim LRow As Long

    LRow = ws.Range("A" & ws.Rows.Count).End(xlUp).Row

    ws.Range("A2:A" & LRow).Select

End Sub
于 2018-11-15T08:48:33.453 回答