Code not working on another comp

G

G

I have this code:

Private Sub CommandButton30_Click()
Windows("SWITCHBOARD").Activate
End Sub

It just switches you to a different open workbook. It
works just fine on my computer, but is doesn't work on a
co-workers computer. He has Excel 2002, the security is
set to Trust Access to Visual Basic Projects, but it just
sends you the de-bug message.
Help?
G
 
T

Tushar Mehta

I have this code:

Private Sub CommandButton30_Click()
Windows("SWITCHBOARD").Activate
End Sub

It just switches you to a different open workbook. It
works just fine on my computer, but is doesn't work on a
co-workers computer. He has Excel 2002, the security is
set to Trust Access to Visual Basic Projects, but it just
sends you the de-bug message.
Help?
G
Click to expand...
*What* message?

What version of XL are you using?

--
Regards,

Tushar Mehta
www.tushar-mehta.com
Excel, PowerPoint, and VBA add-ins, tutorials
Custom MS Office productivity solutions
 
G

G

It says:

Runtime Error "9"
Subscript out of Range

SWITCHBOARD is definately open because a button on
SWITCHBOARD opens the SOURCE2 workbook...the code that's
not working is to return you from SOURCE2 back to
SWITCHBOARD...it isn't supposed to close SOURCE2, it just
sends you back to SWITCHBOARD.
I tried it with Select instead of Activate and it still
won't work.
Thanks,
G
 
T

Tom Ogilvy

change it to

Windows("SWITCHBOARD.XLS").Activate

Using the extension will always work. Not using the extension works
dependent on a setting under windows folder options about showing known
extensions I believe.
 
G

G

That did it!!
Wow, another weird little quirkey thing to remember.
Thank you so much for your help.
G
 
Top