マクロによってコピーしたブックのシートマクロの引用先修正方法

Question

前提・実現したいこと

マクロ①で別ブックにシートごとコピーしたマクロ②が正しく動きません。

問題：コピー先のシートマクロ②の引用先がコピー元ブックになっている

マクロ②はボタン謳歌で起動する仕様です。

原因の仮説：コピー元のマクロ②を登録するさい、sheet1.マクロ②を選択しても、ファイル名!sheet1.マクロ②になっている

かれこれ１時間ほど検索して調べていますが、見つかりません。
ご存知の方、どうぞご教示のほどお願いいたします。

Answer 1

Dim Var As Variant
Dim Msg As String

Workbooks.Open Filename:=FILE_PATH & RenameFileName, UpdateLinks:=0
ActiveWorkbook.Sheets("0000").Activate
Var = ActiveWorkbook.LinkSources(xlExcelLinks)

'一致するリンクを探す
For i = 1 To UBound(Var)
    Msg = Var(i)

    If Msg Like "*" Then
        'リンクの変更
        ActiveWorkbook.ChangeLink _
        Name:=Msg, _
        NewName:=ActiveWorkbook.FullName, _
        Type:=xlLinkTypeExcelLinks
    End If

Next i
ActiveWorkbook.Close SaveChanges:=True