Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/23.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/asp.net-mvc/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 返回到按下按钮的工作表_Excel_Vba - Fatal编程技术网

Excel 返回到按下按钮的工作表

Excel 返回到按下按钮的工作表,excel,vba,Excel,Vba,我有以下宏选择每张图纸中的单元格A3: Sub test () Sheet1.Select Range("A3").Select Sheet2.Select Range("A3").Select Sheet3.Select Range("A3").Select End Sub 在每个工作表中,我都有一个链接到此宏的按钮。 如果您在sheet2中,并在每张工作表中单击按钮 单元格A3将被选中,最后将显示在表3中 由于宏以sheet3结束,因此按下了sheet2中的按钮 但是,我希望宏运行后,您将

我有以下宏选择每张图纸中的单元格A3:

Sub test ()
Sheet1.Select
Range("A3").Select
Sheet2.Select
Range("A3").Select
Sheet3.Select
Range("A3").Select
End Sub
在每个工作表中,我都有一个链接到此宏的按钮。 如果您在sheet2中,并在每张工作表中单击按钮 单元格A3将被选中,最后将显示在表3中 由于宏以sheet3结束,因此按下了sheet2中的按钮

但是,我希望宏运行后,您将进入按下按钮的工作表。你知道如何解决这个问题吗?

检查一下

Sub test()
strME = Application.ActiveSheet.Name

Sheet1.Select
Range("A3").Select
Sheet2.Select
Range("A3").Select
Sheet3.Select
Range("A3").Select

Application.Sheets(strME).Select

End Sub
Sub test()
Dim sht_name As String
sht_name = ActiveSheet.Name
Sheet1.Select
Range("A3").Select
Sheet2.Select
Range("A3").Select
Sheet3.Select
Range("A3").Select
Sheets(sht_name).Activate
End Sub