VBA: Windows vs Workbooks

[goldfish]

I'm having a bit of trouble recognizing the differences between Windows and Workbooks. If I have multiple workbooks open each one will have its own window as far as I can tell, so the following two for loops are rather similar

Dim Win As Window
For Each Win In Windows
Debug.Print Win.Visible
Next Win

Dim Wkbook As Workbook
For Each Wkbook In Workbooks
Debug.Print Wkbook.Name
Next Wkbook

But how do I make these two concepts meet? Like how can I display the names of all Visible Open Workbooks, since Visible is a property of the Window and Name is a property of the Workbook.

Thanks,
~Gold Fish

 

[pgc01]

HI goldfish

If I have multiple workbooks open each one will have its own window as far as I can tell

No. What you see are the windows. Each workbook can have several windows.

You usually use Window>New Window (in xl 2000) to create new windows for the workbook.

I use it frequently to see for ex. side by side diferent parts of a worksheet (or parts of different worksheets in the workbook). Since the windows are independent you can scroll one of them and it doesn't affect the others.

So what is visible (or not) are the windows that you create for the workbook. The workbook itself is just open (and will have at least one window).

hope this helps
PGC

 

[goldfish]

Yup, tremendously, Thank you.

Sub test()
Dim wkbook As Workbook
Dim Win As Window
For Each wkbook In Workbooks
    For Each Win In wkbook.Windows
        If Win.Visible Then
            Debug.Print wkbook.Name
        End If
    Next Win
Next wkbook
End Sub

Now I can take action on all visible workbooks (for example skipping personal.xls). This code can act several times on a single workbook if it has multiple windows open, but in my case that is desired since each one can have a different activesheet. Both Window and Workbook support the activesheet property with slightly different results, which can be a very useful distinction.

Thanks!

 

[pgc01]

I'm glad I could help.

Best regards
PGC