Thema: INDIREKT mit eingebetter Kalkulation | Herbers Excel-Forum

Hola, saludos liebes Forum.
Aller guten Dinge sind drei. Zwei mal habt Ihr mir heute schon ganz toll helfen können!
In Zelle A1 habe ich eine Formel: =($C1+$D1)/2. Nun lasse ich über ein Makro 2 Spalten vor Spalte C einfügen.
Nun haut das nicht mehr hin, weil die Formel in Zelle A1 umgeschrieben wird. Oft schon angesprochen. Als Lösung wird dann die Funktion INDIREKT angeführt. Dies funktioniert auch aaaber anscheinend nicht, wenn, wie in meinem Fall, eine Formel steht. Wer weiß Abhilfe?
Noch einmal Dank im voraus; ganz besonders an Hajo
Gruß Bernardo

Hallo Bernado,
da du ja bereits per Code die Spalten einfügst, wäre es am einfachsten, du schreibst die Formel für A1 im Code neu rein:
Sub Makro3()
    Columns("C:D").Insert Shift:=xlToRight
    Range("A1").FormulaR1C1 = "=(RC3+RC4)/2"
End Sub

Dann kannst du dir INDIREKT sparen.
Gruß,
Beate

jo, Beate, das wäre eine Möglichkeit. Danke!
Aber gibt es nicht auch eine andere Lösung? Gibt ja unheimlich viele WORKSHEET-Funktionen...
Saludosch
Bernardo

Hallo Bernado,
dann vielleicht mit Bereich.Verschieben:

	A	B	C	D
1	10		5	15

Formeln der Tabelle

Zelle Formel A1 =SUMME(BEREICH.VERSCHIEBEN(A1;0;2):BEREICH.VERSCHIEBEN(A1;0;3))/2

Guckst Du: Bereich.Verschieben
Gruß,
Beate

Kürzer geht es so:

	A	B	C	D
1	10		5	15

Formeln der Tabelle

Zelle Formel A1 =SUMME(BEREICH.VERSCHIEBEN(A1;0;2;;2))/2

Gruß,
Beate

genau, daß wäre auch noch eine Möglichkeit. Danke, daß Du noch nach einer Alternative geschaut hast.
Grüße Bernardo