View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.misc
excelent excelent is offline
external usenet poster
 
Posts: 695
Default inserting scrollbar inside an Excel Sheet

http://pmexcelent.dk/myScroll.xls


"Genesis" skrev:

On Oct 22, 1:29 pm, excelent
wrote:
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- Hide quoted text -


- Show quoted text -




LOL.. all sounds Greek to me. I have no idea what you're talking
about? are you reffing to add these codes into the VB editor? If so,
I'm not well versed in VB and wouldn't know where to begin.

If you can show me or possible attached/supply a working excel sample,
that would help. Thanks.

Lee