ในบทความนี้ เราจะแสดงวิธีการ แทรก ข้อมูล ลงใน Excel ตาราง โดยใช้ VBA<2 รหัส . ด้วยความช่วยเหลือของคุณสมบัติและวิธีการที่มีอยู่แล้วภายในของ Excel เราสามารถอำนวยความสะดวกในการทำงานของการเพิ่มหรือเขียนทับข้อมูลลงในตารางได้อย่างง่ายดาย มาดูตัวอย่างเพื่อทำความเข้าใจวิธีการต่างๆ พร้อมกับโค้ด VBA กัน

ดาวน์โหลดแบบฝึกหัดฝึกหัด

ดาวน์โหลดฝึกหัดฝึกหัดเล่มนี้เพื่อทำแบบฝึกหัดในขณะที่คุณกำลังอ่าน บทความนี้

4 ตัวอย่างการแทรกข้อมูลลงในตารางโดยใช้ VBA ใน Excel

สมมติว่าเรามี รายการลดราคา ของร้านค้าที่มีรายละเอียด เช่น วันที่สั่งซื้อ ชื่อสินค้า ปริมาณ ราคาต่อหน่วย และราคารวม

วิธีสร้างตารางใน Excel

เมื่อต้องการ เปลี่ยน ชุดข้อมูล เป็น ตาราง Excel ทำดังต่อไปนี้-

• เลือก ชุดข้อมูลทั้งหมด .
• ไปที่ ไปที่แท็บ แทรก จาก Excel Ribbon .
• คลิก บนตัวเลือก ตาราง

• สุดท้าย คลิกปุ่ม ตกลง ในหน้าต่าง สร้างตาราง

• เราได้ แปลง ชุดข้อมูล เป็น ตาราง Excel เรียบร้อยแล้ว

เพื่อแทรกข้อมูล ในตาราง Excel เราจะใช้ ฟังก์ชัน VBA และ คุณสมบัติ หลายรายการใน โค้ด ของเรา ส่วนต่อไปนี้อธิบายวิธีการ เปิด และ เขียนโค้ด ใน ตัวแก้ไข Visual Basic

เขียนโค้ดใน Visual Basic Editor

ทำตาม ขั้นตอน เพื่อ เปิด วิชวลเบสิก เอดิเตอร์ และเขียนโค้ดที่นั่น

• ไปที่แท็บ นักพัฒนา จาก Excel Ribbon .
• คลิก ตัวเลือก Visual Basic

• ในหน้าต่าง Visual Basic for Applications คลิก แทรกแบบเลื่อนลง เพื่อ เลือก โมดูล ใหม่

จากนั้น โมดูลใหม่ เปิดอยู่ เขียนโค้ดที่นั่นแล้วกด F5 เพื่อ เรียกใช้

1 แทรกข้อมูลที่แถวสุดท้ายของตารางโดยใช้ VBA ใน Excel

ในตัวอย่างนี้ เราจะใช้โค้ด VBA เพื่อเพิ่ม a แถวใหม่ ที่ ด้านล่าง ของ ตาราง จากนั้น แทรกข้อมูล ลงในนั้น ในตารางของเรา เรามี 4 แถว จาก ข้อมูล ในการเพิ่ม อันที่ 5 ให้ คัดลอก และ วาง โค้ดต่อไปนี้ลงในโปรแกรมแก้ไข Visual Basic

4863

กด F5 เพื่อ เรียกใช้ รหัส

เราได้ แทรก แถวใหม่ ของ ข้อมูล ที่ ด้านล่าง ของ ตารางที่มีอยู่ .

คำอธิบายโค้ด:

• ในโค้ดของเรา เราใช้ ListObjects วัตถุ ของ VBA Excel เพื่อ จับ ตาราง ด้วย ชื่อ สำหรับข้อมูลเพิ่มเติม แต่ละ ของ ListObject วัตถุคือ ตาราง ใน แผ่นงาน ในการรับชื่อตาราง คลิก บน ตาราง >> คลิก บน แท็บการออกแบบตาราง ใน Excel Ribbon

• จากนั้น เราใช้ ListRows . เพิ่มเมธอด เพื่อเพิ่ม แถวใหม่ ใน ตาราง วิธีนี้ รับ สองอาร์กิวเมนต์ : ตำแหน่ง และ แทรกเสมอ .

โดยการป้อน จำนวนเต็ม จำนวน เราสามารถระบุ ตำแหน่งสัมพัทธ์ ของ แถวที่เพิ่มใหม่ ใน ตาราง ในตัวอย่างนี้ เรา เว้นว่างไว้ อาร์กิวเมนต์ตำแหน่ง เป็นผลให้ แถวใหม่ ได้รับการเพิ่ม ที่ ด้านล่าง ของ ตาราง .

• สุดท้าย เราตั้งค่าข้อมูลใน แต่ละ ของ เซลล์ ของ <1 ใหม่>เพิ่มแถว ในกรณีนี้ ข้อมูลคือ .Range(1) = “1/1/2022” เป็น OrderDate, .Range(2) = “Apple” เป็น ผลิตภัณฑ์ .Range(3) = 5 เป็น ปริมาณ,  .Range(4) = 1.77 เป็น ราคาต่อหน่วย

อ่านเพิ่มเติม : ชื่อตาราง Excel: ทั้งหมดที่คุณต้องการทราบ

2. เรียกใช้โค้ด VBA เพื่อแทรกข้อมูลที่แถวเฉพาะของตารางใน Excel

ในภาพประกอบนี้ เราจะ เพิ่มแถวข้อมูล ที่ แถวเฉพาะที่เกี่ยวข้องกับตาราง โดยใช้โค้ดชิ้นเดียวกันกับที่เราใช้ในตัวอย่างด้านบน ในกรณีนี้ เราเพียงแค่ต้อง ระบุ อาร์กิวเมนต์ตำแหน่ง ของเมธอด ListRows.Add ในรหัส. สมมติว่าเราต้องการ เพิ่มข้อมูลการขาย สำหรับ สีส้ม พร้อมรายละเอียดใน แถวหมายเลข 3 ที่สัมพันธ์กัน กับ ตารางที่มีอยู่ เพื่อให้สิ่งนี้เกิดขึ้น คัดลอก และ วาง โค้ด ต่อไปนี้ลงใน Visual Code Editor

5009

รันโค้ดโดย กด F5 แทรก ข้อมูลการขาย สำหรับ Orange ใน แถวที่ 3 ที่สัมพันธ์กับตาราง

อ่าน เพิ่มเติม: โค้ด Excel VBA สำหรับแต่ละแถวในตาราง (เพิ่ม เขียนทับ ลบ ฯลฯ)

การอ่านที่คล้ายกัน

• ผลรวมของฟิลด์จากการคำนวณหารด้วยจำนวนในตาราง Pivot
• วิธีแสดงภาพประกอบการแจกแจงความถี่สัมพัทธ์ใน Excel
• [แก้ไข] ไม่สามารถจัดกลุ่มวันที่ใน Pivot Table: 4 วิธีแก้ไขที่เป็นไปได้
• วิธีคำนวณการแจกแจงความถี่เป็นเปอร์เซ็นต์ใน Excel (2 วิธี)
• Pivot Table ไม่รีเฟรช (5 ปัญหาและแนวทางแก้ไข)

3. แทรกและเขียนทับข้อมูลลงในตารางโดยใช้ VBA ใน Excel

ที่นี่ เราจะแสดงวิธีการ เขียนทับ ข้อมูล ที่มีอยู่ ใน ตารางแทน ของ การแทรก a แถวใหม่ ของ ข้อมูล ในการทำเช่นนั้น เราจำเป็นต้องใช้คุณสมบัติ ListObject.ListRows ของ Excel แทน ของคุณสมบัติ ListRows.Add ที่เราใช้ ก่อนหน้านี้ คุณสมบัติ ListObject.ListRows ยังรับ หมายเลขแถว ( จำนวนเต็ม ค่า ) เป็น อาร์กิวเมนต์ สมมติว่าเราต้องการ เปลี่ยนแปลง ราคาต่อหน่วย ของ Orange ตั้งแต่ 2.14 ถึง 2.35 ที่เรา แทรก ใน ตัวอย่างก่อนหน้า . คัดลอก และ วาง โค้ดต่อไปนี้ด้านล่างในโปรแกรมแก้ไข Visual Basic

1213

ในโค้ดของเรา เรา ตั้งค่า อาร์กิวเมนต์ สำหรับคุณสมบัติ ListObject.ListRows เป็น 3 โดยที่ ข้อมูล สำหรับ ส้ม เป็นของ เรียกใช้ รหัส โดยการกด F5 และดู ความแตกต่าง

รหัสมี เปลี่ยนแปลง เฉพาะ ราคาต่อหน่วย ของ ข้อมูล ที่ แถวหมายเลข 3 ที่สัมพันธ์กัน กับ ตาราง

อ่านเพิ่มเติม: วิธีแทรกหรือลบแถวและคอลัมน์จากตาราง Excel

4. เรียกใช้โค้ด VBA เพื่อแทรกข้อมูลลงในตาราง Excel ตามอินพุตของผู้ใช้

ในตัวอย่างนี้ เราจะ แทรก ตัว ชื่อตาราง และ รายละเอียดการขาย ของ ผลิตภัณฑ์ เป็น อินพุตของผู้ใช้ แทนที่จะเป็น ฮาร์ดโค้ด ใน รหัส VBA แต่ละรายการ เวลา . ทำตามคำแนะนำด้านล่างเพื่อดำเนินการนี้

• คัดลอก และ วาง โค้ดต่อไปนี้ลงในโปรแกรมแก้ไขโค้ดภาพ

8046

• กด F5 เพื่อ เรียกใช้ รหัส
• ใส่ ชื่อ ของ ตาราง ในช่อง อินพุต ( Table1 ในตัวอย่างนี้) และกด ตกลง
<12



• จากนั้นใส่ค่าสำหรับ Oder Date ชื่อผลิตภัณฑ์ ปริมาณ และ Unit Price ใน ช่องป้อนข้อมูล ที่ ปรากฏขึ้นตามลำดับ ในตัวอย่างนี้ ค่าที่เราใช้คือ 1/1/2022, Orange, 3, และ 35



• ด้วยเหตุนี้ เราจึงมี แถวใหม่ พร้อมกับ ข้อมูลที่แทรก ที่ ด้านล่าง ของ ตาราง .



อ่านเพิ่มเติม: เคล็ดลับการจัดรูปแบบตารางใน Excel – เปลี่ยนรูปลักษณ์ของตาราง

หมายเหตุ

เมื่อเรา เพิ่ม a แถวใหม่ ด้วย ข้อมูล โดยใช้โค้ด VBA รูปแบบ และ สูตร รับ ดำเนินการ ไปยัง แถวใหม่โดยอัตโนมัติ ในตัวอย่างของเรา คอลัมน์ ราคารวม เอาต์พุต ผลิตภัณฑ์ ผลิตภัณฑ์ ของคอลัมน์ ปริมาณ และ ราคาต่อหน่วย เราเพียงแค่ แทรกเฉพาะ ปริมาณ และ มูลค่าราคาต่อหน่วย ; แถวใหม่ ถูก แทรก ด้วย ผลิตภัณฑ์ ของเหล่านี้ สองค่า ในคอลัมน์ ราคารวม <3

บทสรุป

ตอนนี้ เรารู้วิธีแทรกข้อมูลลงในตาราง Excel โดยใช้รหัส VBA หวังว่าจะช่วยให้คุณใช้วิธีการเหล่านี้ได้อย่างมั่นใจมากขึ้น คำถามหรือข้อเสนอแนะใด ๆ อย่าลืมใส่ไว้ในช่องแสดงความคิดเห็นด้านล่าง