excel宏运行时，提示错误9 ，下标越界

打开调试，加黄提示命令行如下：DoUntilWorkbooks("ItemMaster").Sheets("Sheet1").Cells(gyou1,1).Value="... 打开调试，加黄提示命令行如下：
Do Until Workbooks("ItemMaster").Sheets("Sheet1").Cells(gyou1, 1).Value = ""
这个表示错误可能出在哪里？文件名什么的都没有错。
在同事电脑上正常可用的，他把相关的数据都邮件发给我，我的电脑上就不能运行了。展开

 我来答

1个回答

#热议# 普通体检能查出癌症吗？

阳光上的桥
2017-03-30 · 知道合伙人软件行家

阳光上的桥
知道合伙人软件行家

采纳数：21423 获赞数：65833

网盘是个好东东，可以对话和传文件

向TA提问私信TA

关注

展开全部

你的语句有三种可能造成下标越界，一是Workbooks("ItemMaster")，如果没有ItemMaster文件打开会造成报错，另外，一般我们是写Workbooks("ItemMaster.xls")
二是.Sheets("Sheet1")，如果工作簿没有名为"Sheet1"的表，会造成下标越界
三是Cells(gyou1, 1).Value，如果gyou1的值不是有效的行（例如小于0或者超过表的最大行数），会造成下标越界
具体是什么造成，需要调试。