Repeat run of macro

[Bukol]

Have a macro which runs 3 submacros. What do I use to have this macro repeat itself a specified number of times?
Here's the macro:
Sub Extract1()
'
' Extract1 Macro
' Macro recorded 4/5/2002 by Hans
'

'
Application.Run "'Address Retriever2.xls'!Extract"
Application.Run "'Address Retriever2.xls'!SelectRange1"
Application.Run "'Address Retriever2.xls'!Distribute"
End Sub

Hans

[AJ]

Simply put it in a loop of some sort.
For example, place

For i = 1 to 3

At the top of the macro

And

Next i

At the bottom and it will do everything 3 times.

Rgsd
AJ

[Bukol]

Thanks AJ,
Soon I'm gonna know it all
Hans