我正在尝试获取索引位置的单元格地址。使用下面的代码,我处于那个位置,但是当我尝试获取地址时,我不起作用。
Sub IndexAndMatch()
DeclareVarsHrsRole
Dim k As Integer
Dim i As Integer
Dim y As Integer
For i = 1 To AwardTBL.ListRows.Count
If AwardTBL.ListColumns("Home").DataBodyRange(i) = Range("SelectedCareHome") Then
For k = AwardTBL.ListColumns("NVQ qualification").Index To AwardTBL.ListColumns("Care
Supplement (GC only)").Index
For y = Table17.ListColumns("NVQ qualification").Index To Table17.ListColumns("Care
Supplement (GC only)").Index
If AwardTBL.ListColumns(y) = Table17.ListColumns(k) Then
Range(Table17.ListColumns(k)).Address
End If
Next y
Next k
End If
Next i
End Sub
任何想法。
谢谢