Checking for workbooks

[Brian Matlack]

Hi!
I would like to write code that checks to see how many workbooks (windows) are open on this application. Can someone help me?
I have code that goes to the next active window and copies a specified range. If there is no other workbook open or if there is more than 1 other workbook open then I want to display a message box that instructs the user and stops the macro.
Thanks for your time!

[Norman Jones]

Hi Brian,

Try:

If Not Workbooks.Count = 2 Then
'your warning
Exit Sub
End if


---
Regards,
Norman


"Brian Matlack" <[email protected]>
wrote in message
news:[email protected]...
>
> Hi!
> I would like to write code that checks to see how many workbooks
> (windows) are open on this application. Can someone help me?
> I have code that goes to the next active window and copies a specified
> range. If there is no other workbook open or if there is more than 1
> other workbook open then I want to display a message box that instructs
> the user and stops the macro.
> Thanks for your time!
>
>
> --
> Brian Matlack
> ------------------------------------------------------------------------
> Brian Matlack's Profile:
> http://www.excelforum.com/member.php...fo&userid=3508
> View this thread: http://www.excelforum.com/showthread...hreadid=510541
>

[Ron de Bruin]

Hi Brian

Note:

Workbooks.Count
This count also hidden workbooks(personal.xls)

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Norman Jones" <[email protected]> wrote in message news:[email protected]...
> Hi Brian,
>
> Try:
>
> If Not Workbooks.Count = 2 Then
> 'your warning
> Exit Sub
> End if
>
>
> ---
> Regards,
> Norman
>
>
> "Brian Matlack" <[email protected]> wrote in message
> news:[email protected]...
>>
>> Hi!
>> I would like to write code that checks to see how many workbooks
>> (windows) are open on this application. Can someone help me?
>> I have code that goes to the next active window and copies a specified
>> range. If there is no other workbook open or if there is more than 1
>> other workbook open then I want to display a message box that instructs
>> the user and stops the macro.
>> Thanks for your time!
>>
>>
>> --
>> Brian Matlack
>> ------------------------------------------------------------------------
>> Brian Matlack's Profile: http://www.excelforum.com/member.php...fo&userid=3508
>> View this thread: http://www.excelforum.com/showthread...hreadid=510541
>>
>
>

[Brian Matlack]

Hi Brian

Note:

Workbooks.Count
This count also hidden workbooks(personal.xls)

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Norman Jones" <[email protected]> wrote in message news:[email protected]...
> Hi Brian,
>
> Try:
>
> If Not Workbooks.Count = 2 Then
> 'your warning
> Exit Sub
> End if
>
>
> ---
> Regards,
> Norman
>
>
> "Brian Matlack" <[email protected]> wrote in message
> news:[email protected]...
>>
>> Hi!
>> I would like to write code that checks to see how many workbooks
>> (windows) are open on this application. Can someone help me?
>> I have code that goes to the next active window and copies a specified
>> range. If there is no other workbook open or if there is more than 1
>> other workbook open then I want to display a message box that instructs
>> the user and stops the macro.
>> Thanks for your time!
>>
>>
>> --
>> Brian Matlack
>> ------------------------------------------------------------------------
>> Brian Matlack's Profile: http://www.excelforum.com/member.php...fo&userid=3508
>> View this thread: http://www.excelforum.com/showthread...hreadid=510541
>>
>
>

Works Great!! Thanks!!