EXCEL自带的自动筛选就可以实现。
将自动筛选的过程录制成宏就可以看到代码。
ALT+F11可以打开excel的vba编辑窗口。
EXCEL自带的自动筛选就可以实现。
将自动筛选的过程录制成宏就可以看到代码。
ALT+F11可以打开excel的vba编辑窗口。
dim cnn as new adodb.connection
dim rs as new adodb.recordset
cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
cnn.Properties("Extended Properties").Value = "Excel 8.0"
cnn.Open "C:\Book1.xls"
rs.Open "select * from [Sheet1$] where 年龄=30 ", cnn
dim cnn as new adodb.connection
dim rs as new adodb.recordset
cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
cnn.Properties("Extended Properties").Value = "Excel 8.0"
cnn.Open "C:\Book1.xls"
rs.Open "select * from [Sheet1$] where 年龄=30 ", cnn
楼上猛吖,复制粘贴...汗
支持 chenxfsoft