Private Sub Slider1_Click() End Sub...What next???

sneel3

Active Member
Joined
Oct 9, 2002
Messages
331
My vba reads like this for a "slider bar" found in the "Control Toolbox" by clicking the "More Controls" icon. I chose "Microsoft Slider Control, version 6.0"

Private Sub Slider1_Click()

End Sub

How do I link this to a cell in a spreadsheet?
 

Some videos you may like

Excel Facts

Excel Joke
Why can't spreadsheets drive cars? They crash too often!

Norie

Well-known Member
Joined
Apr 28, 2004
Messages
75,911
Office Version
  1. 365
Platform
  1. Windows
Wouldn't it be something like this?
Code:
Range("A1") = Slider1.Value
 

sneel3

Active Member
Joined
Oct 9, 2002
Messages
331
That sounds right, but it is not working, it must be something really simple I am missing.

Here is my vba:

Sub Slider1Value()
Range("A1") = Slider1.Value
End Sub

Any ideas?

Does something need to be in cell A1?
 

Watch MrExcel Video

Forum statistics

Threads
1,111,598
Messages
5,541,163
Members
410,543
Latest member
ExcelGlenn
Top