
excel VBA 这行代码为什么出错
Windows("*空运报表.xls").Activate*号代替的是日期因为明天的日期都不一样所有用它代替再说我只打开一个空运报表为什么不能选择它请问怎样选择这个工作簿...
Windows("*空运报表.xls").Activate
*号代替的是日期 因为明天的日期都不一样 所有用它代替 再说我只打开一个空运报表 为什么不能选择它 请问怎样选择这个工作簿 谢谢 展开
*号代替的是日期 因为明天的日期都不一样 所有用它代替 再说我只打开一个空运报表 为什么不能选择它 请问怎样选择这个工作簿 谢谢 展开
1个回答
展开全部
如果是不同的 工作簿(不同的Excel文件)可以用Workbook指定。
像Activate之类的方法前面应该不支持通配符,因为如果匹配多个名称,不能同时Activate多个表。
使用下面的方法代替。
For i = 1 To Workbooks.Count
If Right(Workbooks(i).Name, 4) = "空运报表" Then
Workbookss(i).Activate
End If
Next i
像Activate之类的方法前面应该不支持通配符,因为如果匹配多个名称,不能同时Activate多个表。
使用下面的方法代替。
For i = 1 To Workbooks.Count
If Right(Workbooks(i).Name, 4) = "空运报表" Then
Workbookss(i).Activate
End If
Next i
更多追问追答
追问
Dim i
i = Format(Date - 1, "m-d")
Windows("i&空运报表").Activate
Sheets("浦东").Select
Range("A3:N46").Select
Selection.Copy
你那 If Right(Workbooks(i).Name, 4)我看不懂耶 看我这代码怎样修改 老是出错
追答
没有Windows("文件名”).Activate 的方法
如果名称没错,可改为:
Workbooks(i & "空运报表").Activate
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询