vba，范围分配，错误

Question

由于优化问题，我想在一个工作簿中将一个范围分配到另一个工作簿中的相同大小范围，而没有任何循环，也没有任何复制粘贴方法。

我尝试使用以下声明

ThisWorkbook.Worksheets(newSheetName).Range("A1:L1000").Value = Workbooks(wkbName).Worksheets(1).Range("A1:L1000").Value, 

但它有问题。如果单元格包含类似＆＃34; 1498。＆＃34;的字符串，则转换为1498（无点），这会带来一些错误的计算。另外，我试图使用

set ThisWorkbook.Worksheets(newSheetName).Range("A1:L1000") = Workbooks(wkbName).Worksheets(1).Range("A1:L1000")

或

ThisWorkbook.Worksheets(newSheetName).Range("A1:L1000").Value = Workbooks(wkbName).Worksheets(1).Range("A1:L1000").text 

但它什么也没做，出现空白页。

如果有人可以帮助我，我将不胜感激。

人们一直在说，由于更有效的工作循环应该避免使用范围分配但事实证明，我的数据循环只是选项。

提前谢谢你。