0

我想通过使用“for-loop”将公式插入到一系列单元格中。我的公式引用了为每个循环更改的其他单元格。该公式本身有效，但是当我使用 Range.FormulaLocal 输入它时，它会发生变化，并且我对其他工作表的引用成为结构化引用。我不想这样，因为我的公式不适用于他们。我怎样才能改变这种行为，还是我必须改变我的公式？

    Dim aus As Range
    Dim Nr As Long
    Dim Bux As String
    Set aus = Range("C3")
    For Spalte = 3 To 15 Step 2
    For Zeile = 3 To 10 Step 1
    Nr = aus.Row
    Bux = Buchstabe(aus.Column)
    aus.Select
    Formel = "= VLOOKUP(Auswertung!A" & Nr & "&B" & Nr & "&" & Bux & "1;CHOOSE({1,2,3};Daten!A:A&Daten!B:B&Daten!C:C;Daten!D:D);2;FALSE)"
    Selection.Formula2 = Formel
    Set aus = aus.Offset(1, 0)
    Next
    Set aus = Range(Bux & "3")
    Set aus = aus.Offset(, 2)
    Next

公式应该如下所示：

=SVERWEIS(Auswertung!A3&B3&C1;WAHL({1.2.3};Daten!A:A&Daten!B:B&Daten!C:C;Daten!D:D);2;FALSCH)

但最终看起来像这样：

=SVERWEIS(Auswertung!A3&B3&C1;WAHL({1.2.3};@Daten!A:A&@Daten!B:B&@Daten!C:C;Daten!D:D);2;FALSCH)

英文版：期望

=VLOOKUP(Auswertung!A3&B3&C1;CHOOSE({1.2.3};Daten!A:A&Daten!B:B&Daten!C:C;Daten!D:D);2;FALSE)

现实：

=@ VLOOKUP(Auswertung!A4&B4&C1;CHOOSE({1.2.3};@Daten!A:A&@Daten!B:B&@Daten!C:C;Daten!D:D);2;FALSE)

提前致谢。

4

0 回答 0