How to Deploy (.xla) Excel Add-In Via Group Policy

On Error Resume Next
Dim oXL
Dim oAddin
Set oXL = CreateObject("Excel.Application")
oXL.Workbooks.Add
Set oAddin = oXL.AddIns.Add("\\Network Path\NameOfXLAAddIn.xla", True)
oAddin.Installed = True
oXL.Quit
Set oAddin = Nothing
Set oXL = Nothing
I saved this code in a .vbs file , and created a vbs file for each of the xla files that need installing. I then created a .bat file to run these in order. What I found was that only half of the XLA’s where being added to the machine. I checked in the local Add in’s directory ( C:\Documents and Settings\%USERNAME%\Application Data\Microsoft\AddIns ) and the Addin’s wearn’t being copied from the server before being registered.
I then added an xcopy function to the BAT file to copy the file manually before adding , and this resolved the issue
xcopy "\\Server Path\Example.xla" "C:\Documents and Settings\%USERNAME%\Application Data\Microsoft\AddIns" /y
How to Deploy (.xla) Excel Add-In Via Group Policy,
Tags: Deploy Excel Addins, Deploy xla files, Group Policy Excel Addins, xla and group policy
Trackback from your site.