AddIn - how to create?

  • Thread starter Thread starter antelao
  • Start date Start date
A

antelao

Hi. I'd like to ask how to create new AddIn with my own macros. It is
easy in Excel: File - Save as ... (ms addin).

BUT I want to do this with help of another macro. I tried this:

ActiveWorkbook.SaveAs _
Filename:="C:\MyMacros\MyAddin.xla", _
FileFormat:=xlAddIn
ThisWorkbook.IsAddin = True

but it doesn't work - there is something wrong with file MyAddin.xla.

Can you help me to create correct AddIn ba macro? Thanks for help,
jiri.
Excel 2002
 
Why are you setting IsAddin in ThisWorkbook, not ACtiveWorkbook?

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)
 
I rectified my script in this way:

-Workbooks.Open Filename:="C:\MyMacros\MyAddin.xls"
ActiveWorkbook.SaveAs _
Filename:="C:\MyMacros\MyAddin.xla", _
FileFormat:=xlAddIn
ActiveWorkbook.IsAddin = True
ActiveWorkbook.Save
Application.AddIns.Add ("C:\MyMacros\MyAddin.xla")
Application.AddIns("MyAddin").Installed = True-

This works until Excel is restarted. After Excel restart MyAddin isn't
installed. In my openien i need something so save, but i don't know
what. Any help?

Thanks, jiri
 
I found out that the problem is supposed to be in FileFormat '*xlAddIn*
. I should use '*xlIntlAddIn*' instead, but i don't know the difference
Can you help me to learn how to use 'xlIntlAddIn' fileFormat
 
Back
Top