如何使用 Excel VBA 编程，点击按钮后跳转到有数据填充的最末一行

要在Excel中添加一个按钮，并让这个按钮执行导航到有数据填充的最末一行的功能，可以通过以下步骤实现：

第一步：启用“开发工具”选项卡

1. 打开Excel。
2. 点击“文件”>“选项”>“自定义功能区”。
3. 在右侧的“自定义功能区”中，勾选“开发工具”复选框。
4. 点击“确定”按钮，你会在Excel的功能区看到“开发工具”选项卡。

第二步：插入按钮

1. 进入“开发工具”选项卡。
2. 点击“插入”下拉菜单，选择“表单控件”中的按钮（如果希望使用更高级的控件，也可以选择“ActiveX控件”中的按钮，但本例中我们使用表单控件）。
3. 在Excel工作表的第一行画出按钮。释放鼠标按钮后，Excel会提示你分配一个宏给这个按钮。

第三步：编写宏

由于Excel没有内置的功能可以直接分配给按钮以实现你的需求，你需要编写一个简短的VBA宏。

1. 在分配宏的窗口中，选择“新建”。

2. 在打开的VBA编辑器中，输入以下宏代码：

   Sub GoToLastRow()
       Dim ws As Worksheet
       Set ws = ActiveSheet
       ' 寻找最后一行有数据的单元格
       Dim lastRow As Long
       lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row
       ' 如果最后一行是第一行，则定位到第二行，避免定位到标题行
       If lastRow = 1 Then lastRow = 2
       ' 导航到有数据的最末一行
       ws.Cells(lastRow, 1).Select
   End Sub
   

3. 关闭VBA编辑器，返回到Excel。

第四步：分配宏

1. 你会回到分配宏的窗口，现在应该可以看到你刚刚创建的GoToLastRow宏。
2. 选择GoToLastRow，然后点击“确定”。

第五步：使用按钮

现在，无论光标在哪里，点击这个按钮，Excel都会自动导航到有数据填充的最末一行。

请注意，这个宏假设你的数据是从第一列开始连续填充的。如果你的数据分布在多列且不规则，可能需要调整宏代码，以确保能准确找到实际的最末一行。