🎄 Helfen Sie noch heute, unser LibreOffice Forum zu erhalten! 🎄
❤️ Nur noch wenige Tage, um das Ziel für 2025 zu erreichen. Vielen lieben Dank! ❤️
>> Das LibreOffice-Forum lebt von Ihnen – und von vielen Experten, die freiwillig ihr Wissen teilen.<<
Ihre Spende hilft, die Community offen, werbefrei (bei Registrierung) und lebendig zu halten. Vielen Dank!

❤️ HELFEN SIE JETZT >> << HELFEN SIE JETZT ❤️

🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗


[gelöst] ein Double-Ergebnis in der msgbox 2-stellig ausgeben wie?

Alles zur Programmierung im LibreOffice.
Antworten
wega
Beiträge: 133
Registriert: Mi 16. Jul 2014, 19:15

[gelöst] ein Double-Ergebnis in der msgbox 2-stellig ausgeben wie?

Beitrag von wega » Do 28. Mai 2020, 22:14

Hallo zusammen,

bei einer Rechenaufgabe wird mit dem Format "Double" gerechnet.
Das Ergebnis sollte aber in einer msgbox nur 2-Stellig dargestellt werden.

Geht das? Wenn ja, wie?

Mit Gruß
Werner
Zuletzt geändert von wega am Fr 29. Mai 2020, 21:49, insgesamt 1-mal geändert.

gogo
* LO-Experte *
Beiträge: 1081
Registriert: Sa 5. Feb 2011, 19:07

Re: ein Double-Ergebnis in der msgbox 2-stellig ausgeben wie?

Beitrag von gogo » Fr 29. Mai 2020, 10:44

... warscheinlich mehrere Möglichkeiten ...

Code: Alles auswählen

Option VBASupport 1
Sub Main
a=3/7
msgbox str(Round(a,2))
' ergibt ".43"
end sub

Code: Alles auswählen

Sub Main
a=3/7
s= split(str(a), ".")
msgbox s(0) + "." + left(s(1),2)
'' ergibt "0.42"
end sub
g
2008 LucidL./MaverickM./WinXP LibreOffice 3.3.2 > 02/13 LinuxMint13/Xubuntu > 09/13 Debian Wheezy+LO3.5.4.2 > 01/15 Debian Jessie KDE+LO4.3.3.2/Mint17 openbox auf USB+LO4.2.8.2 > 03/16 ArchLin & LO5.1+ff > 02/18 Kubuntu

wega
Beiträge: 133
Registriert: Mi 16. Jul 2014, 19:15

Re: ein Double-Ergebnis in der msgbox 2-stellig ausgeben wie?

Beitrag von wega » Fr 29. Mai 2020, 21:48

Danke Dir,

damit ist mein Problem gelöst.

viele Grüße Werner

mikele
* LO-Experte *
Beiträge: 1985
Registriert: Mo 1. Aug 2011, 20:51

Re: [gelöst] ein Double-Ergebnis in der msgbox 2-stellig ausgeben wie?

Beitrag von mikele » Sa 30. Mai 2020, 11:43

Hallo,
oder auch

Code: Alles auswählen

msgbox format(3/7,"#0.00")
Gruß,
mikele


An alle, die das LibreOffice-Forum gern nutzen und unterstützen wollen:


Bitte helfen Sie uns mit 7 Euro pro Monat.
Durch Ihren Beitrag tragen Sie dazu bei, unsere laufenden Kosten für die kommenden Monate zu decken.
Unkompliziert per Kreditkarte oder PayPal.
Als ein kleines Dankeschön werden Sie im LO-Forum als SUPPORTER gekennzeichnet.



Antworten