指向一个单元格,其中单元格名称由2个不同单元格的内容组成

时间:2013-02-14 16:38:01

标签: excel vba

在单元格A2中,我有值F,在B2中,我有内容“4”,然后宏指向F4单元格值。 我写了下面的代码,但它给出了对象错误。 请帮忙

Sub TransferValues()

Dim rngA As Range
Dim rngB As Range
Dim srcAddress As Range
Dim destAddress As Range
Dim r As Long   'row iterator
VarW1 = "a.xlsx"
Sht1 = "Sheet1"
Set rngA = Range("H2", Range("H2").End(xlDown))
Set rngB = rngA.Offset(0, 1)

For r = 1 To rngA.Rows.Count
Set srcAddress = Range(rngA(r).Value & Range("H2").Value).Value
Set destAddress = Range(rngB(r).Value & Range("I2").Value).Value
destAddress.Value = srcAddress.Value
Next

End Sub)

3 个答案:

答案 0 :(得分:2)

如果您对VBA不熟悉EVALUATEINDIRECT - 您可以使用此功能:

x = Range(Range("A2").Value & Range("B2").Value).Value

您也可以使用Cells(row, column)语法在单元格之间循环。

答案 1 :(得分:1)

尝试以下公式:=INDIRECT(A2&B2)

答案 2 :(得分:0)

使用间接公式。对于您的示例,= indirect(A2& B2)将为您提供F4中的值。

Here's a nice write-up你可以用间接做什么。