ThisWorkbook.Worksheets Returns Personal.XLSB Worksheets

[Billy Hill]

I'm trying to get the names of the sheets in an open workbook using the code below. It's not returning the workbook's sheets, it's returning the Personal.XLSB's sheets.

    Dim ws As Worksheet
    For Each ws In ThisWorkbook.Worksheets
        Debug.Print ws.Name
    Next ws

I tried using Thisworkbook.Name and and also returned Personal.XLSB. How do I tell it to use the current workbook's name instead of the workbook that's got the macro?

Thanks in advance.

 

[Eric Golf]

Hi,

Try

 For Each ws In [B]ActiveWorkbook[/B].Worksheets

Eric

 

[Billy Hill]

LoL. That would be too easy.

Thanks!

 

[Billy Hill]

Double post.