文章編號: 213424 - 上次校閱: 2006年11月23日 - 版次: 3.5

XL2000： 如何控制滑鼠指標的外觀時執行巨集

中英文對照顯示按一下這裡顯示機器翻譯的中英文對照
機器翻譯檢視機器翻譯免責聲明
檢視此文章適用的產品。
系統提示本文適用於您使用的作業系統之外的作業系統。與您不相關的文章內容已停用。

在此頁中

全部展開 | 全部摺疊

結論

在 Microsoft Excel 2000 中您可以使用 Microsoft Visual Basic，為應用程式 Cursor 屬性來控制滑鼠指標的外觀，在執行巨集時。在版本的 Excel 中早於 7.0，您沒有可以變更滑鼠指標的顯示的方式。
回此頁最上方

其他相關資訊

您可以使用 Cursor 屬性以箭號]、 [沙漏]、 [I 字形狀，(顯示編輯文字時)] 及 [預設指標顯示滑鼠指標。下列的內建常數對應到每個可用的資料指標圖形： 
   xlNorthwestArrow    The northwest-arrow pointer
   xlWait              The hourglass pointer
   xlIBeam             The I-beam pointer
   xlNormal            The default pointer
請注意您在鍵入 i 字形狀指標的常數時遵循 「 超大型核"前置詞的字母是一個"I"(針對 i 字形狀)。

Microsoft 僅，為了說明提供程式設計範例，不提供任何明示或默示的保證，包括但不是限於適售性以及適合某特定用途之默示擔保責任。本文假設您已熟悉我們所示範的程式設計語言，以及用來建立和偵錯程序的工具。Microsoft 技術支援工程師可以協助解釋特定程序的功能，但它們不會修改這些範例以提供附加功能或建構程序，以符合您的特定需求。
如果您有限制程式設計經驗，您可以連絡 Microsoft 認證合作夥伴或 Microsoft 諮詢服務。如需詳細資訊請造訪下列 Microsoft] 網站：

Microsoft 認證合作夥伴-https://partner.microsoft.com/global/30000104 (https://partner.microsoft.com/global/30000104)

Microsoft 摘要報告服務-http://support.microsoft.com/gp/advisoryservice (http://support.microsoft.com/gp/advisoryservice)

如需有關可用的支援選項，以及有關如何連絡 Microsoft 的詳細資訊，請造訪下列 Microsoft 網站： http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS (http://support.microsoft.com/default.aspx?scid=fh;en-us;cntactms)
回此頁最上方

資料指標屬性範例

輸入或貼上下列程式碼在 Visual Basic 模組工作表來說明各種不同的滑鼠指標形狀： 
Sub ChangePointer()

    ' Display dialog box indicating mouse pointer will change.
    MsgBox "Click OK to display mouse pointer as hourglass."

    ' Display mouse pointer as hourglass.
    Application.Cursor = xlwait

    ' Wait so mouse pointer change will be noticeable.
    Application.Wait Now + TimeValue("0:0:03")
    MsgBox "Click OK to display mouse pointer as arrow."

    ' Display mouse pointer as arrow
    Application.Cursor = xlNorthwestArrow

    ' Wait so mouse pointer change will be noticeable.
    Application.Wait Now + TimeValue("0:0:03")

    MsgBox "Click OK to display mouse pointer as I-beam."

    ' Display mouse pointer as I-beam.
    Application.Cursor = xlIBeam

    ' Wait so mouse pointer change will be noticeable.
    Application.Wait Now + TimeValue("0:0:03")

    MsgBox "Click OK to return mouse pointer to normal."

    ' Return mouse pointer to normal display.
    Application.Cursor = xlNormal

End Sub
請注意，因為 資料指標 屬性是 不 會自動重設巨集停止執行時，您需要重滑鼠指標設 游標處] 屬性設定為 [xlNormal 值之前您巨集停駐點。
回此頁最上方

?考

在 Visual Basic 編輯器] 中，[游標] 屬性的相關資訊按一下 [說明] 功能表上的 [Microsoft Visual Basic 說明]，並在 「 Office 小幫手 」 或 「 解答精靈 」 中輸入 資料指標屬性 然後按一下 [搜尋] 以檢視主題。
回此頁最上方
這篇文章中的資訊適用於:
  • Microsoft Excel 2000 Standard Edition
回此頁最上方
關鍵字：?
kbmt kbhowto KB213424 KbMtzh
回此頁最上方
機器翻譯機器翻譯
重要：本文是以 Microsoft 機器翻譯軟體翻譯而成，而非使用人工翻譯而成。Microsoft 同時提供使用者人工翻譯及機器翻譯兩個版本的文章，讓使用者可以依其使用語言使用知識庫中的所有文章。但是，機器翻譯的文章可能不盡完美。這些文章中也可能出現拼字、語意或文法上的錯誤，就像外國人在使用本國語言時可能發生的錯誤。Microsoft 不為內容的翻譯錯誤或客戶對該內容的使用所產生的任何錯誤或損害負責。Microsoft也同時將不斷地就機器翻譯軟體進行更新。
按一下這裡查看此文章的英文版本：213424? (http://support.microsoft.com/kb/213424/en-us/ )
回此頁最上方
Microsoft及(或)其供應商不就任何在本伺服器上發表的文字資料及其相關圖表資訊的恰當性作任何承諾。所有文字資料及其相關圖表均以「現狀」供應，不負任何擔保責任。Microsoft及(或)其供應商謹此聲明，不負任何對與此資訊有關之擔保責任，包括關於適售性、適用於某一特定用途、權利或不侵權的明示或默示擔保責任。Microsoft及(或)其供應商無論如何不對因或與使用本伺服器上資訊或與資訊的實行有關而引起的契約、過失或其他侵權行為之訴訟中的特別的、間接的、衍生性的損害或任何因使用而喪失所導致的之損害、資料或利潤負任何責任。