Excel Vba 活动单元格不动的问题

比如我Excel当前活动单元格是（1，1），我在Excel中点按钮执行其他程序，

执行完后我还要显示原来我点按钮前的那个活动单元格，当然这个活动单元格是不固定的，

不一定是（1，1），请问该怎么办啊 --------------------编程问答-------------------- 点按键后先记录当前单元格位置，执行完其它程序后，再把活动单元格移动到记录的位置。
--------------------编程问答--------------------



Dim strRange As String

    

    strRange = Selection.Address

    Cells(1, 1).Select      '这里你可以执行你的函数

    Application.Range(strRange).Select

--------------------编程问答-------------------- Application.ActiveCell
--------------------编程问答-------------------- 方法一：　你的“执行代码”中，不要改变活动单元格的代码。

方法二：　记录“现场状态”。“点按钮”时，首先记录活动单元格是哪个，执行完毕后，重新选定原活动单元格。
　　　　　（如果活动工作表被改变，则还应该记录当前的活动工作表是哪个）
--------------------编程问答--------------------

引用 2 楼 bestbadgod 的回复:

VB code

Dim strRange As String

    strRange = Selection.Address
    Cells(1, 1).Select      '这里你可以执行你的函数
    Application.Range(strRange).Select

这段语句可用．

补充：VB ,  基础类