Workbook Loop Headache

[Turin]

Hello all,

I have an issue which no matter what I try I can't resolve. In my accounts departments we download up to 80 reports every month end.

I have a macro which formats each one into its correct format with dates and titles etc. This works perfectly and I dont think I really need to post it here.

When I try to add code to this which would make it loop through all the workbooks I have open it fails - no matter what I try. If I did wach workbook individually it work every time.

Does anyone know of any code that would loop my macro though all open workbooks in excel???

Any help - much appreciated, although I have tried most of the techniques I have found in help sites etc, I think I may be making a stupid oversight although I have no code left to show you what I did in the first place.

Cheers Greg

[Dick Kusleika]

Turin

What do you mean by "fail". If you get an error, post what error you get.
You're probably trying to do something to a workbook that you can't do
because it's an Add-in or a hidden workbook. This may alleviate your
problems

Dim wb As Workbook

For Each wb In Application.Workbooks
If wb.Visible = True
'Do stuff
End If
Next wb

--
**** Kusleika
Excel MVP
Daily Dose of Excel
www.*****-blog.com

Turin wrote:
> Hello all,
>
> I have an issue which no matter what I try I can't resolve. In my
> accounts departments we download up to 80 reports every month end.
>
> I have a macro which formats each one into its correct format with
> dates and titles etc. This works perfectly and I dont think I really
> need to post it here.
>
> When I try to add code to this which would make it loop through all
> the workbooks I have open it fails - no matter what I try. If I did
> wach workbook individually it work every time.
>
> Does anyone know of any code that would loop my macro though all open
> workbooks in excel???
>
> Any help - much appreciated, although I have tried most of the
> techniques I have found in help sites etc, I think I may be making a
> stupid oversight although I have no code left to show you what I did
> in the first place.
>
> Cheers Greg