View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Dr.Schwartz Dr.Schwartz is offline
external usenet poster
 
Posts: 39
Default Looking for a sheet

I want to look though all open workbooks to see if a sheet exists. This is my
code so far:

Dim SDf As Workbook, SDws As Worksheet
For Each SDf In Application.Workbooks
Debug.Print SDf.Name
For Each SDws In Worksheets
Debug.Print SDws.Name
If SDws.Name = "ChemDraw1" Then
Sheets("ChemDraw1").Select
MsgBox ("Correct worksheet detected")
Exit For
End If
Next SDws
Next SDf

From the debug.print I can tell that it only looks through the sheets in the
active workbook. Can anybody help me out?

The Doctor