在不打开源文件的情况下 如何读取源文件中的数据并写进备份数据的EXCELL的sheet里

juekasry

如图，   文件夹有两个excel 文件。 源文件是汇总表（原始数据存放）。 准备在备份文件里做一个botton,  单击之后，  不打开 【源文件】， 即可完成遍历源文件数据 并更新到【备份文件】里面。  源文件工作表的标题与备份文件的标题无差别。  


想法是：不打开 【源文件】的前提下， 在源文件中 B 列 查找 FAR No. ：
1  如果， 备份文件中 A 列包含有相同的FAR No.  则用 源文件的数据 覆盖 备份文件的数据
2  如果， 备份文件中 A 列不包含新的FAR No.     则在 备份文件中录入新的数据




请 各位大神指点迷津~！   另有鲜花奉上！

microyip

使用SQL读取，http://club.excelhome.net/thread-1310803-1-1.html 参考变通一下

juekasry

microyip 发表于 2018-8-13 10:27
使用SQL读取，http://club.excelhome.net/thread-1310803-1-1.html 参考变通一下

谢谢EH侠圣~！  我之前尝试参照过用SQL的方法， 语句确实太晦涩，逻辑有些辩不清楚，如果可以的话， 侠圣可否送佛送到西嘛！ 小弟不胜感激。

juekasry

朱荣兴 发表于 2018-8-13 13:30
其实，打开与不打开没关系，代码自动打开文件，获取数据后，代码关闭文件。
字典匹配获取数据，有则更新， ...

是的版主~！  我的初衷就是这样的想法， 就想用版主说的方法实现， 但是编写老是 bage 不断， 逻辑上跳不过...   所以前来求助~！

juekasry

microyip 发表于 2018-8-13 10:27
使用SQL读取，http://club.excelhome.net/thread-1310803-1-1.html 参考变通一下

.[F2].CopyFromRecordset oRead_Excel_Conn.Execute(sExcel_Select) '执行SQL语句并赋值到F2为起始的单元格区域


在用文件夹内打开其他的工作簿， 这句代码会报警，是怎么会事呢？ C:\Users\cd1023116\Desktop\Capture.PNG

juekasry

juekasry 发表于 2018-8-14 17:05
.[F2].CopyFromRecordset oRead_Excel_Conn.Execute(sExcel_Select) '执行SQL语句并赋值到F2为起始的单元 ...

C:\Users\cd1023116\Desktop\Capture.PNGC:\Users\cd1023116\Desktop\Capture.PNG  图片如图

juekasry

microyip 发表于 2018-8-13 10:27
使用SQL读取，http://club.excelhome.net/thread-1310803-1-1.html 参考变通一下

sTitle = "FARNo,年龄,RequestorName,区域"    这样运行， 可以读取数据并写出来

sTitle = "FARNo.,年龄,Requestor Name,区域"   如果这样设置，  多了  .  和空格， 一开始运行  就报错，

在设置title时， 有特殊字符， 如标点符号等， 尽量不要放上去， 不管是中文还是英文，尽量一站式命名。  

调试很久，总结的丁点经验， 希望对后来的亲们有帮助

juekasry

microyip 发表于 2018-8-13 10:27
使用SQL读取，http://club.excelhome.net/thread-1310803-1-1.html 参考变通一下

侠圣，  我参照你的代码重建一个示例，我的excel是 Excel 2016我在调试 同文件夹内 按SQL读取数据时，  就会有这种报警出现， 如图所示：

这个是那里设置出问题了么？ 望侠圣释疑呢~！  

microyip

juekasry 发表于 2018-8-15 10:50
侠圣，  我参照你的代码重建一个示例，我的excel是 Excel 2016我在调试 同文件夹内 按SQL读取数据时，   ...

这个问题，没附件怎么猜？你猜我猜，猜猜猜