วิธีป้อนสูตรอัตโนมัติเมื่อแทรกแถวใน Excel

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

เติมสูตรอัตโนมัติเมื่อแทรกแถวว่างด้วยการสร้างตาราง

เติมสูตรอัตโนมัติเมื่อแทรกแถวว่างด้วยรหัส VBA

เติมสูตรอัตโนมัติเมื่อแทรกแถวว่างด้วยการสร้างตาราง

ใน Excel รูปแบบตารางสามารถช่วยให้คุณกรอกสูตรข้างต้นลงในแถวว่างที่แทรกใหม่โดยอัตโนมัติโปรดทำดังนี้:

1. เลือกช่วงข้อมูลที่คุณต้องการเติมสูตรอัตโนมัติจากนั้นคลิก สิ่งที่ใส่เข้าไป > ตารางดูภาพหน้าจอ:

2. ใน สร้างตาราง ให้ตรวจสอบไฟล์ ตารางของฉันมีส่วนหัว หากมีส่วนหัวในข้อมูลของคุณโปรดดูภาพหน้าจอ:

3. จากนั้นคลิก OK ปุ่มและสร้างตารางแล้วและตอนนี้เมื่อคุณแทรกแถวว่างสูตรด้านบนจะถูกแทรกลงในแถวใหม่โดยอัตโนมัติดูภาพหน้าจอ:

เติมสูตรอัตโนมัติเมื่อแทรกแถวว่างด้วยรหัส VBA

หากคุณไม่ต้องการเปลี่ยนข้อมูลเป็นตารางโค้ด VBA ด้านล่างนี้ยังสามารถช่วยคุณแก้ปัญหานี้ได้

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

รหัส VBA: เติมสูตรอัตโนมัติเมื่อแทรกแถวว่าง

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby Extendoffice 20160725
    Cancel = True
    Target.Offset(1).EntireRow.Insert
    Target.EntireRow.Copy Target.Offset(1).EntireRow
    On Error Resume Next
    Target.Offset(1).EntireRow.SpecialCells(xlConstants).ClearContents
End Sub

2. จากนั้นบันทึกและปิดรหัสนี้กลับไปที่แผ่นงานตอนนี้เมื่อคุณคลิกสองครั้งที่เซลล์ระหว่างข้อมูลแถวใหม่จะถูกแทรกใต้เซลล์ที่ใช้งานอยู่และจะเติมสูตรโดยอัตโนมัติเช่นกัน

สาธิต: เติมสูตรอัตโนมัติเมื่อแทรกแถวว่าง