单击按钮后如何返回到单元格A1？

Question

我的Excel工作表底部有一个按钮，会生成另一张单击的盎司。该功能正常，但我需要在单击按钮而不是新工作表后返回到工作表的顶部。

将使用哪种VBA代码来执行此操作？

Answer 1

试试这个样本..

Application.GoTo ActiveSheet.Range("A1"),True

Answer 2

试试这个：

Sheets(1).Select
ActiveSheet.Range("A1").Select

Answer 3

使用此代码：

MsgBox ThisWorkbook.Sheets("New_sheet_name").Range("A1")

Answer 4

将此添加到按钮单击子。当您单击该按钮时，将检查您当前所在的工作表，运行您的代码，并在完成后返回上一页，并在视图中选择了A1。

Sub Example()
   Dim PrevSheet as Worksheet

   PrevSheet = ActiveSheet

   'Your code that does stuff, creates a new sheet etc..

   PrevSheet.Select
   Range("A1").Select
End Sub