2个回答
展开全部
'先在工程中引用Microsoft Excel 11.0 Object Library 或者其他版本 9 10 。12 13 14 都行。
'再有,你的机器必须安装excel才行!
看不懂了 看示例文件!
Private Sub Command1_Click()
On Error Resume Next
Dim objExcel As Excel.Application
Dim objWorkBook As Excel.Workbook
Set objExcel = CreateObject("Excel.Application")
Set objWorkBook = objExcel.Workbooks.Add()
objExcel.Visible = True
'设置活动工作表
Dim objSheet As Excel.Worksheet
Set objSheet = objExcel.Worksheets("sheet1")
objSheet.Cells(2, 1) = "我" '给2行1列的单元格赋值
End Sub
更多追问追答
追答
'先在工程中引用Microsoft Excel 11.0 Object Library 或者其他版本 9 10 。12 13 14 都行。
大哥你仔细看看啊,就算你不会我帮你写代码,最基本的引用你得会啊,我真晕!
2014-07-24
展开全部
ADO连接Excel 再用sql语句操作表
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询