Passing Arguments to Subroutines and Functions : Sub « Language Basics « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Language Basics
  3. Sub

Passing Arguments to Subroutines and Functions

 
Sub ThreeNumbers()
    Dim num1 As Integer, num2 As Integer, num3 As Integer

    num1 = 10
    num2 = 20
    num3 = 30

    MsgBox MyAverage(num1, num2, num3)
    MsgBox num1
    MsgBox num2
    MsgBox num3
End Sub

Function MyAverage(ByVal num1, ByVal num2, ByVal num3)
    num1 = num1 + 1
    MyAverage = (num1 + num2 + num3) / 3
End Function








Related examples in the same category

1.Declare sub
2.Creating Procedures
3.Passing Elements of an Array to Another Procedure
4.Private (module-level) variables can be seen by any routine in the module they were declared in, but not from other modules.
5.Public Variables
6.Use If and ElseIf to check the parameter
7.Pass double to sub module
8.Calling Functions and Sub Procedures
9.The Call Statement
10.Only place parentheses around the arguments when calling a function and making use of the return value from the function procedure
11.Calling the function from a Sub procedure
12.an Exit Sub just before the error label, which forces the subroutine to exit immediately, without erroneously running the error code.
13.Optional parameters