VBA 获得绝对地址控制焦点的设置

先上代码，有时间再补上说明。

Dim Mefoucs As String

MsgBox "你选定的当前单元格是：" & Selection.Address
Mefoucs = Selection.Address
'ActiveCell.Column
    Range(Mefoucs).Select
    Selection.Copy
    Range("G17").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
      Range(Mefoucs).Select