Microsoft Office Forums - View Single Post - [Solved] Help with incrementing Spinbutton value.

macropod · 11-23-2013, 11:15 PM

I'd have thought you could use something like:

Code:

Private Sub SpinDays_SpinDown()
With Range("D4")
  If .Value = 0 Then Exit Sub
  .Value = .Value - 1
End With
End Sub
 
Private Sub SpinDays_SpinUp()
With Range("D4")
  .Value = .Value + 1
End With
End Sub

PS: When posting code, please use the code tags. They're on the 'Go Advanced' tab.