2016-12-19 71 views

回答

4

複合賦值運算符(例如, +=,-=)不存在於VBA中(它與VB6有相似的語法,VB.net的前身)。您需要回退到a = a + b

0

嘗試是這樣的:

Public Sub Increment(ByRef value_to_increment, Optional l_plus As Long = 1) 

    value_to_increment = value_to_increment + l_plus 

End Sub 

Public Sub Decrement(value_to_decrement, Optional l_minus As Long = 1) 

    value_to_decrement = value_to_decrement - l_minus 

End Sub 

這事,我每天使用。它以某種方式讓我更容易。用法如下:

Call Increment(lValue) 

使用示例here

+0

恩,謝謝你的-1。當我看到它時,我總是感覺更好! – Vityata