跪求大神帮帮,关于用vba解决word的也叫的小问题!!

从 excel 中复制个图形 插入到word的页脚中(可以理解成生成的每个word页面右下角都有个logo),移动到右下角。

我用宏录制在插入页脚的时候,生成的代码是从页脚复制粘帖到主页面,跟我想要的完全不同。

Function test(
Dim UserFile As Strin
Dim Filename As String
Filename = "C:\1\21.docx"
Set Wdapp = CreateObject("Word.Application")

Sheets("目的文件").Select
ActiveSheet.Shapes.Range(Array("NissanGroupLabel")).Select
Selection.Copy
Sheets(粘帖的文件").Selec
Wdapp.Documents.Open (Filename)
Wdapp.Visible = True
Wdapp.Selection.Paste
Wdapp.Quit True
Set Wdapp = Nothin

End Function

我只能拷到主页面,不能拷到页脚。