Thema Datum  Von Nutzer Rating
Antwort
Rot Solver VBA! HILFE!!!
 02.12.2010 15:37:52 Peter
NotSolved

Ansicht des Beitrags:
Von:
Peter		 Datum:
02.12.2010 15:37:52		 Views:
1656		 Rating:
     
Antwort:
  Ja
Thema:
Solver VBA! HILFE!!!
Hallo Zusammen,

seit tagen versuche ich mich jetzt damit den Solver in mein Modul einzubauen und es klappt einfach nicht. Ich hoffe ihr könnt mir helfen!!!!
Es geht daraum:

- In meinen Hauptprogramm wir über einige Formeln ein Stoffwert h_1 berechnet.

- Anschließend wird im Hauptprogramm die Unterfunktion mit dem Solver aufgerufen (siehe unten)

-hier soll die korrekte Temperatur t_2 ermittelt werden

-und zwar indem t_2 so verändert wird das die Differenz delta=0 werden soll.

-Delta ist die differenz aus h_1 aus dem hauptprogramm und h_2 (Funktion für h_2 wird im Solver aufgerufen)


----------------------------------------------------------------
Function Solver(t_2)
Solveroptions Precision:=0.000001
Solveroptions Convergence:=0.0001
Solveroptions Iterations:=100
Solveroptions MaxTime:=100s

h_2 = h2_berechnungsfunktion(t_2)
delta = h_1 - h_2

SolverOk SetCell:=(delta), MaxMinVal:=3, ValueOf:="0", ByChange:=t_2

SolverSolve UserFinish:=True

End Function
-----------------------------------------------------------------

Der Solver arbeitet aber gar nicht, d.h. er macht nichts. Verändert weder t_2 noch sonst irgendwas. Was mache ich falsch? Kann der befehl "SetCell" nur mit zellbezügen arbeiten? Wenn ja, wie kann ich das vollständig in VBA übersetzen?

Ich hoffe ihr könnt mir helfen...

Danke schon mal!

Grüße

Peter

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Solver VBA! HILFE!!!
 02.12.2010 15:37:52 Peter
NotSolved