0 Replies Latest reply on Sep 18, 2018 8:53 AM by Adob Phot

    Detach Userform element from scroll

    Adob Phot

      I have userform with some buttons, and scrollbar. When i drag slider, i need to some buttons will not move, so i do this:

       

      Private Sub UserForm_Initialize()

      Useform1.ScrollBars = fmScrollBarsHorizontal

      Useform1.ScrollWidth = Useform1.InsideWidth + 200

      End Sub

       

      Private Sub UserForm_Scroll(ByVal ActionX As MSForms.fmScrollAction, ByVal ActionY As MSForms.fmScrollAction, ByVal RequestDx As Single, ByVal RequestDy As Single, ByVal ActualDx As MSForms.ReturnSingle, ByVal ActualDy As MSForms.ReturnSingle)

      Useform1.CommandButton1.Left = ScrollLeft

      End Sub

       

      6wfmncus.gif

      It do what i need - keep button freeze, but do shake - how to avoid that?