2

私の Excel AddIn は C# で書かれており、Excel DNA、AddIn Express RTD を使用し、NetOffice Installer は Advanced Installer で作成され、さらに VBA VBA コードは install.xls にあります。

Private Sub Workbook_Open()

    Dim quit As Integer
    Dim added As Boolean
    Add_Addin

    If Workbooks.Count = 1 Then
        Application.quit
    Else
        Me.Close
    End If

End Sub


Private Sub Add_Addin()
    On Error GoTo ERR_

    Dim addinFile As String
    addinFile = ThisWorkbook.Path & "\" & "MyAddIn.xll"

    If Len(addinFile) > 0 Then
            Dim LEA As AddIn
            Set LEA = Application.AddIns.Add(addinFile)
            If (Not LEA Is Nothing) Then
                LEA.Installed = True
            Else
                MsgBox "Failed to add XLL"
            End If
    Else
        MsgBox "XLL file not found"
    End If

    Exit Sub

ERR_:
    MsgBox ("Error " & Err.Number & " " & Err.Description)

End Sub

すべて正常に動作します。インストーラーを変更しませんでした 1 人のユーザーが新しいバージョンのアドインをインストールすると、Excel で install.xls を実行すると、「スマート カードを挿入してください」というウィンドウが表示されます

(以前のバージョンと比較して) 変更された唯一の点は、install.xls のデジタル署名です。以前の署名ファイルは最近期限切れになりました。新しい証明書で install.xls に署名しました。

インストール中に奇妙なウィンドウが表示されるようになりました。
誰でもこれを解決する方法を知っていますか?

ありがとう

4

1 に答える 1

0

信頼できる場所を追加するには、以下のリンクの手順に従ってください。

http://office.microsoft.com/en-us/word-help/add-remove-or-modify-a-trusted-location-for-your-files-HA010354311.aspx#BM1

これは、同様の問題に対して私が追求している修正です。

于 2013-01-08T13:57:49.670 に答える