Hello Stefi,
Here is an example...
Sub Test(ByVal SubName As String)
Application.Run SubName
End Sub
Sincerely,
Leith Ros
--
Leith Ros
-----------------------------------------------------------------------
Leith Ross's Profile:
http://www.excelforum.com/member.php...fo&userid=1846
View this thread:
http://www.excelforum.com/showthread.php?threadid=38046