Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to create a shortcut to make next Worksheet visible
Hello,
I am looking for a macro that will make the worksheet to the right of the active worksheet visible, thus enhancing the navigatiuon through the excel workbook. Once the last worksheet on the right is reached the I will start again at the first one. Actually I am looking at the same behavior than the Alt + Tab keys combination in Windows. Has anyone done this. Thanks, nde |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to create a shortcut to make next Worksheet visible
activesheet.next.Activate
You would have to check that the activesheet is not the last sheet and also pay attention to hidden sheets. Also look at the previous command. -- Regards, Tom Ogilvy "nde" wrote: Hello, I am looking for a macro that will make the worksheet to the right of the active worksheet visible, thus enhancing the navigatiuon through the excel workbook. Once the last worksheet on the right is reached the I will start again at the first one. Actually I am looking at the same behavior than the Alt + Tab keys combination in Windows. Has anyone done this. Thanks, nde |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to create a shortcut to make next Worksheet visible
Ctrl+Page Up or Page Down
That will switch between tabs similar to the way Alt+Tab switches between windows. You may also try something like this: Sub test() c = ActiveSheet.Index If c = Sheets.Count _ Then MsgBox ("You have reached the last sheet.") End Else End If With Sheets(c + 1) .Visible = True .Activate End With End Sub HTH, Paul "nde" wrote in message ... Hello, I am looking for a macro that will make the worksheet to the right of the active worksheet visible, thus enhancing the navigatiuon through the excel workbook. Once the last worksheet on the right is reached the I will start again at the first one. Actually I am looking at the same behavior than the Alt + Tab keys combination in Windows. Has anyone done this. Thanks, nde |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to create a shortcut to make next Worksheet visible
nde,
try something like this Sub SheetAct() Dim x As Integer x = ActiveSheet.Index Do If x < Worksheets.Count Then x = x + 1 Else x = 1 End If Loop Until Worksheets(x).Visible = True Worksheets(x).Activate End Sub regards, DaveU |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How can I make a drop down box visible within a worksheet? | Excel Worksheet Functions | |||
How to make worksheet saved in VB6 visible? | Excel Programming | |||
better search: "make worksheet visible" | Excel Discussion (Misc queries) | |||
How select all pictures in a worksheet and make visible? | Excel Programming | |||
Macro to make period visible in pivot table | Excel Programming |