VBA shorthand for x=x+1? VBA shorthand for x=x+1? vba vba

VBA shorthand for x=x+1?


Sadly there are no operation-assignment operators in VBA.

(Addition-assignment += are available in VB.Net)

Pointless workaround;

Sub Inc(ByRef i As Integer)   i = i + 1  End Sub...Static value As Integerinc valueinc value


If you want to call the incremented number directly in a function, this solution works bettter:

Function inc(ByRef data As Integer)    data = data + 1    inc = dataEnd Function

for example:

Wb.Worksheets(mySheet).Cells(myRow, inc(myCol))

If the function inc() returns no value, the above line will generate an error.