vbs assistance please.
I'm trying to figure out what this script does. I believe the person's intentions were to have a drop down menu in excel with the features of this particular addin. Can someone take a look and let me know where the issue are?
_____START____
Dim oXL, oAddin
Set oXL = CreateObject("Excel.Application")
oXL.Application.DisplayAlerts = False
oXL.Workbooks.Add
oXL.AddIns("tbatoolkit").Installed = False
Set oAddin = oXL.AddIns.Add("tbCredit.tbAddin", True)
oAddin.Installed = True
Set oAddin2 = oXL.AddIns.Add("C:\Program Files\myaddin\tba\Addins\tbaToolkit.xla", True)
oAddin2.Installed = True
oXL.Quit
Set oXL = Nothing
____END____
_____START____
Dim oXL, oAddin
Set oXL = CreateObject("Excel.Application")
oXL.Application.DisplayAlerts = False
oXL.Workbooks.Add
oXL.AddIns("tbatoolkit").Installed = False
Set oAddin = oXL.AddIns.Add("tbCredit.tbAddin", True)
oAddin.Installed = True
Set oAddin2 = oXL.AddIns.Add("C:\Program Files\myaddin\tba\Addins\tbaToolkit.xla", True)
oAddin2.Installed = True
oXL.Quit
Set oXL = Nothing
____END____
0 Comments
[ + ] Show comments
Answers (3)
Please log in to answer
Posted by:
Secondlaw
17 years ago
Ok, I've figured out exactly what this script does. Does anyone know how I can reverse what it's doing? I would assume is workbook.remove, but 'remove' doesn't seem like a function. What would be the correct way to do this?
Thanks
Thanks
Posted by:
slb
17 years ago
Try this.. (not very sure, please check)
Dim oXL, oAddin
Set oXL = CreateObject("Excel.Application")
oXL.Application.DisplayAlerts = False
Set oAddin2 = oXL.AddIns.Add("C:\Program Files\myaddin\tba\Addins\tbaToolkit.xla", False)
oXL.Workbooks.Add
oAddin2.Installed = False
oXL.Quit
Set oXL = Nothing
Hope this helps
Dim oXL, oAddin
Set oXL = CreateObject("Excel.Application")
oXL.Application.DisplayAlerts = False
Set oAddin2 = oXL.AddIns.Add("C:\Program Files\myaddin\tba\Addins\tbaToolkit.xla", False)
oXL.Workbooks.Add
oAddin2.Installed = False
oXL.Quit
Set oXL = Nothing
Hope this helps
Rating comments in this legacy AppDeploy message board thread won't reorder them,so that the conversation will remain readable.