Scroll set when entering a Textbox

I have one that is really stumping me. I have a userform with multiple textboxs so I have activated the scrollbars to the side. I have set up buttons right under the textboxes that automatically enter information into the textboxes when clicked. I have activated tab behaviors to tab from the top box down to the bottom box. The problem is that as I tab to the boxes lower on the scroll, the buttons underneath them are not visible. So, I am trying to create a macro to set the scroll function when I tab to the next box. I cannot figure out how to set the ScrollTop when activating the textbox. Any suggestions?

Private Sub TextBox49_Activate()
MultiPage1.Page31.ScrollTop = 800
End Sub