I currently have code to loop through the number of sheets in a workbook.....

Set mybook = Workbooks.Open(MyPath & MyFiles(Fnum))
For Each sh In mybook.Worksheets

......but I need to loop 1 less than the total number of sheets to avoid a
hidden sheet in the same workbook - in other words, I need something like.....
For Each [sh-1] In mybook.Worksheets..........

Any suggestions?

Thanks in advance.