วิธีการเพิ่มข้อมูลลงในตัวควบคุม ComboBox หรือตัวควบคุม ListBox ใน Excel หรือ Word

การแปลบทความ การแปลบทความ
หมายเลขบทความ (Article ID): 161598 - ผลิตภัณฑ์ที่เกี่ยวข้องในบทความนี้
หากต้องการดูบทความนี้สำหรับ Microsoft Excel สำหรับ Mac โปรดดูที่ 185388.
ขยายทั้งหมด | ยุบทั้งหมด

เนื้อหาบนหน้านี้

สรุป

บทความนี้อธิบายถึงวิธีการเพิ่มตัวควบคุม ComboBox หรือ ListBox

ข้อมูลเพิ่มเติม

Microsoft แสดงตัวอย่างการเขียนโปรแกรมเพื่อประกอบการอธิบายเท่านั้น และไม่มีการรับประกันไม่ว่าโดยชัดแจ้งหรือโดยนัย ทั้งนี้รวมถึง แต่ไม่จำกัดเพียงการรับประกันโดยนัยต่อความสามารถในการจำหน่ายหรือความเหมาะสมสำหรับวัตถุประสงค์เฉพาะ บทความนี้ตั้งสมมติฐานว่าคุณมีความคุ้นเคยกับภาษาการเขียนโปรแกรมที่แสดงอยู่ รวมทั้งเครื่องมือต่างๆ ที่ใช้ในการสร้างและแก้จุดบกพร่องของกระบวนการ วิศวกรฝ่ายสนับสนุนของ Microsoft สามารถช่วยอธิบายฟังก์ชันในขั้นตอนใดขั้นตอนหนึ่ง แต่จะไม่แก้ไขตัวอย่างนี้เพื่อเพิ่มฟังก์ชันหรือสร้างขั้นตอนเพิ่มเติมเพื่อตอบสนองความต้องการโดยเฉพาะของคุณ

สำหรับข้อมูลเพิ่มเติมเกี่ยวกับตัวเลือกการสนับสนุนที่มีอยู่ และข้อมูลติดต่อ Microsoft โปรดไปที่เว็บไซต์ Microsoft:
http://support.microsoft.com/contactus/?ws=support&ln=th-th
คุณสามารถใช้ตัวควบคุม เช่น combo box หรือ list box กับฟอร์มผู้ใช้ได้ ใน Microsoft Excel คุณสามารถใช้ตัวควบคุมเหล่านี้ในแผ่นงาน การเพิ่มตัวควบคุมใช้วิธีการเดียวกัน ตัวอย่างในบทความนี้ใช้ตัวควบคุมกับฟอร์มผู้ใช้

วิธีที่ 1: วิธีการเชื่อมโยง Combo Box หรือ List Box กับเซลล์บนแผ่นงาน Excel

  1. สร้างสมุดงานใหม่ใน Microsoft Excel ใน Sheet1 ให้พิมพ์ดังนี้:
          A1: หนึ่ง     B1: สีแดง
          A2: สอง     B2: สีเขียว
          A3: สาม   B3: สีเหลือง
          A4: สี่    B4: สีน้ำเงิน
    					
  2. กด ALT+F11 เพื่อเริ่ม Microsoft Excel Visual Basic Editor
  3. ในเมนู แทรก คลิก UserForm
  4. สร้างตัวควบคุม ComboBox และตัวควบคุม ListBox บนฟอร์มผู้ใช้
  5. ถ้าไม่มีหน้าต่างคุณสมบัติแสดงขึ้น ให้คลิก หน้าต่างคุณสมบัติ บนเมนู มุมมอง
  6. คลิก ComboBox แล้วเลื่อนไปยัง RowSource ใน หน้าต่างคุณสมบัติ

    หน้าต่างถูกแบ่งออกเป็นสองส่วน ส่วนด้านซ้ายประกอบด้วยชื่อของคุณสมบัติสำหรับตัวควบคุม ส่วนด้านขวาประกอบด้วยค่าของคุณสมบัติ คลิกส่วนขวาของ RowSource แล้วพิมพ์ "sheet1!a1:a4" (ไม่ใช้เครื่องหมายคำพูด)
  7. คลิก ListBox แล้วเลื่อนไปยัง RowSource ในหน้าต่างคุณสมบัติ คลิกส่วนขวาของ RowSource แล้วพิมพ์ "sheet1!b1:a4" (ไม่ใช้เครื่องหมายคำพูด)

    หมายเหตุ: ถ้าคุณไม่มีการอ้างอิงแผ่นงาน ตัวควบคุม ComboBox และ ListBox จะถูกเพิ่มด้วยข้อมูลจากเซลล์ จากแผ่นงานที่ใช้งานขณะที่คุณเรียกใช้ฟอร์มผู้ใช้ เพื่อให้แน่ใจว่าข้อมูลจากแผ่นงานเดียวกันจะถูกเพิ่มในฟอร์มผู้ใช้เสมอ ให้รวมการอ้างอิงแผ่นงานตามตัวอย่าง ถ้าต้องการเพิ่มฟอร์มผู้ใช้ด้วยข้อมูลจากแผ่นงานที่ใช้งาน โปรดอย่ารวมการอ้างอิงแผ่นงานใน RowSource เมื่อคุณทำเช่นนี้ แมโครใช้ข้อมูลจากแผ่นงานที่ใช้งานอยู่เพื่อรวบรวมแบบฟอร์มผู้ใช้
  8. เรียกใช้ฟอร์มผู้ใช้โดยคลิก เรียกใช้ แล้วคลิก Run Sub/UserForm
หนึ่ง สอง สาม และสี่ปรากฏในตัวควบคุม ComboBox และสีแดง สีเขียว สีเหลือง และสีน้ำเงินที่ปรากฏในตัวควบคุม ListBox

วิธีที่ 2: วิธีการใช้แมโคร Visual Basic เพื่อเพิ่ม Combo Box หรือ List Box

  1. เปิดแอพลิเคชัน Microsoft Office เช่น Microsoft Excel หรือ Word
  2. กด ALT+F11 เพื่อเริ่ม Visual Basic Editor
  3. ในเมนู แทรก คลิก UserForm
  4. สร้าง ComboBox และตัวควบคุม ListBox บนฟอร์มผู้ใช้
  5. คลิกขวาที่ฟอร์มผู้ใช้ แล้วคลิก ดูโค้ด หน้าต่างโค้ดสำหรับฟอร์มผู้ใช้ปรากฏขึ้น คลิก เตรียมใช้งาน ในรายการ ขั้นตอน (ด้านขวา)

    บรรทัดแรกและบรรทัดสุดท้ายของ Subroutine จะถูกป้อนโดยอัตโนมัติ และจุดแทรกจะถูกวางไว้ระหว่างสองบรรทัดโดยอัตโนมัติ
  6. พิมพ์โค้ดต่อไปนี้:
          ListBox1.List = Array("One", "Two", "Three", "Four")
          ComboBox1.List = Array ("แดง" "สีเขียว" "สีเหลือง" "สีน้ำเงิน")
    						
    รหัสนี้ควรปรากฏอยู่ระหว่างบรรทัด "UserForm_Initialize() ย่อย" และ "สิ้นสุดย่อย"
  7. ที่เมนู เรียกใช้ ให้คลิก Run Sub/UserForm เพื่อเรียกใช้ฟอร์มผู้ใช้
หนึ่ง สอง สาม และสี่ปรากฏในตัวควบคุม ListBox และสีแดง สีเขียว สีเหลือง และสีน้ำเงินที่ปรากฏในตัวควบคุม ComboBox

ข้อมูลอ้างอิง

สำหรับข้อมูลเพิ่มเติมเกี่ยวกับฟอร์มผู้ใช้ ให้คลิกแท็บ ดัชนี ในวิธีใช้ Microsoft Visual Basic โดยพิมพ์ข้อความต่อไปนี้:
วัตถุ UserForm
คลิกสองครั้งที่ข้อความที่เลือกเพื่อไปที่หัวข้อ "วัตถุ UserForm"

คุณสมบัติ

หมายเลขบทความ (Article ID): 161598 - รีวิวครั้งสุดท้าย: 4 กันยายน 2556 - Revision: 8.0
ใช้กับ
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Word 2002 Standard Edition
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Word 2000 Standard Edition
  • Microsoft Excel 97 Standard Edition
  • Microsoft Word 97 Standard Edition
  • Microsoft Word 2010
  • Microsoft Office Word 2007
  • Microsoft Office Excel 2003
  • Microsoft Excel 2010
  • Microsoft Office Excel 2007
  • Microsoft Office Word 2003
Keywords: 
kbcontrol kbdtacode kbhowto kbprogramming KB161598

ให้ข้อเสนอแนะ

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com