How can I repeat a macro, and how can make it without any message?

Thanks for any helps
Emil

Sub Macro1()

Dim i as Long

For i = 1 to 10
Macro2
Next

End Sub


Sub Macro2()

'run any code here

End Sub


RBS

"emil" <emil@discussions.microsoft.com> wrote in message
news:8AE7C220-0856-4CBD-9018-C0E6B513A81A@microsoft.com...
> Thanks for any helps
> Emil

You might want to think about posting a more detailed question.


Sub Tester()
dim i as integer
application.displayalerts=false

for i=1 to 20
Macro1
next i

application.displayalerts=true

end sub

Sub Macro1()
'do stuff
End sub


--
Tim Williams
Palo Alto, CA


"emil" <emil@discussions.microsoft.com> wrote in message news:8AE7C220-0856-4CBD-9018-C0E6B513A81A@microsoft.com...
> Thanks for any helps
> Emil

Emil -

Without knowing more - here is a way:


Sub MyLoop
For c = 1 to 50
Call <insert your procedure name here>
Next c
End Sub


This will run your code 50 times. Change the 50 above to 100 and it will
loop thru your code 100 times.

--
Thx
MSweetG222



"emil" wrote:

> Thanks for any helps
> Emil

Thank you very much for help.
It work
Emil

"emil" a scris:

> Thanks for any helps
> Emil

Milion thanks.
It work too
Emil

"RB Smissaert" a scris:

> Sub Macro1()
>
> Dim i as Long
>
> For i = 1 to 10
> Macro2
> Next
>
> End Sub
>
>
> Sub Macro2()
>
> 'run any code here
>
> End Sub
>
>
> RBS
>
> "emil" <emil@discussions.microsoft.com> wrote in message
> news:8AE7C220-0856-4CBD-9018-C0E6B513A81A@microsoft.com...
> > Thanks for any helps
> > Emil
>
>