View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
excelent excelent is offline
external usenet poster
 
Posts: 695
Default 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