如果表中的值满足条件，则 Vba 宏从表中复制行 [英] Vba macro to copy row from table if value in table meets condition

问题描述

我正在尝试制作一个宏:

i'm trying to make a macro which:

1. 翻阅一张桌子
2. 查看该表 B 列中的值是否具有特定值
3. 如果有，将该行复制到其他工作表中的范围

结果类似于过滤表格，但我想避免隐藏任何行

我对 vba 有点陌生，不知道从哪里开始，非常感谢任何帮助.

I'm kinda new to vba and don't really know where to start with this, any help much appreciated.

推荐答案

这正是您使用高级过滤器所做的.如果是一次性的，你甚至不需要宏，它在数据菜单中可用.

That is exactly what you do with an advanced filter. If it's a one shot, you don't even need a macro, it is available in the Data menu.

Sheets("Sheet1").Range("A1:D17").AdvancedFilter Action:=xlFilterCopy, _
    CriteriaRange:=Sheets("Sheet1").Range("G1:G2"), CopyToRange:=Range("A1:D1") _
    , Unique:=False

这篇关于如果表中的值满足条件，则 Vba 宏从表中复制行的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！