Set xlApp = CreateObject("Excel.Application")
xlApp.Application.Visible = False
'xlApp.Visible = False
Set xlBook = xlApp.Workbooks.Open(.FoundFiles(MyIndex + 1))
Set xlSheet = xlBook.Sheets.Item(1)
xlSheet.Activate以上代码中的(.FoundFiles(MyIndex + 1))代表一个要打开文件名,现在问题是:这样写了之后系统会报错说是不能访问这个只读文件 ,我不明白这句错在哪里<Set xlBook = xlApp.Workbooks.Open(.FoundFiles(MyIndex + 1))>
另外还有xlBook.Sheets.Item(1)中的Item后的Key值具体代表什么呀,我看了VBA的帮助,但是还是不太明白.
xlApp.Application.Visible = False
'xlApp.Visible = False
Set xlBook = xlApp.Workbooks.Open(.FoundFiles(MyIndex + 1))
Set xlSheet = xlBook.Sheets.Item(1)
xlSheet.Activate以上代码中的(.FoundFiles(MyIndex + 1))代表一个要打开文件名,现在问题是:这样写了之后系统会报错说是不能访问这个只读文件 ,我不明白这句错在哪里<Set xlBook = xlApp.Workbooks.Open(.FoundFiles(MyIndex + 1))>
另外还有xlBook.Sheets.Item(1)中的Item后的Key值具体代表什么呀,我看了VBA的帮助,但是还是不太明白.
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货