I'm using the following code for a scroll bar, straight from the help menu.
I need the small change value to be "0.5".
In this instance it does not work.
Any ideas why?
regards
Wayne


Private Sub Workbook_Open()
Set sb = Worksheets(1).Shapes.AddFormControl(xlScrollBar, _
Left:=10, Top:=10, Width:=10, Height:=200)
With sb.ControlFormat
.LinkedCell = "D1"
.Max = 100
.Min = 0
.LargeChange = 10
.SmallChange = 0.5

End With


End Sub