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

Hochkomma in Formeln (VBA)

155 views
Skip to first unread message

Ralph Zinkeler

unread,
Jun 26, 2001, 7:04:55 AM6/26/01
to
Hallo NG,


ich will in einer Tabelle eine Zelle mit einer Formel füllen. Leider nimmt er
mir die Hochkommas nicht an.
Kann mir jemand helfen ?


Vielen Dank im Voraus


Hier der entsprechende Ausschnitt:


' =WENN(F21>0;F21*1000/F25/PI();"") Das ist die richtige Formel


Me.Range("F21").Select
Set c = ActiveCell
c.Value = 0
Me.Range("J21").Select
Set c = ActiveCell
ActiveCell.Formula = "=WENN(F21>0,F21*1000/F25/PI())" ' Hier muesste das
Hochkomma rein;hinter PI()

--
__________________________________________________________
News suchen, lesen, schreiben mit http://newsgroups.web.de

Michael Wendeler

unread,
Jun 26, 2001, 7:14:09 AM6/26/01
to
Hallo Ralph,


das Hochkomma in Excel gibt an, daß es sich nicht um eine Formel handelt,
sondern um einen Text.


Möchtest du nun, daß das Hochkomma mit angezeigt wird, mußt du zwei Hochkomma
hintereinander setzen.


Gruß
M. Wendeler
www.wendelers.de

Werner Rohrmoser

unread,
Jun 26, 2001, 7:19:55 AM6/26/01
to
Sorry, Korrektur mit 2 Hochkommas:

ActiveCell.Formula = "=IF(F21>0,F21*1000/F25/PI(),"""")"

"Werner Rohrmoser" <wrohr...@de.stabilus.com> schrieb im Newsbeitrag
news:9h9qt3$79...@sunny.mannesmann.de...
> hallo Ralph,
>
> probiere es mit:
>
> ActiveCell.Formula = "=IF(F21>0,F21*1000/F25/PI(),"")
>
> Es sind die englischen Funktionsbezeichnungen zu nehmen.
> Siehe auch Thread "XL97 Cells.Formula"
>
> Gruß
> Werner
>
> "Ralph Zinkeler" <Ralph.Z...@blb.de> schrieb im Newsbeitrag
> news:3b386c57$1...@netnews.web.de...

Werner Rohrmoser

unread,
Jun 26, 2001, 7:15:47 AM6/26/01
to
hallo Ralph,

probiere es mit:

ActiveCell.Formula = "=IF(F21>0,F21*1000/F25/PI(),"")

Es sind die englischen Funktionsbezeichnungen zu nehmen.
Siehe auch Thread "XL97 Cells.Formula"

Gruß
Werner

"Ralph Zinkeler" <Ralph.Z...@blb.de> schrieb im Newsbeitrag
news:3b386c57$1...@netnews.web.de...

0 new messages