文章編號: 198561 - 上次校閱: 2005年6月17日 - 版次: 3.0

WD2000： 如何建立下拉式方塊包含超過 25 個項目

中英文對照顯示按一下這裡顯示機器翻譯的中英文對照
機器翻譯檢視機器翻譯免責聲明
檢視此文章適用的產品。
系統提示本文適用於您使用的作業系統之外的作業系統。與您不相關的文章內容已停用。
本文章的有 Microsoft Word 2002] 版本請參閱 306258? (http://support.microsoft.com/kb/306258/EN-US/ ) 。
本文章的有 Microsoft Word 97] 版本請參閱 194026? (http://support.microsoft.com/kb/194026/EN-US/ ) 。

在此頁中

全部展開 | 全部摺疊

結論

本文說明如何建立和使用自訂表單上下拉式方塊項目巨集為文字表單欄位。此巨集可用於因應措施 25 項目限制下拉式表單欄位中。

注意：如需有關如何執行這項操作，當您使用 Microsoft Access 資料庫的詳細資訊，按一下下面的文件編號，檢視 「 Microsoft 知識庫 」 中的發行項:
253542? (http://support.microsoft.com/kb/253542/EN-US/ ) WD2000： 如何建立包含超過 25 個項目從 Access 資料庫中的下拉式方塊
回此頁最上方

其他相關資訊

Microsoft 僅，為了說明提供程式設計範例，不提供任何明示或默示的保證。這包括，但不限於適售性或適合某特定用途之默示擔保責任。本文假設您已熟悉使用我們所示範的程式設計語言以及建立和偵錯程序所使用的工具。Microsoft 技術支援工程師可以協助解釋特定程序的功能，但它們不會修改這些範例以提供附加功能或建構程序，以符合您特定需求。
如需有關如何使用本文中的範例程式碼的詳細資訊，按一下 [下面的文件編號，檢視 「 Microsoft 知識庫 」 中的發行項]：
212536? (http://support.microsoft.com/kb/212536/EN-US/ ) OFF2000： 如何執行範例程式碼從眭舑恅梒
在您的 Word 範本請依照下列步驟執行。

注意： 若要關閉視窗 (，例如程式碼視窗或 [屬性] 視窗)，請按一下視窗右上角的 X。
回此頁最上方

建立自訂表單上下拉式方塊

  1. 在 [工具] 功能表上指向 [巨集]，然後按一下 [Visual Basic 編輯器]。
  2. 在 專案視窗 選取您 TemplateProject。

    注意：如果 專案視窗 沒有出現，請按一下 [檢視] 功能表上的 [專案總管]。
  3. 按一下 [插入] 功能表 的自訂表單。會出現新的自訂表單和控制項工具箱。以滑鼠右鍵按一下自訂表單，然後按一下 [檢視程式碼。加入下列程式碼 
    Private Sub UserForm_Initialize()

  ComboBox1.ColumnCount = 1

  'Load data into ComboBox

  ComboBox1.List() = Array("Zero", "One", "Two", "Three")

End Sub
    然後關閉程式碼視窗。
  4. 以滑鼠右鍵按一下自訂表單，然後按一下 [快顯功能表上的 [內容]。在 Alphabetic] 索引標籤 frmcombo，重新命名 (名稱)，然後再將標題重新命名為 Microsoft Word。關閉 [自訂表單內容] 視窗。
  5. 在工具箱中的 [控制項] 索引標籤，選取 下拉式方塊，然後將其放在您的自訂表單上。下拉式方塊] 控制項上按一下滑鼠右鍵，然後按一下快顯功能表上的 [檢視程式碼。變更下拉式方塊程式碼所示： 
    Private Sub ComboBox1_Change()

   ActiveDocument.FormFields("Text1").Result = ComboBox1.Value

End Sub
    然後關閉程式碼視窗。

    注意： Text1 是文字表單欄位會插入您的範本中本文的步驟 2 的 [] 建立 [文字表單欄位 」 程序的書籤名稱。
  6. 工具箱] 的 [控制項] 索引標籤上, 選取 指令按鈕，然後將其放在您的自訂表單為 關閉 的按鈕上。以滑鼠右鍵按一下 指令按鈕，然後按一下快顯功能表上的 [檢視程式碼。變更指令按鈕程式碼所示： 
    Private Sub Cmdclose_Click()

  Unload Me

End Sub
    然後關閉程式碼視窗。以滑鼠右鍵按一下 指令按鈕，然後按一下快顯功能表上的 [內容]。在 Alphabetic] 索引標籤 Cmdclose，重新命名 (名稱)]，然後再重新標號命名為 [關閉]。關閉 [指令按鈕內容] 視窗。
自訂表單上下拉式方塊已經完成。前進到 「 建立項目巨集 」 程序，以建立項目巨集。
回此頁最上方

建立項目巨集

  1. 在 [專案] 視窗中，選取您 TemplateProject。
  2. 在 插入] 功能表上按一下 [模組]。會顯示空白的模組程式碼頁。
  3. 下列程式碼中的型別： 
    Sub gocombobox()

   frmcombo.Show

End Sub
項目巨集現在已完成的。在 [檔案] 功能表上按一下 [關閉]，並返回 [Microsoft Word]。繼續至 「 建立文字表單欄位 」 程序，以在您的 Word 範本中建立表單欄位。
回此頁最上方

建立文字表單欄位

  1. 在您範本在 [檢視] 功能表上指向 [工具列]，然後按一下 [表單]。
  2. 在您要插入的下拉式清單的結果您插入點放在。按一下 [表單] 工具列 文字表單欄位 (在左邊的第一個按鈕)。文字表單欄位就會插入到您的範本作為灰色網底。

    注意: 如果您看到 { FORMTEXT } 欄位請按 ALT + F9 以關閉 [功能變數代碼。
  3. 文字表單欄位 上按一下滑鼠右鍵，然後按一下快顯功能表上的 [內容]。
  4. 在 [文字表單欄位選項] 對話方塊 上的 [執行巨集] 區段下方按一下 [項目] 方塊中的向]、 選取 gocombobox] 巨集，然後按一下 [確定]]。

    注意： 請確定您的 文字表單欄位書籤名稱 是相同的如您在本文稍早的步驟 4 的"建立自訂表單上下拉式方塊 」 程序中指定。
  5. 在 [表單] 工具列上按一下 [保護表單]。
  6. 儲存並關閉您的範本。
若要將您的範本按一下 [檔案] 功能表上的 [新增]。選取您的範本，然後按一下 [確定]。您的範本為基礎的一份新文件便會出現。包含與您的項目下拉式方塊的自訂表單時，會顯示您使用 TAB 鍵移動到 文字表單欄位。
回此頁最上方
這篇文章中的資訊適用於:
  • Microsoft Word 2000 Standard Edition
回此頁最上方
關鍵字：?
kbmt kbhowto KB198561 KbMtzh
回此頁最上方
機器翻譯機器翻譯
重要：本文是以 Microsoft 機器翻譯軟體翻譯而成，而非使用人工翻譯而成。Microsoft 同時提供使用者人工翻譯及機器翻譯兩個版本的文章，讓使用者可以依其使用語言使用知識庫中的所有文章。但是，機器翻譯的文章可能不盡完美。這些文章中也可能出現拼字、語意或文法上的錯誤，就像外國人在使用本國語言時可能發生的錯誤。Microsoft 不為內容的翻譯錯誤或客戶對該內容的使用所產生的任何錯誤或損害負責。Microsoft也同時將不斷地就機器翻譯軟體進行更新。
按一下這裡查看此文章的英文版本：198561? (http://support.microsoft.com/kb/198561/en-us/ )
回此頁最上方
Microsoft及(或)其供應商不就任何在本伺服器上發表的文字資料及其相關圖表資訊的恰當性作任何承諾。所有文字資料及其相關圖表均以「現狀」供應，不負任何擔保責任。Microsoft及(或)其供應商謹此聲明，不負任何對與此資訊有關之擔保責任，包括關於適售性、適用於某一特定用途、權利或不侵權的明示或默示擔保責任。Microsoft及(或)其供應商無論如何不對因或與使用本伺服器上資訊或與資訊的實行有關而引起的契約、過失或其他侵權行為之訴訟中的特別的、間接的、衍生性的損害或任何因使用而喪失所導致的之損害、資料或利潤負任何責任。