Excel-Formel per Makro einfügen

Hallo zusammen,

ich möchte in Arbeitsmappen automatisch per Knopfdruck eine Formel einfügen. Meine einzufügende Formel lautet:

=WENN(R2=0;0;WENN(ISTFEHLER(SVERWEIS(Q2;‚Y:[Liste Juni 2009.xls]Tabelle2‘!$C$2:blush:C$13948;1;FALSCH));„nicht vorhanden!“;„OK“))

Als Makro hierfür habe ich bereits folgendes getestet:

Sub Formel()

Range(„S3“).Select
ActiveCell.FormulaR1C1 = „=WENN(R2=0;0;WENN(ISTFEHLER(SVERWEIS(Q2;‚Y:[Liste Juni 2009.xls]Tabelle2‘!$C$2:blush:C$13948;1;FALSCH));“„nicht vorhanden!“";"„OK“"))"

End Sub

Kann mir jemand helfen?

Danke schon mal im Voraus!

Daniel

Hallo Daniel,

bei FormulaR1C1 müßtest du die Formel im Z1S1-Format schreiben, A1 ist dann R1C1 usw.

Ersetze FormulaR1C1 durch FormulaLocal dann klappts.

Gruß
Reinhard

Perfekt!

Danke!! Ich weiß zwar nicht warum - aber es geht!!

Gruß

Daniel