คำตอบที่ได้รับเลือกจากเจ้าของกระทู้
ความคิดเห็นที่ 2
ใช้ VBA ครับ
Sub CopyMultipleRows()
Dim r As Integer
For r = 21 To 221 Step 20
Rows("1:6").Copy
Rows(r).Insert
Next r
End Sub
ลองนำไปประยุกต์ใช้ดูครับ
Sub CopyMultipleRows()
Dim r As Integer
For r = 21 To 221 Step 20
Rows("1:6").Copy
Rows(r).Insert
Next r
End Sub
ลองนำไปประยุกต์ใช้ดูครับ
▼ กำลังโหลดข้อมูล... ▼
แสดงความคิดเห็น
คุณสามารถแสดงความคิดเห็นกับกระทู้นี้ได้ด้วยการเข้าสู่ระบบ
กระทู้ที่คุณอาจสนใจ
อ่านกระทู้อื่นที่พูดคุยเกี่ยวกับ
VB (Visual Basic)
ภาษาเบสิก (BASIC programming language)
วิศวกรรมคอมพิวเตอร์
Microsoft Office
Microsoft Excel
แทรกแถวซ้ำๆ