Office中国论坛/Access中国论坛

标题: 【源码示例】导入导出系列——Excel固定格式的订单导入导出 [打印本页]

作者: 红尘如烟 时间: 2010-12-23 12:41
标题: 【源码示例】导入导出系列——Excel固定格式的订单导入导出
本帖最后由红尘如烟于 2011-1-19 23:31 编辑

我们在实际应用当中经常会遇到一些格式固定的报表，而Access自带的导入导出功能不能识别这些格式，所以我们就只能另想它法，而Excel和Access都是支持自动化技术的，因此我们就可以用程序来控制Excel并向其中写入数据，以及进行一些处理，就像我们直接打开Excel在其中填入数据一样。
此示例演示了如何使用一个有固定格式表格的Excel模板，实现订单数据的导入导出。由于订单数据分为了主表、明细表，其中的主表即表头，这些数据项是固定的，而明细数据则列是固定的，行不固定。因此，对于表头，我们可以直接从指定单元格读取或写入数据，对于明细数据，我们把第一行设置好格式，后面的行复制第一行的格式即可。
[attach]44473[/attach]
[attach]44474[/attach]

[attach]44475[/attach]

作者: todaynew 时间: 2010-12-23 12:55
原来是ActiveCell.Row这个玩意。进一步问两个问题：
1、中间有空行的话，有效行数是什么范围？
2、设置了边框的区域都是有效行数范围，还是行中有数据才是呢？

作者: 红尘如烟 时间: 2010-12-23 13:01

todaynew 发表于 2010-12-23 12:55
原来是ActiveCell.Row这个玩意。进一步问两个问题：
1、中间有空行的话，有效行数是什么范围？
2、设置了 ...

中间有空行的话只能读取的时候根据数据去判断了，如果有有规律的话就要好处理一些。
有效行数是根据你使用的范围来的，设置了边框样式但里面没有数据的也算在内，这个其实就是和按快捷键Ctrl+End的作用差不多。

作者: tmtony 时间: 2010-12-23 13:19
收藏了!

作者: todaynew 时间: 2010-12-23 13:59

红尘如烟发表于 2010-12-23 13:01
中间有空行的话只能读取的时候根据数据去判断了，如果有有规律的话就要好处理一些。
有效行数是根据你使 ...

看来还是没有特别好的办法。

作者: roych 时间: 2010-12-23 14:16
之前看《Access 2007 VBA宝典》，那个美国人写实例时（可惜的是，在她的网站里根本就没找到那些想要的实例文件），是先导出然后再插入空行的做成需要的格式的，也不失为一个好方法。
书中没有导入的例子。

作者: t小宝 时间: 2010-12-23 20:36
学习，这种导入导出经常要用到的

作者: iamee 时间: 2010-12-24 23:20
多谢,很实用~~~

作者: asklove 时间: 2010-12-25 10:25
收藏

作者: s959595 时间: 2010-12-30 00:50
谢谢分享

作者: koutx 时间: 2010-12-31 11:03
收藏了。谢谢

作者: miracle-y 时间: 2011-1-4 11:49
楼主辛苦了

作者: papacy 时间: 2011-1-4 14:39
不错,值得学习

作者: 13601812106_01 时间: 2011-1-4 16:49
不错,值得学习

作者: vk602 时间: 2012-1-31 23:59
收藏了，水平有限。暂时没学会。要是有视频讲解。完美了。再次多谢！

作者: kent_73 时间: 2012-2-14 14:30
谢谢分享，收藏了

作者: wu8313 时间: 2012-2-20 17:39
本帖最后由 wu8313 于 2012-2-20 18:13 编辑

表或者视图的数据在本地，并且数据量不大的情况，这个 cell 逐个写入的办法真的很好。
我的一个表在远端库(互联网上)，数据量才 1500条，使用 cell 写入，结果速度很慢。
后来，我改用了 excel 中的这个方法 CopyFromRecordset。形如 ws.Range("A3").CopyFromRecordset rstByQuery
速度加快了。可是因为不是循环写入，没法使用动态实时进度条了。

网上倒是有把表或者视图数据导出到 excel 的脚本，应该不会有错，不明白，我为何调用出错。
附上该脚本，测试成功后的坛友，请跟帖提醒一下。[attach]48421[/attach]
该脚本有一个局限，就是只能导出到服务端本地，客户端要想得到这个 excel ，需要另外写代码，把该excel 下载到本地。

作者: ruanjy 时间: 2012-3-21 09:15
导出经常要用到的

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