Thema Datum  Von Nutzer Rating
Antwort
Rot Interation mit For-Schleife>>Ergebnis konvergiert zu früh
07.01.2016 12:14:24 Benjamin94
NotSolved
07.01.2016 12:17:39 Benjamin94
NotSolved
07.01.2016 13:01:38 Gast61586
NotSolved
07.01.2016 13:20:13 Benjamin94
NotSolved

Ansicht des Beitrags:
Von:
Benjamin94
Datum:
07.01.2016 12:14:24
Views:
2557
Rating: Antwort:
  Ja
Thema:
Interation mit For-Schleife>>Ergebnis konvergiert zu früh

Folgende Formel: https://picload.org/image/wrlagro/colebrook.png soll mit einer FOR-Schleife fünf mal berechnet werden.

Function Colebrook(ByVal ReynoldsZahl As Double, Rohrdurchmesser As Double) As Double
'Berechnung nach Gesetz von Colebrook:
    Const kStahl As Double = 0.0001
    Dim Rohrreibungszahl As Double
    Dim LogX As Double
    
    Rohrreibungszahl = 0.01
         
    For i = 1 To 5
  
    Rohrreibungszahl = ((Log(2.51 / ReynoldsZahl * Sqr(Rohrreibungszahl) + 0.27 * kStahl / Rohrdurchmesser) / Log(10)) * -2)
    Rohrreibungszahl = Rohrreibungszahl * Rohrreibungszahl
    Rohrreibungszahl = 1 / Rohrreibungszahl
    Cells(1 + i, 10) = Rohrreibungszahl
    Next i
        
    Colebrook = Rohrreibungszahl
    
End Function

Berechnung mit folgenden Werten:
start Rohrreibungszahl = 0.01
ReynoldsZahl = 33000
Rohrdurchmesser = 0.03

Ergebnis der fünf Durchläufe oder direkt in Excel ohne VBA:
0,02701421
0,02705575
0,02705583
0,02705583
0,02705583
Laut des Beispiels soll das Ergebnis aber bei 0.0303 liegen, welches ich mit meinem Casio auch überprüft habe.

Kann mit jemand sagen was Excel für ein Problem hat?

 


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 Interation mit For-Schleife>>Ergebnis konvergiert zu früh
07.01.2016 12:14:24 Benjamin94
NotSolved
07.01.2016 12:17:39 Benjamin94
NotSolved
07.01.2016 13:01:38 Gast61586
NotSolved
07.01.2016 13:20:13 Benjamin94
NotSolved