你的做法少了双引号。
举例如下:
Dim
n
as
Integer
n
=
Workbooks("XX表").Worksheets.Count
'这里虚拟了一个变量,你可以根据你自己的需要更改。
Sheets(1).Activate
Range("A2:A"
&
n).select
————————————
两个都是变量的时候,你不可以用n&m来表示,因为Range后面的内容不是r1c1表示的,你无法用两个数值变量来圈定一个区域。
要引用非本工作簿中的单元格方法如下:
1、打开要引用数据的工作簿代码如下:
workbooks.open
("e:\供电所管理标准\负荷测试记录.xls")
括号中的是工作簿的路径
2、引用数据代码为:
workbooks("引用数据的工作簿名称").worksheets("工作表名称").cells(单元格地址)=workbooks("要引用数据的工作簿名称").worksheets("工作表名称").cells(单元格地址)
3、关闭引用数据的工作簿
workbooks("要引用数据的工作簿名称").colose