VBA宏查找特定列

Question

我需要在第3行上找到一个特定的词，例如“预算”和“状态”，然后需要删除包含“状态”和“预算”的整列。

PS。可以有更多的单词，以及如何使它转到最后一列并找到那些特定的单词

Answer 1

这个简单的代码将向后循环遍历row3，如果找到所需的值，它将删除该列（注意：您必须从最后一列向后循环）。您可以通过复制<div class="headerbar"> <div id="titlebar"></div> </div> <div id="mainpage"> <div class="leftsidemain"></div> <div class="pagearea"></div> </div>并将其粘贴到Or .Cells(3, i).Value = "Budget"的前面来添加更多单词，然后根据需要更改单词“ Budget”。

Next

Answer 2

您只需一行代码即可快速搜索单词并删除列：

Cells.Find(What:="Budget", After:=Range("A3"), LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows).EntireColumn.Delete

此行从单元格 A3 开始查找您想要的，然后按行搜索 SearchOrder 。

如果您想查找更多单词，只需复制并粘贴代码，然后更改内容