Thanks for the suggestion. I tried what the earlier post recommended and it
worked. It's nice to know there are folks out there that are knowledgeable
and willing to assist.

Again, thanks.

"JLGWhiz" wrote:

try this:

For Each sh In mybook.Worksheets
If sh.Visible = True Then
.
...............
.
End If
Next sh


"ReportSmith" wrote:

I have code (Excel 2000) that loops through all the visible sheets in a
workbook. Problem is, when the code gets to the "next.sh" line, the next
worksheet is not selected.

For Each sh In mybook.Worksheets
if sh.visible = xlsheetvisible then
.
...............
.
end if
next sh

Any ideas?

Thanks.