使用VBA在Excel中遍历表格范围的第一列

Question

这应该很简单，但我有点卡壳了。

在一个工作表中，我有一张名为“ClientReturns”的表格。该表格的第一列包含客户的帐号。

我想要循环遍历该表格，并每次获取帐号。目前我的代码可以实现这个功能，但也会获取其他列中的数据，而我只需要第一列的数据。

Sub doStuff()

    Set ClientTable = Sheets("Returns").range("ClientReturns")
    For Each tRow In ClientTable
        AccNum = tRow.Columns(1).Value
        'Do stuff with the account num
    Next AccNum

End Sub

非常感谢您的回答，我用以下方法解决了这个问题：

Sub getReturns()

    Dim lookR As range, c As range
    With Sheets("Returns").ListObjects("ClientReturns")
        Set lookR = .ListColumns("Account Number").DataBodyRange
        For Each AccNum In lookR.Cells
            'Let's see if it's a combined account
        Next AccNum
    End With

End Sub

- harryg

Answer 1

更直接地说，只与第一列一起工作。

Dim ClientTable As Range
Dim rng1 As Range
Set ClientTable = Sheets("Returns").Range("ClientReturns")
For Each rng1 In ClientTable.Columns(1).Cells
    AccNum = rng1.Value
Next

- brettdj

Answer 2

For Each tRow In ClientTable 被解释为 For Each tRow In ClientTable.Cells
请尝试改成：
For Each tRow In ClientTable.Rows

- KekuSemau