Office: (Office 2019) SEHR GROßE ZAHLEN EXPONENZIEREN

Hallo an alle Experten,

gibt es eine Möglichkeit, in Excel Zahlen (sowohl positiv, negativ, auch rational), auch mit deutlich mehr als 20 Kommastellen, zu exponenzieren, und dies
auch mit sowohl positiven, negativen (auch rationalen) Exponenten? Ich denke, das kann man dann auch für Umkehroperationen (Wurzeln) nutzen.

Ein Beispiel wäre

4.055,546363737^3,5

oder auch

5.656.747,543635737373^-0,2803

Vermutlich gäbe es auch Ansätze in VBA, allerdings bin ich kein Excel oder VBA-Kenner, daher meine Frage.

Ich hatte bereits Hilfe bei Add-Ins, die sehr große Zahlen in den Grundrechenarten verarbeiten, allerdings fehlt noch das Exponenzieren.

Vielen Dank.

 

Hallo Matura,

vorab: Ich kann Dir nicht helfen.
Trotzdem nachgefragt: kann es sein, daß Du diese oder ähnliche Fragestellung schon vor ein paar Tagen auch in anderen XL-Foren (u.a. hier: HERBERS Excel Forum: Der Treffpunkt für Excel Anwender) gestellt hattest?

 

vorab: hm, warum dann der Kommentar?
Trotzdem nachgefragt: ja, ist das verboten?

 

Hallo Matura,

nein es ist nicht verboten. Aber Du solltest in so einem Fall immer auf die anderen threads verlinken.

 

Es handelt sich um ein anderes Forum, deshalb hier ein weiterer Versuch.

 

Ich gehe mal davon aus, dass der alter ego von Matura LadyD ist.
Es ist schlicht nicht möglich, zu helfen, weil eine "gewisse" Beratungsresistenz besteht.
Auf herber wurde ein Thread gelöscht, weil Madame sich beleidigt fühlte;
auf Office-Fragen warf sie selbst das Handtuch (nach Ermahnung des Moderators);
jetzt also unter neuem Namen auf herber und hier.
Folglich hier nur kurz:
Nutze ein Mathematikprogramm wie MatLab oder schlicht den Taschenrechner.

Vba "könnte" mittels CDec() einen (imaginären) Datentyp Decimal abbilden, der an Excel aber nur als Text(!) übergeben werden kann (Rechengenauigkeit 15 Stellen).
Wenn Du folglich einen Algorithmus darstellen kannst, der obige Potenzierung abbildet, könnte es sogar sein, dass Dir jemand bei der Umsetzung hilft.
Aber das kannst und willst Du sicherlich nicht, sondern stehst ausschließlich auf spoon feeding.

Isn't it?

 

MOF und CEF fehlen noch, oder?

Mein Vorschlag wäre bei Techcommunity oder MrExcel oder VBA Express nachfragen. Da wäre es von Vorteil wenn die Frage auf englisch gestellt wird.
Evtl auch noch Stackoverflow. Aber da muss man hart im Nehmen sein.
"Stack Overflow gilt bei vielen, vor allem neuen Nutzern, als toxisch oder elitär. Fragen, die nicht den hohen Anforderungen der Plattform entsprechen, erhalten meist negative Bewertungen und abfällige Kommentare."

Bitte beachten: Ziemlich jedes Forum hat eine Crossposting-Policy. Also vorher die Regeln durchlesen.

 

Mahlzeit!
Folgender Beitrag ist ausdrücklich nicht an unsere Idiotin gerichtet.
[Disclaimer: Das Wort Idiotin stellt selbstverständlich keine Beleidigung dar, weil ich mich streng an die ursprüngliche Bedeutung halte]

Ich habe in meinem Fundus eine Funktion zum Errechnen der Reiskörner auf dem Schachbrett.
Die mathematische Funktion ist ja ganz einfach:
=2^64-1
In Excel eingegeben, schlägt die Rechengenauigkeit zu:

	A
1	falsche Zahl
2	18.446.744.073.709.600.000

Zelle	Formel
A2	=2^64-1

Dies konnte ich mit folgendem Code und dem Nutzen des "imaginären" Datentyps Decimal lösen.

Code:

Function Schachbrett() As String
Dim tmpPotenz As Variant
  tmpPotenz = CDec(2 ^ 32)
  Schachbrett = Format(CDec(tmpPotenz * tmpPotenz - 1), "#,##0")
End Function

Falls es jemanden interessiert, warum ich nicht gleich folgendes genommen habe:

Code:

CDec(2 ^ 64 - 1)

Der Ausdruck in der Klammer würde erst mit der "normalen" Rechengenauigkeit von Excel ausgerechnet werden!
Direktfenster:

Code:

?CDec(2 ^ 64 - 1)
 18446744073709600000 

Deshalb wird 2^64 in 2 Decimal-Faktoren umgewandelt.

	A
4	korrekte Zahl
5	18.446.744.073.709.551.615

Zelle	Formel
A5	=Schachbrett()

Ich habe übrigens einen sehr interessanten Artikel über einen anderen Rechenweg gefunden.
Verfasser ist der (ehem.) MVP Mourad Louha.
(Interessanterweise der Moderator von Office-Fragen, der unserer Krakelerin deutlich gesagt hat, was er von ihr hält)
Aber soviel vorab:
Ist kein leichter Stoff!
In Excel mit sehr großen Zahlen rechnen - Teil 4 - Potenzierung • Excel Ticker

Gruß Ralf

 

Hallo,

Dein Zahlenbeispiel fürs Potenzieren großer Basiszahlen:

Da du das Problem bei den Grundrechenarten (mit großen Zahlen) zufriedenstellend beherrschst (und vermutlich auch das Potenzieren kleiner Zahlenbasen), möchte ich ganz kurz die mathematischen Grundlagen erwähnen, die sich bei großen Zahlenbasen ergeben.

Ich nenne die Zahlenbasis deines Beispiels c = 5.656.747,543635737373
und den Exponenten dieses Beispiels n = -0,2803
Dein Problem besteht darin folgende Berechnung beliebig "großer" Zahlenbasen auszuführen:
Mit normalen Excel-Operationen kommt da c^n = 0,0128013427809684 heraus.

Um das c zu verkleinern, muss man es multiplikativ zerlegen in Faktoren, zB. c = a*b
Dann ergibt sich nämlich: c^n = (a*b)^n = (a^n) * (b^n)

Ich habe im Beispiel zB. a = 5656 gewählt, womit sich b = c/a = 1000,13216825243 ergibt.
Man erhält für: a^n = 0,0887506648148014
Man erhält für: b^n = 0,14423940156033
Multipliziert man beides (a^n) * (b^n) erhält man wieder: (a^n)*(b^n) = 0,01280134278096840 (=c^n)

Ich habe obiges Beispiel nur mit der eingebauten Genauigkeit von Excel gerechnet. Da du aber über hochgenaue Rechenverfahren verfügst, dürfte die Umsetzung ja kein Problem sein.

Anmerkung: Hat man zB. für a^n kein Rechenverfahren, kann man es, um es mit Excel-Formeln zu formulieren, auch mit folgender Formel berechnen: a^n = EXP(n*LN(a))

 

Danke für den Schubser, Anton!
Jetzt das Ganze mal mit Stringübergabe an eine Zelle und Anwendung Von CDec() und CStr()
Allerdings erhalte ich ein anderes Ergebnis als der Taschenrechner …

Code:

Function GrosseZahlen()
Dim Vorkomma, Nachkomma, Exponent, Zahl1, Zahl2
Vorkomma = CDec(5656747)
Nachkomma = CDec(0.543635737373)
Exponent = CDec(-0.2803)
Zahl1 = CDec(Vorkomma + Nachkomma)
Zahl2 = CDec(Zahl1 / Vorkomma)
GrosseZahlen = CStr(CDec(Zahl1 ^ Exponent) * CDec(Zahl2 ^ Exponent))
End Function

Lokalfenster bei End Function:

	A
1	0,0128013424361266474522112228

Zelle	Formel
A1	=GrosseZahlen()

 

Hallo @RPP63_neu,

die Differenz entsteht, weil dir ein kleiner Fehler in der Function unterlaufen ist in der letzten Zeile.
Die korrekte Version:
GrosseZahlen = CStr(CDec(Vorkomma ^ Exponent) * CDec(Zahl2 ^ Exponent))

Code:

Function MeineGrosseZahlen()
   Dim Vorkomma, Nachkomma, Exponent, c, a, b
   Vorkomma = CDec(5656747)
   Nachkomma = CDec(0.543635737373)
   Exponent = CDec(-0.2803)
   c = CDec(Vorkomma + Nachkomma)
   a = Vorkomma
   b = CDec(c / Vorkomma)
   MeineGrosseZahlen = CStr(CDec(a ^ Exponent) * CDec(b ^ Exponent))
End Function

Ich habe mich gestern etwas gespielt und die Quadrier/Multiplizier-Methode (die mir bekannt war) mit einer LAMBDA-Funktion in Excel365 nachgebaut. Angewandt aufs angeführte Beispiel 3^200 sieht diese so aus:
=LAMBDA(basis;exponent; LET(IstMinEx; exponent < 0; bex; DEZINBIN(ABS(exponent)); aex; TEIL(bex; SEQUENZ(LÄNGE(bex)); 1); pot; REDUCE(1; aex; LAMBDA(Akk;b; Akk * Akk * WENN(b = "1"; basis; 1))); WENN(IstMinEx; 1 / pot; pot)))(3; 200)

Das Problem dieser Version ist natürlich, dass
1) der Exponent ganzzahlig sein muss (entweder negativ, null oder positiv)
2) das Resultat nur die (begrenzte) Genauigkeit von Excel besitzt.

Dargestellt mit dem Microsoft-Add-In fürs Formel-Editieren:

 

Ich habe mir erlaubt, hier mal feucht durchzuwischen...

 

Vielen Dank!
Denkbar, dass jetzt so etwas kommt:

Siehe:
EXPONENZIEREN und WURZELN ZIEHEN