bestimmte Formel per VBA in Zelle
01.08.2003 15:44:00
cpete
ich wuerde gerne die folgende formel per vba in eine excel-datei einfuegen (und zwar so, dass die zeilenzahl immer eins hochgezählt wird bei den feldern ohne $$). Ich kriege das aber mit dem offset nicht hin.
auf english heisst die formel:
=IF(AND(F2=0;F3=0);G2;OFFSET(G2;MATCH(0;F3:$F$65536;0)-1;0))
auf deutsch:
=WENN(UND(F2=0;F3=0);G2;BEREICH.VERSCHIEBEN(G2;VERGLEICH(0;F3:$F$65536;0)-1;0))
so sieht mein versuch aus (der nicht funktioniert):
Set R = Range("B1").CurrentRegion
For I = 2 To R.Rows.Count
Cells(I, 8).FormulaR1C1 = "=IF(AND(RC[-2]=0,R[+1]C[-2]=0), _
RC[-1],OFFSET( *** hier weiss ich nicht weiter *** )-1,0)"
Next I
dank fuer jeden hinweis.
cpete