Come distribuire un componente aggiuntivo Excel / Word in un'azienda?


1

Ho un componente aggiuntivo Excel e Word e voglio distribuirli per un'intera azienda. Stanno lavorando con Windows Serer 2008 R2, Windows 7 e Office 2010. La rete è gestita con Active Directory.

Il componente aggiuntivo deve essere distribuito e attivato automaticamente su tutti gli account / PC.

Come lo posso fare? Ci sono cose speciali che il componente aggiuntivo deve riempire completamente?


Come è organizzata la tua rete? Usi Active Directory per gli account utente?
Alexander Galkin,

Sì, utilizziamo Active Directory.
BetaRide,

Domanda SF? <! - filler ->
Vi.

Risposte:



3

puoi inserire questo codice nel tuo * .xlam nel foglio "ThisWorkBook" questo codice installa e attiva i componenti aggiuntivi correnti, semplicemente aprendo

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
Utilizzando il nostro sito, riconosci di aver letto e compreso le nostre Informativa sui cookie e Informativa sulla privacy.
Licensed under cc by-sa 3.0 with attribution required.