Vba static variable

' Static variable inside a function
Function MyStaticFunction(ByVal pToAdd As Integer) As Integer
    Static iStatic As Integer       ' Keeps its value between calls
    iStatic = iStatic + pToAdd
    MyStaticFunction = iStatic
End Function
'---------------------------------------------------------------------
Sub TesMe()
  Debug.Print MyStaticFunction(1)	' 1
  Debug.Print MyStaticFunction(3)	' 4
End Sub

Similar codes

1 vote204 views2 answers
Vba remove first 2 characters from string
VBA
0 vote199 views1 answer
Do until vb.net
VBA
3 votes247 views1 answer
Vba continue for each loop
VBA
0 vote206 views1 answer
Vba code to select image in sheet
VBA
0 vote198 views1 answer
Vb check if row has column
VBA
1 vote212 views2 answers
Vba function return array
VBA
7 votes200 views1 answer
Vba array declaration
VBA
0 vote198 views1 answer
Remove frist letter from string vbnet
VBA
-1 vote236 views1 answer
Code for reading letters only in vb 6
VBA
1 vote212 views1 answer
Sort using vba
VBA