【通用工具源码】通用Excel数据导入模块

红尘如烟 · 发表于 2011-5-7 21:06:59

      之前做的一个通用导入模块，不过后来又找到更高效的办法，差点抛弃，不过后来想想，这个模块虽然效率比较差，不过易用性上来讲还是不错的，因此发上来给大家作个参考。

用法： 1. 直接打开窗体时允许手动选择要导入的目标表：
   DoCmd.OpenForm "ImportFromExcel"
   2. 通过OpenArgs参数传递指定表名，这样不允许手动选择要导入的目标表，只能向指定的表中导入数据：
   DoCmd.OpenForm "frmImportFromExcel", , , , , , "表1"
要点： 1. 指定要导入的Excel工作簿文件后，会自动识别有数据的工作表，如果工作表不止一个，允许选择任意工作表。
   2. Excel中第一行必须是字段名或字段标题，会自动对应列和字段。Excel中的列标题可以是字段标题，并且读取时也是优先识别字段标题和Excel列标题进行对应。
   3. 可以选择某些字段是否导入，无法自动对应的默认为不导入。
   4. 使用非常友好的进度条，可以清楚的知道导入进度，防止数据量大时假死引起误操作。
   5. 友好的错误判断，如果某些行的数据导入失败，会在导入完成后自动打开Excel文件，并在工作表的数据右边显示错误信息，以便明白导入失败的原因。注意错误信息默认不会在Excel中保存，关闭之后就不会存在。
   6. 可以重复进行导入，不需要重新打开导入窗体。

ycxchen · 发表于 2011-5-8 08:58:26

谢谢分享，下载学习！

ycxchen · 发表于 2011-5-8 09:01:47

如果数据量很大，进度条显示会很慢吗？

szyewj · 发表于 2011-5-10 22:54:10

谢谢分享，下载学习

stvent · 发表于 2011-5-14 14:41:34

本帖最后由 stvent 于 2011-5-14 14:42 编辑

能否再加个导入条件，如果表中有大量数据，且表中有日期字段，能否只能导一段时期内的数据，如我只导入2011/5/1~2011/5/14日的

zhao__feng · 发表于 2011-5-14 19:55:17

谢谢分享，下载学习

lkkl66 · 发表于 2011-5-14 23:51:34

回复红尘如烟的帖子

好！谢谢！收藏！

goto2008 · 发表于 2011-5-24 11:13:10

谢谢分享

cz3056 · 发表于 2011-7-16 09:03:03

认真学习，呵呵！

yanghua1900363 · 发表于 2011-7-29 11:28:43

似曾相识几天终于见到了收藏

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)
Access经典源码培训群 (77130759)
Access源码技巧群 (138920637)
access vba (307776555)

主题相关群

地区相关群[您还没设置居住地]

[窗体] 【通用工具源码】通用Excel数据导入模块

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)