VBA-Typenkonflikt bei Public Function
14.11.2017 08:35:59
Tom
im Zuge einer Studienarbeit muss ich ein paar VBA-Zeilen programmieren.
Grundlage ist die Berechnung verschiedener Zustandsgrößen in Unterscheidung verschiedener Temperatur und Druckbereiche durch verschiedene Formeln.
Dazu habe ich eine einfache aufrufbare Funktion (Public Function) runtergeschrieben:
Zuerst kommt die Unterscheidung der einzelnen Bereiche über "if-Anweisungen" und dann die Berechnung der ZG über eine "Case-Auswahl".
Public Function h(T As Double, p As Double) As Double
If T > 273.15 And T 623.15 And T = 273.15 Then
If p gren_4 Then
Bereich = 1
ElseIf p 0 Then
Bereich = 2
End If
ElseIf T 623.15 Then
If p pb23 Then
Bereich = 3
ElseIf p 0 Then
Bereich = 2
End If
ElseIf T > 863.15 And T 0 And p 1073.15 And T 0 And p
In den einzelnen Schleifen stehen jeweils nur normale Funktionen mit Grundrechenarten, ebenfalls für die Zuweisung von "h" in jedem Case. Dort habe ich alles auf logische- oder Tippfehler abgesucht und überprüft, das passt alles.
Leider bekomme ich nur beim Aufrufen der Funktion die Fehlermeldung "Typenkonflikt".
Hat vielleicht irgendjemand eine Idee woran es liegen könnte und kann mir helfen?
Danke und LG Tom