<< Click to Display Table of Contents >> 根据SQL语句导出到Excel(gf_ExportToExcelBySql函数) |
函数说明
该函数可以根据SQL查询语句,将数据导出到Excel文件。
函数原型
|
Public Function gf_ExportToExcelBySql(strSql As String, strName As String) |
语法
gf_ExportToExcelBySql(rstrSql, strName)
参考:gf_ExportToExcelBySql("Select * From tblTest Where FID = 5") '把tblTest表的记录,条件为FID = 5,导出到Excel文件
参数
参数名 |
必需/可选 |
数据类型 |
参数说明 |
---|---|---|---|
strSql |
必需 |
String |
字符串表达式。要执行的SQL语句。 |
strName |
必需 |
String |
要导出的Excel文件名(实际保存的时候,用户可以自己更改的) |
返回值
无
示例
|
Sub subTest() Dim strSQL As String '定义字符串变量,设置SQL语句 strSql = "Select * From tblTest Where FID = 5" '设置SQL语句 gf_ExportToExcelBySql strSql,"张三" '导出到Excel文件 End Sub |