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

Hi
what does this message say?
- maybe the other file is not open?

--
Regards
Frank Kabel
Frankfurt, Germany


G wrote:
> 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

In article <1447901c444d6$c67f5420$(E-Mail Removed)>,
(E-Mail Removed) says...
> 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
>
>
*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

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

>-----Original Message-----
>Hi
>what does this message say?
>- maybe the other file is not open?
>
>--
>Regards
>Frank Kabel
>Frankfurt, Germany
>
>
>G wrote:
>> 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
>.
>

It says:

Runtime Error "9"
Subscript out of Range

We are both using XL 2002

>-----Original Message-----
>In article <1447901c444d6$c67f5420$(E-Mail Removed)>,
>(E-Mail Removed) says...
>> 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
>>
>>
>*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
>.
>

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.

--
Regards,
Tom Ogilvy

"G" <(E-Mail Removed)> wrote in message
news:146a001c444db$2f4f28a0$(E-Mail Removed)...
> 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
>
> >-----Original Message-----
> >Hi
> >what does this message say?
> >- maybe the other file is not open?
> >
> >--
> >Regards
> >Frank Kabel
> >Frankfurt, Germany
> >
> >
> >G wrote:
> >> 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
> >.
> >

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

>-----Original Message-----
>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.
>
>--
>Regards,
>Tom Ogilvy
>
>"G" <(E-Mail Removed)> wrote in message
>news:146a001c444db$2f4f28a0$(E-Mail Removed)...
>> 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
>>
>> >-----Original Message-----
>> >Hi
>> >what does this message say?
>> >- maybe the other file is not open?
>> >
>> >--
>> >Regards
>> >Frank Kabel
>> >Frankfurt, Germany
>> >
>> >
>> >G wrote:
>> >> 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
>> >.
>> >
>
>
>.
>