✔ 最佳答案
PPT 2002: Run - Time 錯誤 -2147024809 當您嘗試變更檢視中使用 Visual Basic for Applications
檢視此文章適用的產品。
注意:本文是不經人為參與的自動機器翻譯系統翻譯完成。這些文章是Microsoft為非英語系國家使用者所提供,讓使用者可以了解文章的內容。Microsoft 不保證翻譯的語言品質也不對由於內容的錯譯或客戶針對內容使用所發生的任何直接或間接可能的問題負責。
文章編號
:
285305
上次校閱
:
2007年1月29日
版次
:
1.2
徵狀
當您執行 Microsoft Visual Basic for Applications 巨集與 Microsoft PowerPoint, 可能會收到與下列類似的錯誤訊息:
Run - Time 錯誤: ' -2147024809 (80070057) '
DocumentWindow (未知的成員): 無效的列舉值
圖片參考:
http://support.microsoft.com/library/images/support/kbgraphics/public/en-us/uparrow.gif
回此頁最上方
發生的原因
這個問題是因 PowerPoint 無法執行 Visual Basic for Application 巨集時, 變更套用至特定的檢視。 當您變更並不會改變 ViewType 屬性來檢視或 ppViewMasterThumbnails 、 ppViewThumbnails , 而會顯示這個 Run - Time 錯誤訊息。
圖片參考:
http://support.microsoft.com/library/images/support/kbgraphics/public/en-us/uparrow.gif
回此頁最上方
其他可行方案
如果要解決這個問題, 可來截取這個函式並將檢視變更為上一個檢視回您的巨集加入程式碼。 若要建立範例巨集的這類, 請依照下列步驟執行:
1.
啟動 PowerPoint, 然後建立一個新的簡報。
2.
按一下 [ 工具 ] , 指到 巨集 , 和然後按一下 [ Visual Basic 編輯器 ] (或按 ALT + F 11)
3.
在模組輸入或貼上下述程式碼::Sub A()
NewViewType = 11
' 11 = Thumbnails, change this to change view
On Error Resume Next
Err.Clear
OldViewType = ActiveWindow.ViewType
' Save the current view type to revert to if there is an error.
ActiveWindow.ViewType = NewViewType
If Err.Number = -2147024809 Then
'Thumb-type view
ActiveWindow.ViewType = OldViewType
ElseIf Err.Number = -2147188160 Then
'Title master view without a title master
ActiveWindow.ViewType = OldViewType
End If
End Sub
4.
在 [ 執行 ] 功能表, 再按 [ A, 子程序的程式碼中任何地方及 [ 執行 Sub / UserForm ] 。您可以變更為有效的不同檢視型別範圍從 1 到 12 NewViewType 變數。
Microsoft 提供程式設計範例僅, 供說明之用不做任何明示或暗示, 包括但不限於, 的適售性及 / 或適合特定用途之默示責任擔保。 本文假設您對於示範所用的程式設計語言,以及用來建立和偵錯程序的工具相當熟悉。. Microsoft 技術支援工程師可以協助說明特定程序的功能,但無法修改這些範例以提供附加功能或建構程序來滿足您的特定需求。. 如果您的程式設計經驗有限,可以聯繫「Microsoft 認證夥伴」或撥打 Microsoft 收費諮詢熱線:(800) 936-5200。. 如需有關 Microsoft 認證夥伴的詳細資訊,請造訪下列 Microsoft 網站::
https://partner.microsoft.com/global/30000104 (
https://partner.microsoft.com/global/30000104)如需有關可用支援選項與如何聯絡 Microsoft 的詳細資訊,請造訪下列 Microsoft 網站::
http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS (
http://support.microsoft.com/default.aspx?scid=fh;en-us;cntactms)
圖片參考:
http://support.microsoft.com/library/images/support/kbgraphics/public/en-us/uparrow.gif
回此頁最上方
狀況說明
Microsoft 已確認本篇文章開頭所列之 Microsoft 產品確實有上述問題。.
圖片參考:
http://support.microsoft.com/library/images/support/kbgraphics/public/en-us/uparrow.gif
回此頁最上方
這篇文章中的資訊適用於:
•
Microsoft PowerPoint 2002 Standard Edition
圖片參考:
http://support.microsoft.com/library/images/support/kbgraphics/public/en-us/uparrow.gif
回此頁最上方
關鍵字:
kbbug kberrmsg kbpending KB285305 KbMtzh kbmt
圖片參考:
http://support.microsoft.com/library/images/support/kbgraphics/public/en-us/uparrow.gif
回此頁最上方
Microsoft及(或)其供應商不就任何在本伺服器上發表的文字資料及其相關圖表資訊的恰當性作任何承諾。所有文字資料及其相關圖表均以「現狀」供應,不負任何擔保責任。Microsoft及(或)其供應商謹此聲明,不負任何對與此資訊有關之擔保責任,包括關於適售性、適用於某一特定用途、權利或不侵權的明示或默示擔保責任。Microsoft及(或)其供應商無論如何不對因或與使用本伺服器上資訊或與資訊的實行有關而引起的契約、過失或其他侵權行為之訴訟中的特別的、間接的、衍生性的損害或任何因使用而喪失所導致的之損害、資料或利潤負任何責任。