如何基于列标题选择多个列

Question

我设法使用以下代码基于列标题（列标题为“ COV”）仅选择一列

但是，我需要根据其列标题选择多个列，例如“ COV”和“ VAR”

我试图修改下面的代码，但到目前为止还没有成功。

Sub New1()
Rows("1:1").Select

Selection.Find(What:="COV", After:=ActiveCell, LookIn:= _
xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
xlNext, MatchCase:=False, SearchFormat:=False).EntireColumn.Select

End Sub