通过变量引用工作簿和工作表 [英] Referencing Workbook and Worksheet by Variables

查看:160
本文介绍了通过变量引用工作簿和工作表的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

引用不同工作簿工作表的正确语法是什么?以下代码在最后一行抛出错误。谢谢!

 '实例化工作簿变量
Dim mWB作为工作簿的主工作簿

'实例化工作表变量
Dim mWS As Worksheet'主工作表

'打开工作簿,设置变量和参考范围
Workbooks.Open(本地500GB高清:用户:用户:公共:文件。 xlsx)
设置mWB = ActiveWorkbook
设置mWS =表(发票)
mWB.mWS.Range(A1)。FormulaR1C1 =Import Date'< - - 这是错误在哪里


解决方案

更改

 设置mWS =表(发票)

 设置mWS = mWb.Sheets(发票)

然后只需写入 mWS.Range(A1)。FormulaR1C1 =Import Date

实际上,你可以改变最后一行,就像我放在上面一样,因为你的 ActiveWorkbook 没有改变,h不过,最好的做法是准确地对所有变量进行限定,所以不会出现意外的行为。


What is the proper syntax for referencing a different workbook's worksheet? The following code is throwing an error on the last line. Thanks!

'Instantiate Workbook variables
 Dim mWB As Workbook 'master workbook

'Instantiate Worksheet variables
 Dim mWS As Worksheet 'master worksheet

'Open Workbook, set variables and reference range
 Workbooks.Open ("Local 500GB HD:Users:user:Public:file.xlsx")
 Set mWB = ActiveWorkbook
 Set mWS = Sheets("Invoices")
 mWB.mWS.Range("A1").FormulaR1C1 = "Import Date" ' <---- This is the where the error is

解决方案

Change

Set mWS = Sheets("Invoices")

To

Set mWS = mWb.Sheets("Invoices")

Then just write mWS.Range("A1").FormulaR1C1 = "Import Date" on the last line.

In effect, you could just change the last line to read like I placed above, since your ActiveWorkbook is not changing, however, it's a best practice to qualify all your variables exactly, so unexpected behavior doesn't occur.

这篇关于通过变量引用工作簿和工作表的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆