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屋！