Absoluter Zellbezug
05.02.2016 09:06:10
jana
weiß jemand, wie ich die Matrix in meinem Sverweis in einen absoluten Zellbezug setzen kann? Mein Makro sieht so aus:
Sub Sverweis()
Dim i As Integer
i = Sheets("Tabelle1").UsedRange.SpecialCells(xlCellTypeLastCell).Row
Sheets("Tabelle2").Activate
Range("FG6").Select
ActiveCell.FormulaLocal = "=Sverweis(" & Cells(6, 3).Address(0, 0) & ";Tabelle1!" & Cells(5, 2). _
Address(0, 0) & ":" & Cells(i, 8).Address(0, 0) & ";7;falsch)"
End Sub
Es klappt auch, bis auf das Problem, dass die Zellangaben der Matrix (Tabelle1!" & Cells(5, 2).Address(0, 0) & ":" & Cells(i, 8).Address(0, 0)) relativ sind und ich die Formel daher nicht einfach per Mausklick "runter ziehen" kann. Vielen Dank für Eure Hilfe vorab!
Viele Grüße
Jana