如果列中的数值因行而异（每两​​行比较），则将行复制到新工作表

Question

我有两个表合并在每个ODD编号行（1,3,5 ... 633）中，它包含我的MAIN表的值（在我附带的屏幕截图中为红色）。

EVEN行来自需要更新的USER表（在我的屏幕截图中为蓝色）。

B列中的数字字符串是我用于比较值的键值。对于ODD行中与EVEN行中位于其下方的数值不同的每个数值，我希望将该ODD行（红色）复制到新工作表。如果您注意到A列是每个TWO行的重复数值（这是一个贷款编号，并且该记录需要使用B列中不同的那些数值更新）....这将是项目一次全部识别差异行。

例如，在屏幕截图中，行＃359,361,363等将被复制到新工作表，因为其下方偶数行中的B列中的值不同

截图

Answer 1

您是否希望使用公式，VBA手动执行此操作？如果您熟悉VBA，我建议您按以下方式使用宏录制器：

1. 添加一个公式来检查奇数/偶数值=OR(B1=B2,MOD(ROW(),2)=0)（此公式只会在ODD行上返回FALSE，其中下面一行的值不同）
2. 过滤FALSE
3. 选择可见（已过滤）的单元格
4. 将单元格复制并粘贴到新工作表中

我希望这会有所帮助。让我们知道什么有效！