Raypayette,

Have you tested this for any workbook, and how? I made something like
this but didn't work, so I built an addin that now works ok. If yours
works well can you send me a copy?

Besides, the macro seems only switch between two sheets that you
already know their names (though can be modified easily).

I realezed I can't use Tab. Thank you.

raypayette wrote:
Here is a macro that does the job:
Sub Macro1()
'
' Macro1 Macro
' Macro recorded 7/29/2006 by Raymond Payette
'
' Keyboard Shortcut: Ctrl+t
'
If ActiveSheet.Name = "Sheet1" Then
Sheets("Sheet2").Select
Else
Sheets("Sheet1").Select
End If
End Sub

You cannot have Tab as a key, so I used T. This has to be set using
Record macro.

Save as type must be "Microsoft Office Excel Add-In" and it will make
an *.xla file that can then be distributed.


--
raypayette


------------------------------------------------------------------------
raypayette's Profile: http://www.excelforum.com/member.php...o&userid=29569
View this thread: http://www.excelforum.com/showthread...hreadid=559448