excel - 使用整数作为列引用

Question

大家好，我目前正在尝试使用“cl.column”来建立要在循环中使用的列。我的代码的相关部分如下。

我遇到的问题是，因为 cl.column 将列存储为数字，所以我不知道如何在循环中引用它，因为它不是字母。

for each cl in activesheet.range("A1:BZ1")
if instr(cl, "Deuda") > 0 then
StoredColumn = cl.column
end if
next cl

for each cl In Workbooks(MesActual).Worksheets("Deuda").Range(ColumnA & "8", ColumnA & CounterA)

Answer 1

我对你的问题有点困惑。您将“c.column”存储在“StoredColumn”中，但找不到您尝试使用它的位置。

但是，每当我需要使用 Range 对象并且如果我有列号而不是列字母时，我将尝试如下使用。可能这可以帮助你。

Sub test()
   For Each cel In Range("A1:Z1")
     colno = cel.Column
     ActiveSheet.Range(Cells(1, cel.Column).Address) = cel.Column
   Next
End Sub

谢谢，拉马纳