首页 > 解决方案 > 比较不同工作簿上的两个行列表并使用列表 1 中缺少的行更新列表 2 - Excel VBA

问题描述

我尝试使用 VBA 在 Excel 中完成的是拥有一个“原始”工作簿,用于每次开始,调整并以新名称保存。此工作簿以及来自它的所有工作簿都有一个“客户端数据库”表,其中客户端数据自动复制到(每个客户端 1 行,A:G)。每当填写原始工作簿时,数据就会复制到该特定工作簿中的客户端数据库,但随后会自动以另一个名称保存。

因此,我正在寻找一个打开原始工作簿(完成)的代码,将新文件的数据库表与原始文件进行比较,然后用新的客户端数据更新原始文件。(最好的情况是他们会互相更新)。重要的是应该比较整行,例如一个公司可以有不同的联系人。

不幸的是,现在我的编码技能不足以完成此任务,我浏览了不同的主题以找到解决方案,但无法找到完全涵盖问题的解决方案(并且写得足够简单,我仍然可以理解) .

两张表都具有相同的数据库结构,并且该选项卡称为“Klanten 数据库”。

如果有人能够并愿意提供帮助,将不胜感激!

我已经尝试过论坛中的不同代码,但它们都专注于列或特定单元格,并且用于将唯一值提取到新列表中或只是为了突出差异。或者对我来说太复杂了.. :X

Sub UpdateOriginal()
'Open original file to update

  Workbooks.Open Sheets("Data inhoud").Range("J12").Value & "\original.xlsm"

  'compare active database with original and update the both of them



Workbooks("original.xlsm").Close SaveChanges:=True

End Sub```

None have worked :(

标签: excelvbalistrowsupdating

解决方案


推荐阅读