☰

如何在公司中部署 Excel/Word 插件？

tag-icon • tag-icon windows-7 windows-server-2008-r2 microsoft-office-2010 active-directory
如何在公司中部署 Excel/Word 插件？

我有一个 Excel 和一个 Word 插件，想为整个公司部署它们。它们使用 Windows Serer 2008 R2、Windows 7 和 Office 2010。网络使用 Active Directory 进行管理。

该插件应自动部署在所有帐户/电脑上并打开。

我该怎么做？插件是否需要满足某些特殊要求？

答案1

如果插件安装程序是 MSI 包，那么您可以通过 GroupPolicy 部署它：

如何使用组策略在 Windows Server 2003 和 Windows Server 2008 中远程安装软件

答案2

您可以在工作表“ThisWorkBook”中的 *.xlam 中插入此代码，此代码安装并激活当前的加载项，只需打开即可

Private Sub Workbook_Open()
    Dim oXL As Object, oAddin As Object
    URL = Me.Path & "\"
    normalUrl = Application.UserLibraryPath ' Environ("AppData") & "\Microsoft\AddIns"
    AddinTitle = Mid(Me.Name, 1, Len(Me.Name) - 5)

    If URL <> normalUrl Then
        If MsgBox("Can you Install AddIns ?", vbYesNo) = vbYes Then
            Set oXL = Application ' CreateObject("Excel.Application")
            oXL.Workbooks.Add
            Me.SaveCopyAs normalUrl & Me.Name
            Set oAddin = oXL.AddIns.Add(normalUrl & Me.Name, True)
            oAddin.Installed = True

            oXL.Quit
            Set oXL = Nothing
        End If
    End If
End Sub

相关内容