XL98: Min Can Exceed Max on Scroll Bar or SpinButton Control

MORE INFORMATION

Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements. When you set the Min property to a value that is greater than the value for the Max property, the default behavior of the control is reversed. When this behavior occurs, clicking the arrow that points upward on a SpinButton control decreases the value of the SpinButton instead of increasing the value.

Example

To see an example of the behavior, follow these steps:

1. Close and save any open workbooks, and then create a new workbook.
2. Start the Visual Basic Editor (press OPTION+F11).
3. On the Insert menu, click UserForm.
4. Draw a Label control on the UserForm.
5. Draw a SpinButton control on the UserForm.
6. Switch to the Properties window (press F6).
7. Change the following properties for the SpinButton control to the following values.

          Property      Value
          ---------------------------------------
   
          Orientation   0 - fmOrientationVertical
          Min           100
          Max           50
          Value         75

8. Double-click the SpinButton to display the Code window for the UserForm.
9. In the module, type the following code for the SpinButton1 Change event:

          Private Sub SpinButton1_Change()
   
              ' Set the Caption of the label to the value of the SpinButton.
              Label1.Caption = SpinButton1.Value
   
          End Sub
   						

10. Run the UserForm.
    
    When you click the upward pointing arrow on the SpinButton, the value in the label is decreased. This behavior is the result of setting the Min property of the SpinButton to a value that is greater than the value for the Max property.
11. Close the UserForm.

NOTE: This behavior also occurs in a ScrollBar or a SpinButton control that you place on a worksheet.