Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Multiple scrollbars
I have a spreadsheet to manage progress on a project. I am trying to use
multiple scroll bars (one per activity) to give a visual representation of progress by changing the scrollbar position and colour from red to orange to green according to progress vs target. Whilst my coding does work it is not neat as I have to initialise and control each scrollbar indivdually (and there are 60 + of them). Is there a way to reference them indirectly, some sort of For ShtNum = 1 to NumSheets For i = 1 to sheet(shtNum).scrollbars.count myscroll=Sheet(ShtNum).scrollbar(i) If myscroll < 0.9 * target then myscroll.backcolour = RGB(255,0,0) Elseif myscroll < 0.95 * target then myscroll.backcolour = RGB(200,200,0) Else myscroll.backcolour = RGB(0,255,0) Endif next i Next ShtNum I think my issue is that I am not sure which collection the scrollbars fall into. |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Scrollbars in Listbox | Excel Discussion (Misc queries) | |||
Web Component Scrollbars | Excel Programming | |||
Scrollbars on a Userform | Excel Programming | |||
Scrollbars & Userforms | Excel Programming | |||
Getting rid of scrollbars for listbox | Excel Programming |