复制并粘贴excel工作簿、对象变量或未设置块

不知道为什么我不能复制并粘贴“Nap”工作表到“Sheet7”。文件路径正确，但传输值部分响应为“对象变量或未设置块”

子复制并粘贴工作簿
Dim x作为工作簿
将y作为工作簿
“##首先打开两个工作簿：
设置x=工作簿。打开（“\uuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuu
设置y=工作簿。打开（“\uuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuu
'现在，将值从x传输到y：
**y、 板材（“板材7”）。范围（“A1”）。值=x板材（“Nap”）。范围（“F3:AA12”）**
端接头

不能将多单元格范围指定给单个单元格的值

试着这样做：

子复制并粘贴工作簿
Dim x作为工作簿
将y作为工作簿
“##首先打开两个工作簿：
设置x=工作簿。打开（“\uuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuu
设置y=工作簿。打开（“\uuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuu
'现在，将值从x传输到y：
带有x.Sheets（“Nap”）.范围（“F3:AA12”）
y、 图纸（“图纸7”）。范围（“A1”）。调整大小（.Rows.Count、.Columns.Count）。值=.Value
以
端接头

在运行宏之前，

y

或

x

中的任何一个是否已打开？您不能将多单元格范围指定给单个单元格的值。它看起来不像

y.Sheets（“Sheet7”）。范围（“A1”）。值=x.Sheets（“Nap”）。范围（“F3:AA12”）

应抛出一个对象变量，或者未设置变量。。。在我这一方无法复制。虽然我同意这是非常不正确的。