Office中国论坛/Access中国论坛

标题: 能否用Excel去把Access的某列统计 [打印本页]

作者: xhjczx 时间: 2005-4-28 16:51
标题: 能否用Excel去把Access的某列统计
能否用Excel的某一单元格（如A1）去把Access的某列（如字段1）里的数字求和。教教我吧！谢谢！

作者: 红池坝 时间: 2005-5-15 05:32
Sub suma()
Dim conn As New ADODB.Connection, connstr As String, db As String, rs As New ADODB.Recordset,

db = "C:\db1.mdb"
connstr = "

rovider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
conn.Open connstr
rs.Open "select * from 表1", conn, 1, 3

If rs.EOF And rs.BOF Then
MsgBox "无记录"
Else
Do Until rs.EOF
Worksheets("Sheet2").Cells(1, 1).Value = Worksheets("Sheet2").Cells(1, 1).Value ＋rs.files(1)
rs.MoveNext
Loop
End If

End sub

作者: tanjh 时间: 2005-5-19 03:25
如果在EXCEL2000中，用SQL.REQUEST函数即可实现，不必写代码。[em05]

作者: ganrong 时间: 2005-5-20 17:07
提示: 作者被禁止或删除内容自动屏蔽

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)