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

Question

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

Answer 1

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