Dave Peterson presented the following explanation :
Another way that may work for you:

Application.run "'" & activeworkbook.name & "'!" &
activesheet.range("A1").value

I saved this from a previous response. It may help you if you're passing
parms or calling a function:

Dim pWkbk as workbook
set pwkbk = workbooks("Personal.xls")
application.run "'" & pwkb.name & "'!macronamehere", "parm1", "parm2"

or if you're returning a value from a function:

dim res as string 'or variant or long or ...
res = application.run("'" & pwkb.name & "'!macronamehere", "parm1", "parm2")



On 06/25/2010 18:57, Raj wrote:
Hi,

I want to store Procedure names in cells, loop through the cells and
call the Procedures. I tried storing the cell value in a string
variable eg procstring and using "Call procstring", but it gives an
error. Is there a way to do this?

Thanks in advance for the help.

Regards,
Raj

Hi Dave,
This is a very good suggestion as it works with any workbook that
contains macros you want to call from another workbook!

My suggestion (as posted) only works in the workbook using the class
module OR if calling into a COMAddin/DLL. The latter is how I use the
example code because the class is located in a VB6 COMAddin/DLL, and
this is used as the mechanism to implement using custom toolbar menus
(created by a table in an XLA) to run code in the COMAddin/DLL. While
the CallByName() function provides a means of passing params in an args
array, I find it faster and more convenient to put params in a
delimited string that each proc in the COMAddin/DLL parses according to
its needs.

--
Garry

Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc