VBA/Excel/Access/Word/Forms/ScrollBar

Материал из VB Эксперт
Перейти к: навигация, поиск

Assign scrollbar value to B3

 
     Private Sub ScrollBar1_Change()
         Range("B3").Value = ScrollBar1.Value
     End Sub
Источник — «http://vbex.ru/index.php?title=VBA/Excel/Access/Word/Forms/ScrollBar&oldid=1917»