用VB 代码读取 Excel 内容

最新推荐文章于 2024-06-27 15:30:11 发布

DJ2008

最新推荐文章于 2024-06-27 15:30:11 发布

阅读量1.3w

点赞数 4

分类专栏： VB + VBA Excel VM 文章标签： excel vb

本文链接：https://blog.csdn.net/DJ2008/article/details/72723658

版权

本文介绍了一种使用VB通过Open Recordset的方式快速读取Excel工作表内容的方法，相较于传统循环读取，效率显著提高，尤其适用于处理大量记录。在实际应用中可能会遇到读取为空或后续操作值丢失的问题，解决方案包括在打开Recordset前关闭Excel对象，或在数据处理完毕后再关闭Excel Object。

摘要由CSDN通过智能技术生成

引子

常规的方法可能是循环读取每一行每一个格子的内容并存入 Recordset 并保存
此处使用Open Recordset 的方式，将 Excel Worksheet 作为一个数据源直接读取
速度将是数量级的差别，几万笔记录的情况下，将由几十秒，甚至几分钟，加快至几秒钟

解决代码

'导入Excel 文件内容
'Excel 格式为 Excel 2007 之上的 .xlsx 格式，需使用 ACE 读取
'其中的 HDR=No (Yes) 代表是否处理第一行的标题行
Private Function ImportExcelSheetData(ByVal p_sExcelFilePath As String, ByVal p_sSheetName As String) As Boolean