Bereich.Verschieben analog ActiveCell.Offset
19.07.2015 17:13:28
Gerd
ich suche ein Möglichkeit den VBA Befehl ActiveCell.Offset(x,y) analog als Excel Formel umzusetzen.
In VBA gibt mir der Befehl den Wert einer anderen Zelle, mit entsprechendem Versatz zur aktiven Zelle zurück z.B. ActiveCell.Offset(0,2) den Wert zwei Zellen rechts von der aktiven Zeilen.
Ich möchte das gleiche mit einer normalen Excel Formel erreichen. Ich kenne den Befehl Bereich.Verschieben, der hilft mir aber nur teilweise. Er erwartet als Parameter Bezug, Zeilen, Spalten. Den Bezug möchte ich aber nicht angeben.
Es funkioniert also wenn ich in die Zelle C2 schreibe Bereich.Verschieben("C2";0;2), dann erhalten ich den Wert in Zelle E2 zurück. Ich möchte aber in Zelle C2 schreiben
(Pseudoformel) "=Bereich.Verschieben(ActiveCell;0;2)", das schaffe ich aber nicht.
Kann ich die aktuelle Zelle irgendwie indirekt über Me, This.... referenzieren ? Oder gibt es andere Vorschläge einen Wert relativ zur aktuellen Zelle zu lesen ?
Viele Grüße,
Gerd