Userform - scroll to see full contents of a cell

[johnohio]

I am creating a userform and I am stuck on one part.

The form will open up and pull in data from various spots. One of the cells will be text notes which will be of varying lengths. So when the form is opened I want it to be able to handle the fact that the cell might have 10 characters or it might have 350 characters. I would like it to open a fixed size and if it is a long comment in that field then they can scroll to see the rest of the contents. I'm not sure how to get it to open up so there are arrows/buttons that you can press to scroll down/up the contents of that cell.

Thanks in advance.

 

[tlowry]

<!--[if gte mso 9]><xml> <w:WordDocument> <w:View>Normal</w:View> <w:Zoom>0</w:Zoom> <w:DoNotOptimizeForBrowser/> </w:WordDocument> </xml><![endif]--> I suggest you use an InkEdit control. Your instance of Excel probably does not show this control in the References. To add this to the Form’s toolbox:


Alt F11 to get to the development screen
Tools: References: “Check” "Microsoft InkEdit Control"

Click OK


Add the control to the form in the usual way:

Set the InkEdit ScrollBars property to fmScrollBarsVertical

Set the text for the InkEdit control

Private Sub UserForm_Initialize()

      Me.InkEdit1.Text = Range("B3")
  End Sub

Test and post results

 

[johnohio]

That's not working for me. Any other suggestions?

 

[tlowry]

Can you give more information on what happened?