限制SpinButtons具體的最小值和最大值VBA

Question

我試圖限制用戶選擇使用數值調節鈕在VBA，但限制之間的值，它不是爲我工作 這是我曾嘗試

Private Sub UserForm_Initialize() 
    decimalSpin_Button.Min = 0 
    decimalSpin_Button.Max = 5 
End Sub 


Private Sub decimalSpin_Button_Change() 

decimalPlaces_Value.Text = decimalSpin_Button.Value 
End Sub 
Private Sub decimalSpin_Button_SpinDown() 

decimalPlaces_Value.Text = decimalPlaces_Value.Text - 1 


End Sub 

Private Sub decimalSpin_Button_SpinUp() 
decimalPlaces_Value.Text = val(decimalPlaces_Value.Text) + 1 

End Sub 

Answer 1

你不't需要_SpinDown()和_SpinUp()這將做你想做的事

Private Sub UserForm_Initialize() 
    decimalSpin_Button.Min = 0 
    decimalSpin_Button.Max = 5 
End Sub 

Private Sub decimalSpin_Button_Change() 
    decimalPlaces_Value.Text = decimalSpin_Button.Value 
End Sub