2017-04-23 33 views
3

這個問題有好幾個例子,但這個是主要的。這與更新有關(我們最顯着的問題是KB2726958)。我們有一個離開電子表格,看起來像這樣:MS Office - ActiveX按鈕切換位置

Leave Spreadsheet example

按下灰色的離開按鈕,你會在這裏結束:

Leave Word doc

所有這些編程寫在VBA(我從來沒有使用過VBA,我可以在一定程度上理解它)。

現在,問題在於使用'Leave Spreadsheet example'中的ActiveX按鈕導致2個按鈕'通過電子郵件發送'和'保存'來切換功能;通過電子郵件發送嘗試保存並保存打開Outlook並創建電子郵件。
這兩個功能都完全保留了功能,只是錯誤的按鈕。

我覺得奇怪的是,超鏈接到同一個文件的作品;按鈕不會切換並具有完整的功能。我唯一的解決方法是在使用超鏈接時直接打開文件。當使用ActiveX按鈕時,它似乎是基於它鏈接到的文件創建一個新文件。例如,超鏈接直接打開C:\ Report.dotm,但ActiveX按鈕使用基於Report.dotm的模板打開Document1.doc。
我正在考慮,也許activeX按鈕打開一個不正確的擴展名的Word?但我不知道如何解決這個問題(下面的代碼顯示,activeX控件上的鏈接文件是一個.dotm)。

什麼進一步拋出一個扳手混進去的是,它只會影響某些計算機......考慮到現場大家都用同一類型,具有相同的圖像PC的... :(

我的問題是,沒有人知道他們爲什麼可以被交換他們處於同一個網絡驅動器儘管是在不同的目錄上,他們需要同樣的權限訪問該按鈕的代碼如下:。 的Excel按鈕:

Private Sub CommandButton1_Click() 
' This button links the excel spreadsheet to the word doc 
    Dim wrdApp As Object 
    Dim wrdDoc As Object 
    Dim i As Integer 

    Set wrdApp = CreateObject("Word.Application") 
    wrdApp.Visible = True 
    Set wrdDoc = wrdApp.Documents.Add("\\networkdrive\directories\Request for Leave.dotm") 
End Sub 

字按鈕1和2:

Private Sub cmdSend_Click() 
' This is the code for the button 'Send by Email' 
    MsgBox "Send the following email to your Team Leader/Line Manager", vbInformation 
    SendDocumentAsAttachment "", "IPL Request for Leave" 
End Sub 

Private Sub cmdSave_Click() 
' This is the code for 'Save' 
    modSend.SaveLeaveForm 
End Sub 

請注意:上述評論是不是在VBA代碼,我已經寫了他們自己在這個問題更清晰明瞭。

故障排除,我已經做了:
刪除所有.exd文件
運行MS修補程序(可以去除所有GUI文件.exd)

下一步是嘗試運行的所有6與修復ActiveX控件相關的修補程序以及我們已經完成的特定修補程序,以查看是否可以解決問題。我還沒有這樣做的原因是因爲ITIL(變更管理),儘管我可能會在今天晚些時候嘗試測試。

我後來的結果是什麼?
理想情況下,我想了解是什麼導致這些按鈕從看起來像交換它們的功能。我有不同的按鈕交換場景,其中一些可以通過刪除.exd文件來解決,有些則不是。
通過了解正在發生的事情,我希望我可以將知識應用於其他場景(同樣的問題,不同的編碼)。
然後,我將能夠記錄我的發現,以便在我們執行下一輪已知打破ActiveX控件的修補時,我的組織將知道如何處理它。

+0

嘗試總結你的問題。 – Masoud

+0

Word dotm(不是普通模塊)的「* ThisDocument *」中是否有任何代碼?注意dotm是帶有宏的模板。 'Documents.Add()'用於創建基於Template doc的新文檔。從超鏈接中,您**打開**。此外,是否簽署了宏並將網絡路徑添加到受信任的文件夾? – PatricK

回答

2

因此下面提到的補丁修正了這個問題。還有一些其他問題需要我測試這個補丁,但我絕對應該從那裏開始。學習到教訓了。

從我的工作電子郵件:
我已經使用相關的ActiveX補丁只是試圖打破控件,KB2920754。我已經在訓練室的兩臺電腦上使用了它;兩者有不同的問題:
- 第一個有這樣的交換了周圍的按鈕(SAVE試圖電子郵件,電子郵件試圖保存)
- 第二個不能使用的按鈕都沒有。
此修補程序既能解決無需重新啓動或註銷又能解決問題的功能。我也沒有刪除任何.exd文件。
它的狀態,但是:
「重要對於此修訂是完全有效的,你還必須申請屬於中列出了Office 2013的其他補丁‘
解決方案’下面的Microsoft知識庫文章的一節」總共有6個。
補丁:
1. KB2920754 - (所述一個我已經成功地使用的)
2. KB2956145
3. KB2956163
4. KB2965206
5. KB2956176
6. KB2956155