使用vba语句将excel工作簿"源数据.xls"的工作表"体育"中的数据复制到工作簿"Inquiry.xls"的Sheet1表中,"Inquiry.xls"是打开的,"源数据.xls"没有打开。语句如下:
 
Workbooks("源数据..xls").Worksheets("体育").Activate
Workbooks("Inquiry.xls").Worksheets(1).Cells(TempY_I, 2).Value = Workbooks("源数据.xls").Worksheets("体育").Cells(TempY, 3).Value
Workbooks("Inquiry.xls").Worksheets(1).Cells(TempY_I, 3).Value = Workbooks("源数据.xls").Worksheets("体育").Cells(TempY, 4).Value其中TempY_I和TempY是行数控制变量。每次运行都报错,说是“下标越界”,如果不加Workbooks("源数据..xls").Worksheets("体育").Activate也报错,把Activate换成Select也报错“下标越界”,请大家帮忙看看怎么回事?谢谢