最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
从VB中的Datagride中向excel导入数据
时间：2022-07-02 11:15:01 编辑：袖梨 来源：一聚教程网
程序需要，我在网上找了很久才找到，刚刚把程序写好，并加写了注释，希望能帮助大家
再写程序前先引用
microsoft excel 11.0 object Library
我看到的文章是10.0的，我这是office2003是11.0，只要安了excel就有这个引用~
Private Sub cmdsave_Click()
MsgBox "文件保存为: D:电网配电线路管理信息系统信息查询结果事故信息查询结果.xls"
Dim i As Integer
Dim j As Integer
Dim ex As Object
Dim exwbook As Object
Dim exsheet As Object
Set ex = CreateObject("Excel.Application")
Set exwbook = Nothing
Set exsheet = Nothing
Set exwbook = ex.Workbooks().Add
Set exsheet = exwbook.Worksheets("sheet1")
’在excel里表格的表头，这是根据我的需要添加的标头
ex.Range("c3").Value = "日期"
ex.Range("d3").Value = "时间"
ex.Range("e3").Value = "站点"
ex.Range("f3").Value = "汇报人"
相关文章
- 《弓箭传说2》新手玩法介绍 01-16
- 《地下城与勇士：起源》断桥烟雨多买多送活动内容一览 01-16
- 《差不多高手》醉拳龙技能特点分享 01-16
- 《鬼谷八荒》毕方尾羽解除限制道具推荐 01-16
- 《地下城与勇士：起源》阿拉德首次迎新春活动内容一览 01-16
- 《差不多高手》情圣技能特点分享 01-16