Office: (Office 2003) Berechnung und Anzeige von Werten

d.h. ich lasse den Code ganau so wie er ist und ersetzte

Code:

durch

Code:

am Beginn des Codes?

Zum Thema Leere Textfelder: Einerseits werden immer alles befüllt und andererseits hast du mir die Funktion NZ() bereits eingebaut. *wink.gif*

 

Die Prozedurköpfe für Ereignisse solltest du nicht verändern.

Kopiere die bisherigen Codezeilen in eine Prozedur im Formular:

Code:

Diese Sub macht jetzt dasselbe wie der bisherige Code, aber du kannst sie unter dem Namen Neuberechnen aufrufen. Überall, wo "dasselbe" passieren soll, kannst du sie einsetzen. Also AfterUpdate der 5 Textfelder und BeforeUpdate (sorry!) des Formulars.

 

Also ich habe jetzt den gesamten Code in das Sub Neuberechnen() kopiert und wie kann ich das nun aufrufen? --> Sorry im voraus für die dämliche, dich warscheinlich leingweilende Frage....

 

Mach für jedes der 5 Textfelder folgendes:

• im Entwurf markieren
• Eigenschaftenfenster aufrufen (Symbol mit "Hand, die auf ein Fenster zeigt")
• Dort auf Karteikarte Alle nach dem Eintrag "Nach Aktualisierung" suchen, Cursor reinsetzen.
• Auswahl aufklappen und Wert Ereignisprozedur wählen.
• Drei-Punkte-Symbol dahitner anklicken. Du gelangst in den VBA-Rumpf der Ereignisprozedur.
• Da dann reinschreiben: Neuberechnen
• Ausprobieren!

 

Hallo
@Martin super gute Beschreibung *top

 

Wenn die nicht reicht, komm ich per UVNC SC rüber *biggrin.gif* *Sun

 

Weltklasse!

Herzlichen Dank Jungs für die nette und geduldige Erklärung!

 

Hallo leute,

Ich hab nun das Problem das ich im laufe der ständigen Berechnung die Fehlermeldung "Division durch Null" bekomme.

Hab nun versucht die Berechnungszeile mit Nz() umzuwandeln

Code:

--> funktioniert aber net! Ist es möglich das die Berechnung erst angestoßen wird wenn in allen relevanten Felder nichtmehr NULL oder 0 drinnen steht?

Lg Daniel

 

Hallo
schon versucht:
Me!ErgebnisBerechnet = Eval(Nz(strFormel,0))

evtl. sollte strFormel as Variant definiert sein den String kann nicht auf NULL gesetzt werden

wo und wie ist jetzt strFormel definiert ?
und wo wird es wie gesetzt ?

 

Hi,

wenn deine Formel mit eingesetzten Werten durch 0 dividiert, dann ist das nunmal nicht definiert. Was in diesem Fall passieren soll, weißt nur du.

Auf jeden Fall wirst du mit NZ(strFomel) nicth weit kommen, weil die Formel ja nicht NULL ist, sondern die Variablen darin, die als Divisor dienen.

Beispiel: die Formel evaluiert zu 45/0.

Was soll da bei dir rauskommen? Du könntest den Fall vielleicht vorher abfangen:

Wenn(K0, Z/K, "--")

 

Wenn es um den Divisor geht, wäre Nz(Feld, 1) günstiger und einfacher. Der Ausschluss von 0 ist aufwändiger.

 

Kommt drauf, was er will bzw. was er rechnet.

Beispiel Zinssatz = Zins/Kapital. Bei Kapital = 0 ist kein numerischer Zinssatz sinnvoll ermittelbar (auch nicht 0, auch nicht 1). Wird Kapital als 1 angesetzt, kommt ein Zinssatz in Höhe von Zins raus (zigtausend Prozent). Der ist genauso wenig sinnvoll wie alle anderen.