การลบบรรทัด VBA เป็นขั้นตอนมาตรฐานและมักใช้โดยนักพัฒนา อย่างไรก็ตาม สำหรับผู้ใช้ที่มีประสบการณ์น้อย การดำเนินการนี้อาจทำให้เกิดปัญหาบางอย่าง
คำแนะนำ
ขั้นตอนที่ 1
ตรวจสอบให้แน่ใจว่าคุณเข้าใจไวยากรณ์สำหรับคำสั่งลบบรรทัดโดยใช้คำสั่ง Delete คำสั่งจะมีลักษณะเหมือน ActiveCell. EntireRow. Delete และจำเป็นต้องลบแถวจำนวนหนึ่งเพื่อเปลี่ยนเป็นแถว ("first_line_number: last_line_number") ลบ (สำหรับ Excel)
ขั้นตอนที่ 2
ใช้ไวยากรณ์ที่คล้ายกันสำหรับคำสั่งลบแถวที่เลือกใน VBA แต่มีตัวเลือกขั้นสูง ก่อนอื่นให้กำหนดการดำเนินการที่จำเป็น: Private Sub Delete line_Click () ระบุแอปพลิเคชันที่ต้องการ Dim ea As Excel. Application และเลือกเวิร์กบุ๊กที่ต้องการ Dim ewb As Excel. Workbook จากนั้นระบุหน้าเอกสาร Dim ews As Excel. Worksheet ที่จะแก้ไข
ขั้นตอนที่ 3
ข้ามหนึ่งบรรทัดและป้อน Set XLAp = CreateObject (Class: = "Excel. Application") กำหนดตำแหน่งที่แน่นอนในบรรทัดต่อไปนี้: Set XLWb = XLAp. Workbooks เปิด ("drive_name: 1.xls") ใช้ค่าต่อไปนี้: ตั้งค่า XLWs = XLWb. ActiveSheet
ขั้นตอนที่ 4
ข้ามบรรทัดอื่นและป้อนค่าของงานที่เลือก: XLWs. Rows (1) ลบ บันทึกเอกสารที่แก้ไข: XLWb. Save ออกจากแอปพลิเคชันโอเพ่นซอร์ส: XLAp. Quit
ขั้นตอนที่ 5
ข้ามบรรทัดถัดไปและแทนที่ตัวแปรด้วยวัตถุหน่วยความจำ: Set XLWs = Nothing ทำซ้ำคำสั่งเดียวกันสำหรับแต่ละตัวแปรที่เปิดอยู่: Set XLWb = Nothing และสุดท้าย: Set XLAp = Nothing เสร็จสิ้นคำสั่งด้วย End Sub มาตรฐาน
ขั้นตอนที่ 6
ใช้มาโครเพื่อดำเนินการที่ซับซ้อนมากขึ้นเพื่อลบบรรทัดที่ไม่จำเป็นในเอกสาร เมื่อต้องการทำสิ่งนี้ ให้สร้างเวิร์กบุ๊ก Excel ใหม่และป้อนค่าที่จำเป็น เปิดเมนู "บริการ" ของแถบเครื่องมือด้านบนของหน้าต่างโปรแกรมและเลือกรายการ "มาโคร" เลือกรายการย่อย "Visual Basic Editor" และขยายเมนู "Insert" เลือกรายการ "โมดูล" และแทรกเอกสารที่สร้างขึ้น กลับไปที่เมนู "เครื่องมือ" และไปที่รายการ "มาโคร" อีกครั้ง ใช้รายการย่อย "มาโคร" และระบุรายการที่สร้างขึ้นใหม่ เรียกใช้แมโครโดยคลิกปุ่มเรียกใช้
