从一本wk书籍复制到另一本书籍时的下标错误（9） [英] Subscript error (9) when copying from one wk book to another

问题描述

我尝试将源工作簿中的一个工作表（此处称为cwbk - 此源工作簿必须是动态的，因为它的引用名称会定期更改）复制到具有常量名称的新创建的工作簿时遇到问题。使用下面的代码，我
得到一个'目标下标超出范围'错误消息。

I have trouble with trying to copy content from one sheet in a source workbook (called here cwbk - and this source workbook must be dynamic as it's reference name changes regularly) to a newly created workbook with a constant name. With the code below, I get a 'destination subscript out of range' error message.

任何人都可以告诉我哪里出错了吗？

Can anyone enlighten me as to where I am going wrong please?

Dim cwbk As Workbook

Dim iFaceFile As Workbook

Dim cwbk As Workbook
Dim iFaceFile As Workbook

设置iFaceFile = Workbooks.Add

iFaceFile。 SaveAs Filename：=" E：\Documents\ iFaceFile.xls"

Set iFaceFile = Workbooks.Add
iFaceFile.SaveAs Filename:="E:\Documents\iFaceFile.xls"

cwbk.Activate

cwbk.Activate

Sheets（" Sheet2"）。列（"A：M"）。复制目的地：=工作簿（"iFaceFile"）。表格（"Sheet1"）。范围（"A：M"）

Sheets("Sheet2").Columns("A:M").Copy Destination:=Workbooks("iFaceFile").Sheets("Sheet1").Range("A:M")

推荐答案

你还没有设置cwbk。

You have not set the cwbk.

这篇关于从一本wk书籍复制到另一本书籍时的下标错误（9）的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！