带你到想去的地方，使用goto语句

开发工具中插入，如下按钮。如何显示开发工具，可以在后台输入“开发工具”。

右击按钮，修改属性。

按如下修改，可更改显示的文字信息。

使用以下语句：

Private Sub CommandButton1_Click() Application.Goto Sheets("Sheet1").Range("a100")End Sub

以后点击一下按钮，就可以点转到A100单元格，而A100单元格可以存入笔记，就可以点击一下，显示笔记。当然，也可以在A100的位置做一个按钮，点击返回A1

默认情况下，虽然跳转到A100,但是显示是在底部显示，如下效果，眼睛看到的却是A77左右。

修改参数，按如下写法，更合理显示。

Private Sub CommandButton1_Click() Application.Goto Sheets("Sheet1").Range("a100"), Scroll:=TrueEnd Sub

这样跳转到A100，同时可以显示在上方。

觉得麻烦的朋友，可以画一个长方形，然后右击，超链接。

然后指定位置。

但终究是没有VBA代码灵活，可以很多行代码，连续操作，实现完全的自动化。

子曰：用之则行，不用则藏。

意思是说，如果你用我的这些建议，就马上行动，知行合一，如果你不用，就赶紧收藏，以绝后患。