甜总:
1,从xls宏中拷贝的代码: Range("A3:H3").Select
Selection.AutoFilter
2、我从帮助中抄写部分代码:
Book.Build() '生成细节区 ‘这二句是FT中原来生成报表文件
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(1)
Ws.Select '在选定单元格之前,必须先选定工作表!!
Ws.Range("A3:H3").Select '以下二行是自己加的
Ws.Selection.AutoFilter
'Ws.Range("A1:A10").Select'选定单元格
App.Visible = True
App.Quit
执行后,出现如下错误:
.NET Framework 版本:2.0.50727.3655
Foxtable 版本:2014.8.15.1
错误所在事件:窗口,窗口2,Button1,Click
详细错误信息:
Public member 'Selection' on type 'Worksheet' not found.
请修改代码。
谢谢!