Results 1 to 23 of 23

How do I know which sheets are to the RIGHT and LEFT to the Active Sheet?

Threaded View

e4excel How do I know which sheets... 03-31-2011, 10:54 AM
MarvinP Re: How do I know which... 03-31-2011, 11:48 AM
nimrod Re: How do I know which... 03-31-2011, 12:12 PM
e4excel Re: How do I know which... 03-31-2011, 04:37 PM
e4excel Re: How do I know which... 03-31-2011, 04:25 PM
TMS Re: How do I know which... 03-31-2011, 04:42 PM
e4excel Re: How do I know which... 03-31-2011, 05:04 PM
TMS Re: How do I know which... 03-31-2011, 05:10 PM
MarvinP Re: How do I know which... 03-31-2011, 05:15 PM
e4excel Re: How do I know which... 03-31-2011, 05:24 PM
MarvinP Re: How do I know which... 03-31-2011, 06:33 PM
nimrod Re: How do I know which... 03-31-2011, 08:18 PM
e4excel Re: How do I know which... 04-01-2011, 06:08 AM
e4excel Re: How do I know which... 04-01-2011, 07:08 AM
TMS Re: How do I know which... 04-01-2011, 08:32 AM
e4excel Re: How do I know which... 04-01-2011, 02:20 PM
nimrod Re: How do I know which... 04-01-2011, 02:33 PM
MarvinP Re: How do I know which... 04-01-2011, 02:46 PM
e4excel Re: How do I know which... 04-01-2011, 03:09 PM
nimrod Re: How do I know which... 04-01-2011, 04:01 PM
e4excel Re: How do I know which... 04-04-2011, 07:53 AM
MarvinP Re: How do I know which... 04-01-2011, 04:01 PM
nimrod Re: How do I know which... 04-04-2011, 11:07 AM
  1. #3
    Valued Forum Contributor
    Join Date
    09-21-2003
    Location
    British Columbia , Canada
    MS-Off Ver
    03,07,10,13
    Posts
    727

    Re: How do I know which sheets are to the RIGHT and LEFT to the Active Sheet?

    You could assign these two macros to shortcut keys (i.e. Ctrl+b and Ctrl+f ) so you could key your way thru the various sheets. You could also have a "Ctrl + i" that would activate the "index" sheet.

    Public Sub forward()
       On Error GoTo FirstSh
       Sheets(ActiveSheet.Index + 1).Activate
       Exit Sub
    FirstSh:
        Sheets(1).Activate
    End Sub
    
    Public Sub backward()
       On Error GoTo LastSh
       Sheets(ActiveSheet.Index - 1).Activate
       Exit Sub
    LastSh:
        Sheets(Sheets.Count).Activate
    End Sub
    Last edited by nimrod; 03-31-2011 at 12:15 PM.

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1