vba 如何 移到到第1行

在VBA（Visual Basic for Applications）中，如果你想要移动到Excel工作表的第1行，你可以使用`Range`对象的`Select`方法或者直接使用`ActiveCell`属性配合`Offset`方法。以下是一个简单的示例代码，演示了如何将活动单元格移动到第1行：

```vba

Sub MoveToFirstRow()

' 将活动单元格移动到第1行

ActiveCell.Offset(0, -1).Select

End Sub

```

在这段代码中，`ActiveCell.Offset(0, -1).Select`表示从当前活动单元格向上移动1行（因为`Offset`方法的第二个参数是行偏移，-1表示向上移动1行），然后使用`Select`方法选中新的单元格。

如果你想要选中整个第1行，可以使用以下代码：

```vba

Sub SelectFirstRow()

' 选中第1行

Rows(1).Select

End Sub

```

或者，如果你想要将活动单元格移动到第1行，并且选中该行，可以使用以下代码：

```vba

Sub MoveAndSelectFirstRow()

' 将活动单元格移动到第1行并选中该行

With ActiveSheet

.Activate

.Rows(1).Select

End With

End Sub

```

以上代码中，`ActiveSheet`用于指定当前活动的工作表，`Rows(1)`代表第1行，`.Select`方法用于选中指定的行。