Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

mit VBA Formel in Zelle schreiben

27 views
Skip to first unread message

Michael Brinkmann

unread,
Oct 22, 2002, 7:42:38 PM10/22/02
to
Warum gibt mir folgender Code in der mit Summe benannten Zelle
zunächst einen Bezugsfehler aus?
In der Befehlszeile steht die gewünschte Formel.
Nach F2 und Eigabetasteste stimmt dann alles.


SuFormel = "=Summe(C2:C13)"
Range("Summe").Value = SuFormel

Das in Excel 2000


Carsten Froehlich

unread,
Oct 22, 2002, 7:07:27 PM10/22/02
to
Hallo Michael,

hast Du's schon mal mit

Range("Summe").formula="=summe(c2:c13)"

versucht?

Gruesse

Carsten


Martin Worm

unread,
Oct 23, 2002, 2:47:03 AM10/23/02
to
On Wed, 23 Oct 2002 00:42:38 +0100, Michael Brinkmann wrote:


hallo Michael,

mit Value kann man Werte zuweisen. Du willst eine Formel einfügen.
In deinem Fall müßt du Formulalocal verwenden

Range("Summe").FormulaLocal = SuFormel

hth

--
E-Mail von Martin Worm, Karlsruhe, Deutschland
die From-Adresse wird selten abgefragt
benutze Excel2000(9.0.2812) Win ME
Antworten bitte nur in die Newsgroup

Frank Arendt-Theilen

unread,
Oct 23, 2002, 3:16:44 AM10/23/02
to
Hallo Michael,
wie folgt:

SuFormel = "=SUM(C2:C13)"


Range("Summe").Value = SuFormel

Anmerkung:
Der Bereichsname sollte besser nicht mit dem namen einer Funktion
identisch sein (hier: Summe)!

MfG Frank
_____________________________________________________
Frank Arendt-Theilen, Microsoft MVP für Excel, Hameln
eMail: Thei...@t-online.de, Homepage: http://www.xl-faq.de

Michael Schwimmer

unread,
Oct 22, 2002, 11:39:51 PM10/22/02
to
Hallo Michael,

"Michael Brinkmann" <mb.will...@weihe-brinkmann.de> schrieb im
Newsbeitrag news:ap4k97$qoo$03$1...@news.t-online.com...

Range("Summe").FormulaLocal= SuFormel


oder Range("Summe").Formula, dann aber den englischen Funktionsnamen Sum.

MfG
Michael

Michael Brinkmann

unread,
Oct 24, 2002, 10:15:11 AM10/24/02
to
Formulalokal hat geholfen.
Sum statt Summe auch
Allen meinen Dank

-Michael Brinkmann-
Mainz

0 new messages