Es ist immer wieder ganz nützlich aus einer Prozedur eine andere Prozedur aufzurufen. Dabei ist es dann natürlich auch ratsam, Parameter zu übergeben, die in der aufgerufenen Prozedur weiterverarbeitet werden können.
Hier zeige ich Ihnen einmal ein Beispiel, wie so etwas aussehen könnte. Die Parameterübergabe erfolgt über eine Definition in der ersten Zeile der Prozedur. Hierbei wird die Variable und der Typ definiert. Hier folgt ein einfaches Beispiel:
Sub Ortanzeige(Ort As String, PLZ As Long)
Ort = PLZ & " " & Ort
MsgBox Ort
End Sub
Hierbei wird der Ort als String und die Postleitzahl als Long-Typ definiert. Danach werden die übergebenen Werte in der Variable Ort zusammengeführt und über die MSGBox ausgegeben.
Übergabe der Parameter
Wichtig ist jetzt natürlich noch die Übergabe der Parameter. Dabei
wird eine andere Prozedur genutzt, die das Programm "Ortanzeige" aufruft
und die Werte für die Parameter Ort und PLZ übergibt. Dies könnte wie folgt aussehen:
Sub Uebergabe()
Ortanzeige "Gifhorn", 38518
End Sub
Dies sind ganz einfache Beispiele, wie Sie Prozeduren aufrufen und ganz einfach Parameterwerte übergeben können.
Weitere Beispiele zu diesem Thema
- Sub Uebergabe()
Aufrufen der anderen Prozedur und Übergabe der Parameter
Namenanzeige "Henning", "Glaser"
End Sub - Sub Namenanzeige (Vorname As String, Nachname As String)
Zusammensetzen der übergebenen Parameter
Name = Vorname & " " & Nachname
Anzeige der neuen Variablen
MsgBox Name
End Sub - Sub Uebergabe()
Aufrufen der anderen Prozedur und Übergabe der Parameter
Adresse "Allee 17", "Henning Glaser", "34554 Osterwickel"
End Sub - Sub Adresse(Straße As String, Name As String, Ort As String)
Anzeige der neuen Variablen
MsgBox Name & Chr(13) & Straße & Chr(13) & Ort
End Sub
Sie sehen, Sie können auch mehrere Parameter übergeben und diese dann auch unverändert nutzen. Probieren Sie einfach mehrere Varianten aus.