วิธีการใช้แมโครเพื่อแทรกแถวด้านล่างตารางใน Excel ด้วยสูตรที่คงไว้?
เป็นเรื่องปกติที่เราจะต้องเพิ่มแถวว่างที่ด้านล่างของตารางที่ระบุเพื่อขยายตารางและเพิ่มเนื้อหาใหม่ บทความนี้พูดถึงการใช้มาโครเพื่อแทรกแถวใหม่ด้านล่างตารางที่ระบุและเก็บสูตรของเซลล์ด้านบนไว้ใน Excel
ใช้มาโครเพื่อแทรกแถวด้านล่างตารางใน Excel
ใช้มาโครเพื่อแทรกแถวด้านล่างตารางใน Excel
โปรดทำดังนี้เพื่อแทรกแถวว่างด้านล่างตารางที่ระบุด้วยมาโคร
1 กด อื่น ๆ + F11 พร้อมกันเพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน โปรดคลิก สิ่งที่ใส่เข้าไป > โมดูล เพื่อเปิดหน้าต่างโมดูล จากนั้นคัดลอกและวางโค้ด VBA ด้านล่างลงในหน้าต่าง
รหัส VBA: ใช้มาโครเพื่อแทรกแถวว่างด้านล่างตารางที่ระบุ
Sub AddRows()
'Updated by Extendoffice 2017/9/12
Dim xLastRow As Long
Dim xRg As Range
Dim xAddress As String
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the table range you will insert blank row below:", "KuTools For Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
xLastRow = xRg.Row + xRg.Rows.Count
xRg.Rows(xLastRow).FillDown
xRg.Rows(xLastRow).SpecialCells(xlCellTypeConstants).ClearContents
End Sub
3 กด F5 กุญแจสำคัญในการเรียกใช้รหัส และก Kutools สำหรับ Excel กล่องโต้ตอบปรากฏขึ้นโปรดเลือกช่วงตารางที่คุณจะเพิ่มแถวว่างด้านล่างจากนั้นคลิกที่ OK ปุ่ม. ดูภาพหน้าจอ:
จากนั้นคุณจะเห็นแถวว่างใหม่ถูกเพิ่มที่ด้านล่างของตารางที่ระบุ และสูตรในเซลล์ด้านบนยังสงวนไว้ในแถวที่แทรกใหม่ด้านล่างดูภาพหน้าจอที่แสดง:
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!