Dim Book As New XLS.Book(ProjectPath & "Attachments\hsdc.xls")
Dim Sheet As XLS.Sheet = Book.Sheets("A06")
Dim fl As String = ProjectPath & "Reports\ZCFZH.xls"
Book.Build(0)
Book.Save(fl)
Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(fl)
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets("A06")
App.Visible = True
ShowAppWindow("hsdc",2)
老师，以上是我窗口中的数据导出的代码，我的模板文件hsdc.xls工作簿里有好多个表，以上代码能让其中的A06表得到正确的数据，但是点导出按钮后，打开的表位置不在A06表的位置（即有可能显示的是A08位置，工作簿有表A01至A20共20个），
请问代码能否加上定位到打开的工作簿具体显示到A06表的位置。
加好友 
发短信
Post By：2021/4/26 11:05:00 [显示全部帖子]
