怎样使用Excel编程

来源：百度知道 编辑：UC知道 时间：2024/05/21 15:49:36
我是新人，Excel一点不懂，有那位好人能帮帮我啊！谢谢
最好讲的详细一点。
我要的是怎样运用方程式进行预算，填写表格用的。

我用VB连过。
下面是我当时写的一个函数，从SQLServer2000中导出查询结果的。调用就可以了。记得在工程－－》引用 中添加Excel的引用 Microsoft Excel 11.0 Object Library
（可能是不同的版本）
另外把连接字符串改一下。
如果你要用到其他方面，可以加我285512334
Public Function ExporToExcel(strOpen As String, str_name As String)
'&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
'& 功能：导出数据到EXCEL
'& 用法：ExporToExcel(sql查询字符串，导出表的名称)
'&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
Dim adoRs As New ADODB.Recordset
Dim Irowcount As Integer
Dim Icolcount As Integer

Dim xlapp As New Excel.Application
Dim xlbook As Excel.Workbook
Dim xlsheet As Excel.Worksheet
Dim xlQuery As Excel.QueryTable

Dim strcn_out As String

strcn_out = "Provider=SQLOLEDB.1;PeRs_tongjiist Security Info=False;User ID=sa;pwd=sa;Initial Catalog=st_info;Data Source=(local)"