Dave Peterson
12/15/2006 2:50:00 PM
You have a couple of options.
#1. Use application.run
dim myAddinName as string
myaddinname = "someaddinname.xla"
application.run "'" & myaddinname & "'!FormatChart"
'or to pass parms
Application.Run "'" & myaddinname & "'!FormatChart", A, B
'or to pass parms and return a value:
res = Application.Run("'" & myaddinname & "'!FormatChart", A, B)
#2. In the Calling workbook's project, you can set a reference to the addin.
First, rename the project's name (don't use the default--VBAProject). You'll
want it to be unique. Then save your addin with that new project name.
Then in the workbook doing the calling:
tools|references
and check that addin's project.
Now you can use those functions--just like they're built into excel's VBA.
Dale Fye wrote:
>
> I just finished writing some VBA code that will let me automatically refresh
> the series of a chart (to account for more or less rows in the data set). I
> want to use this code in several XLS spreadsheets, but only want to maintain
> one copy.
>
> I've saved this file as an XLA, added it to the list of add-ins for my
> spreadsheet that has the charts I want to reformat. I then created a macro
> that calls a function FormatChart( ) in the add-in. But when I run the
> macro, I get a "sub of function not defined" error. It's as if the
> application doesn't know to look at the add-in file for this function.
>
> Any ideas?
> --
> Email address is not valid.
> Please reply to newsgroup only.
--
Dave Peterson