Variabele verhogen met 1

[mulderm]

Hallo,

Ik heb in Excel een variabele die een beginwaarde heeft van A=12.
Nou wil ik een procedure maken dat elke keer dat ik
deze procedure start de waarde van A verhoogt
met 1.
Dus eerste keer A wordt 13, tweede keer A wordt 14
enz. enz.
Tot slot start ik een procedure die de waarde van A
weer 12 maakt.
Wie kan mij helpen om deze procedures te maken?

groeten,

mulderm

 

[Bartuls]

Public A As Integer

Public Sub InitializeA()
A = 12
End Sub

Public Sub AddOneToA()
A = A + 1
End Sub

 

[LucHeyndrickx]

Jij hebt het vermoedelijk over een lusje:

Dim A As Integer

For A = 12 to InputBox("Hoeveel keer moet de procedure lopen?")
'Uw procedure
Next

A = 12

Luc

 

[mulderm]

Dank jullie wel.
Achteraf is het simpel.

mulderm