sub sProblem()
for i =1 to 3
Application.run "sbTst" & i
next
end sub


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"x taol" wrote in message
...


sub sbTst()
msgbox 1
end sub

sub sbTst2()
msgbox 12
end sub

sub sbTst3()
msgbox 13
end sub

sub sProblem()
for i =1 to 3
call "sbTst" & i
next
end sub

This code not work.
How can I using Loop.?

*** Sent via Developersdex http://www.developersdex.com ***