Excel 将图表从一个工作簿复制到另一个工作簿

我正在为Excel构建两个报告文件，它基本上将信息复制到另一个工作簿并保存

我已经很好地复制了我的文本内容，但是现在我需要能够复制图表，这就是错误开始出现的时候

这就是我所尝试的：

ActiveSheet.Shapes(1).CopyPicture Appearance:=xlScreen, Format:=xlPicture
Workbooks("Relatorios.xlsm").Sheets("" & tb_nome.Text & "").Paste

Workbooks("Relatorios.xlsm").Sheets("" & tb_nome.Text & "").Range("E20").Select

这似乎工作正常，唯一的问题是我想将图表放在单元格E20上，我尝试选择此单元格，但出现错误，这是我尝试的：

ActiveSheet.Shapes(1).CopyPicture Appearance:=xlScreen, Format:=xlPicture
Workbooks("Relatorios.xlsm").Sheets("" & tb_nome.Text & "").Paste

Workbooks("Relatorios.xlsm").Sheets("" & tb_nome.Text & "").Range("E20").Select

没有那条线，图表就粘贴得很好，只是不在我想要的地方

最后的代码是这样的：

ActiveSheet.Shapes(1).CopyPicture Appearance:=xlScreen, Format:=xlPicture
Workbooks("Relatorios.xlsm").Sheets("" & tb_nome.Text & "").Range("E20").Select
Workbooks("Relatorios.xlsm").Sheets("" & tb_nome.Text & "").Paste