Ich lerne gerade VBA und möchet einen simplen Entscheidungsbaum programmieren. Wenn die und die Faktoren zu treffen kommt das Ergebnis raus ansonten kommt eine andere Wert raus. Bekomme bei meiner VBA Funktion immer den Wert 0 raus.
Was mache ich falsch? Hab den in VBA diese kleine Funktion im Bereich Modul eingegeben. Danke für eure Hilfe!
Public Function teilbaum(faktor1 As Integer, faktor2 As Integer, faktor3 As Double)
Dim faktor4 As String
If faktor1 = 1 Then
If faktor2 = 2 Then
If faktor3 = 1 Then
faktor4 = "A"
Else
faktor4 = "BC"
End If
End If
End If
teilbaum = "M11_" & faktor4
End Function
|