如何使用计数器的值在VBA中查找列？

我有4列在Excel中，命名

“VOLUME1”
“卷2”
“Volume3”
“Volume4”

我有一个从1到4的计数器。

我想给我的variablesVol值取决于我的列的名称。

我做到了这一点：

 For j = 1 To 4 Vol = Application.Match("Volume" + " & j & ", Worksheets("Results").Range("A1:K1"), 0) 

但它不起作用。 任何想法？

Answer 1

试试这个 – 你的连接已经结束了

 For j = 1 To 4 Vol = Application.Match("Volume" & j, Worksheets("Results").Range("A1:K1"), 0) Next 

更好的方法使用查找

 Dim rng1 As Range For j = 1 To 4 Set rng1 = Sheets("Results").Range("A1:K1").Find("Volume" & j, , xlFormulas, xlWhole) If Not rng1 Is Nothing Then Debug.Print rng1.Address Next