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

sneel3

Active Member
Joined
Oct 9, 2002
Messages
334
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?
 

Excel Facts

How can you turn a range sideways?
Copy the range. Select a blank cell. Right-click, Paste Special, then choose Transpose.
Wouldn't it be something like this?
Code:
Range("A1") = Slider1.Value
 
Upvote 0
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?
 
Upvote 0

Forum statistics

Threads
1,214,584
Messages
6,120,387
Members
448,957
Latest member
Hat4Life

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top