无需VBA：如何将含指定文本的行复制到其他工作表？

当然可以！不用VBA也能实现动态同步的效果，主要分两种情况，取决于你用的Excel版本：

这是最省心的方案，利用Excel的动态数组功能自动同步：

• 第一步：把你的流水记录转换成Excel结构化表格。选中所有流水数据（包括新增的行），按Ctrl+T，勾选「我的表格有标题」——如果原数据没有表头，先手动添加（比如「日期」「类型」「金额」「描述」），这样后续新增行时表格范围会自动扩展。
• 第二步：切换到AD工作表，先在A1到D1输入和流水表一致的表头。
• 第三步：在AD工作表的A2单元格输入公式：

  =FILTER(流水表!A:D, 流水表!B:B="AD", "无匹配记录")
  

  这里的「流水表」是你原始数据所在的工作表名称，根据实际情况修改。公式会自动筛选出所有类型为AD的行，并且当流水表新增数据时，AD工作表会自动实时更新。
• 第四步：AF工作表同理，把公式里的"AD"改成"AF"即可。

如果你的Excel版本不支持动态数组，可以用数组公式结合结构化表格实现准动态同步：

• 同样先把流水数据转换成Excel结构化表格（命名为「流水表」），确保新增行时表格范围自动扩展。
• 在AD工作表的A2单元格输入以下数组公式（输入完成后按Ctrl+Shift+Enter确认，部分新版本Excel可能直接按回车即可）：

  =IFERROR(INDEX(流水表[日期], SMALL(IF(流水表[类型]="AD", ROW(流水表[类型])-ROW(流水表[#Headers]), ""), ROW(A1))), "")
  

• 把这个公式向右拖拽到D列（对应金额、描述列），再向下拖拽足够多的行（比如比当前最大记录数多20行），没有匹配数据的行会显示空值。
• 当流水表新增记录后，只需按F9刷新，或者切换一下工作表，AD工作表就会同步显示新的匹配行。
• AF工作表的操作完全一致，只需要把公式中的"AD"替换成"AF"。

关键注意点 #

• 一定要用Excel结构化表格（而非普通单元格区域），这是实现动态识别新增行的核心——普通区域不会自动扩展范围，新增行无法被公式识别。
• 旧版本的数组公式如果显示错误，检查是否按Ctrl+Shift+Enter确认，或者调整公式中的表格名称和列名是否匹配。

内容的提问来源于stack exchange，提问作者MarcP