根据用户的输入选择整个列作为范围(在工作表2中),即标题名称'在使用vba的单元格/输入框(在工作表1中)中

时间:2016-06-14 18:35:36

标签: excel vba excel-vba

Dim ws1 As Worksheet, ws2 As Worksheet

Dim x As Range

Dim valX, valY

Set ws1 = Sheets("Sheet")

valX=ws1.Range("a1").Value

Set x = ws2.Range("a1:J1").Find(What:=valX,LookIn:=xlValues,lookat:=xlWhole)

上面的代码可以帮助我找到新工作表中的标题,但是我对将列选择为Range无能为力。

1 个答案:

答案 0 :(得分:0)

这应该选择列,但是,请记住select在VBA中不是一个好习惯 - 免责声明:在大多数情况下 -

ws2.Select    
Columns(x.column).Select