Benutzerdefinierte Funktionen funktionieren nicht in Excel-VBA

Aus irgendeinem Grund benutzerdefinierte Funktionen scheinen nicht zu sein, läuft in Excel. Ich habe die einfache Funktion unten, aber es gibt immer null als Wert, ob es ist als Arbeitsblatt-Funktion oder Aufruf aus einer Prozedur. Wer weiß, was ich falsch mache oder ob es irgendwo eine Einstellung fehlt mir?

  Public Function Testthisout(number As Double) As Double
    result = number * number
  End Function

  Public Sub TESTFUNCTION()
    Dim number As Double
    Dim result As Double

    Application.Volatile (True)

    number = 4
    result = Testthisout(number)
    MsgBox result
  End Sub
InformationsquelleAutor Marc L | 2013-02-13
  1. 3

    Ändern Sie Funktion:

    Public Function Testthisout(number As Double) As Double
  result = number * number
  Testthisout = result
End Function
    • NÖ, noch erhalten 0 zurückgegeben. Keine Ahnung, wenn ich excel neu installieren vielleicht
    • Versuchen Testthisout = number * number. Ihr problem ist, dass Sie nicht zuordnen result zu der Funktion " Rückkehr Wert.
    • Ich habe nur wiedergegeben - es funktionierte gut für mich
    • Vielen Dank - offensichtlich im Nachhinein, aber sehr frustating, wenn Sie es versäumen!
    InformationsquelleAutor Andrey Gordeev
Schreibe einen Kommentar