So geben sie einen wert aus einer vba-funktion zurück (mit beispielen)

Um einen Wert von einer Funktion in VBA zurückzugeben, müssen Sie den Wert dem Funktionsnamen zuweisen.

Wir können beispielsweise die folgende Funktion erstellen, um zwei Werte zu dividieren und dann das Divisionsergebnis zurückzugeben:

 Function DivideValues(x,y)
    DivideValues = x / y
End Function

Der Name dieser Funktion ist DivideValues . Um also einen Wert von dieser Funktion zurückzugeben, müssen wir das Ergebnis von x/y einer gleichnamigen Variablen von DivideValues zuweisen.

Wenn Ihre Funktion eine If Else- Logik umfasst, können Sie den Wert dem Funktionsnamen mehrmals zuweisen.

Sie können beispielsweise die folgende Funktion erstellen, die „Kann nicht durch Null dividieren“ zurückgibt, wenn Sie versuchen, durch Null zu dividieren, oder einfach das Ergebnis der Division zurückgibt:

 Function DivideValues(x,y)
    If y = 0 Then
      DivideValues = " Cannot divide by zero "
    Else
      DivideValues = x / y
    End If
End Function

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Beispiel: So geben Sie einen Wert von einer VBA-Funktion zurück

Angenommen, wir möchten in VBA eine Funktion erstellen, um den Wert von Zelle A2 durch den Wert von Zelle B2 zu dividieren:

Dazu können wir folgende Funktion erstellen:

 Function DivideValues(x,y)
    DivideValues = x / y
End Function

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Die Funktion gibt einen Wert von 5 zurück, der das Ergebnis von 50 dividiert durch 10 ist.

Wir könnten auch eine Funktion erstellen, die die If Else-Logik verwendet, um zunächst zu prüfen, ob der Wert, durch den wir dividieren, nicht gleich Null ist:

 Function DivideValues(x,y)
    If y = 0 Then
      DivideValues = " Cannot divide by zero "
    Else
      DivideValues = x / y
    End If
End Function

Wenn wir den Wert in Zelle B2 ändern und dann mit dieser Funktion eine Division durchführen, erhalten wir folgendes Ergebnis:

Da wir versucht haben, durch Null zu dividieren, gibt die Funktion „Kann nicht durch Null dividieren“ zurück.

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

So kommentieren Sie einen Codeblock in VBA aus
So überprüfen Sie mit VBA, ob eine Datei vorhanden ist
So erstellen Sie Ordner mit VBA