7,789
社区成员
发帖
与我相关
我的任务
分享access--datagrid--excel保存（输出）与打印问题
实时数据存入了access中，界面上datagrid用来显示处理后的有用信息，
现在想添加一个“保存与打印”按钮，功能是将datagrid的数据存到excel中，从excel中打印。
看了一些以前的相关帖子 都没太看懂 谁能给个例子参考一下
或者给个详细一点的适合新手看的链接
谢谢！！
现在想添加一个“保存与打印”按钮，功能是将datagrid的数据存到excel中，从excel中打印。
看了一些以前的相关帖子 都没太看懂 谁能给个例子参考一下
或者给个详细一点的适合新手看的链接
谢谢！！
...全文
请发表友善的回复…
发表回复
yanhuaju9 2007-06-22
- 打赏
- 举报
看来我是来晚了，本想把我的代码给你看一下的，只要解决了就ok了
v20052008 2007-06-21
- 打赏
- 举报
已解决 呵呵 谁进来就谁得分吧
v20052008 2007-06-21
- 打赏
- 举报
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Private Sub Command4_Click()
Set xlApp = CreateObject("excel.application")
Set xlBook = xlApp.Workbooks.Open(App.Path & "\hwcw.xls")
xlApp.Visible = True '使对象可见
End Sub
现在只会做到这一步 打开excel,
怎么把datagrid的数据写入excel啊？？？
可能是贴子放错地方了 应该放到数据库区的 哎！！
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Private Sub Command4_Click()
Set xlApp = CreateObject("excel.application")
Set xlBook = xlApp.Workbooks.Open(App.Path & "\hwcw.xls")
xlApp.Visible = True '使对象可见
End Sub
现在只会做到这一步 打开excel,
怎么把datagrid的数据写入excel啊？？？
可能是贴子放错地方了 应该放到数据库区的 哎！！
v20052008 2007-06-21
- 打赏
- 举报
自己顶一下
