Adding a scroll bar to a cell to scroll its contents.
Hi, disregard my previous question. I was such a dummy. :P
"lwidjaya" wrote:
Hi,
I have the same problem. I tried to use your code but I don't know how to
link it to the cell. Can we link this code to a specific cell?
Thanks.
"Vergel Adriano" wrote:
This might be a very crude solution but maybe it would give you an idea.
Add a textbox to the worksheet and name it as TextBox1. Then paste this
code in the worksheet code module:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count 1 Then Exit Sub
TextBox1.Left = Target.Left
TextBox1.Top = Target.Top
TextBox1.Width = Target.Width
TextBox1.Height = Target.Height
TextBox1.MultiLine = True
TextBox1.ScrollBars = fmScrollBarsVertical
TextBox1.LinkedCell = Target.Address
End Sub
--
Hope that helps.
Vergel Adriano
"SkyKid" wrote:
Is that possible? I have many cells with a sepcific height. If the
contents of the cell exceed the height I would want a scrollbar to appear for
the cell....
Or does anyone have an alternative solution to this?
|