inserting scrollbar inside an Excel Sheet
Insert code in a regular module
Sub sCroll()
Application.ScreenUpdating = False
Range("E1:IV1").Select
Selection.EntireColumn.Hidden = True
Range(Cells(1, [a1]), Cells(1, [a1] + 9)).EntireColumn.Hidden = False
Cells(1, 1).Select
Application.ScreenUpdating = True
End Sub
From Formulamenu, insert a scroll-bar
link the bar to sCroll macro
Rightclick on sCrolbar and set Min value to 5
and max value to 255
make cell A1 the linking cell
+9 in the code is count of colums to show - change to fit
"Genesis" skrev:
Hello!
I have a need to insert to scrollbar inside an existing Excel tab due
to a huge amount of column..
I know how to insert the scrollbar but I don't have any clue as to
make it so it'll scroll left/right. For instance, column A - D will be
stagnate because I need them for headers and title. I would like
column E-IV to scroll left or right based on the embeded scrollbar. I
know I can do a freeze pane but I don't like the look of the splitting
line as I already have a horizontal split already.
Any thoughts will be appreciated.
Lee
|