Note: The other languages of the website are Google-translated. Back to English
English English

วิธีคัดลอกและแทรกแถวหลาย ๆ ครั้งหรือทำซ้ำแถว x ครั้งใน Excel

ในการทำงานประจำวันของคุณคุณเคยพยายามคัดลอกแถวหรือแต่ละแถวแล้วแทรกหลาย ๆ ครั้งด้านล่างแถวข้อมูลปัจจุบันในแผ่นงานหรือไม่? ตัวอย่างเช่นฉันมีช่วงของเซลล์ตอนนี้ฉันต้องการคัดลอกแต่ละแถวและวาง 3 ครั้งในแถวถัดไปตามภาพหน้าจอต่อไปนี้ คุณจะจัดการกับงานนี้ใน Excel ได้อย่างไร?


คัดลอกและแทรกแถวเฉพาะหลาย ๆ ครั้งด้วยรหัส VBA

หากคุณต้องการทำซ้ำเพียงแถวเดียว x ครั้งโค้ด VBA ต่อไปนี้อาจช่วยคุณได้โปรดดำเนินการดังนี้:

1. ระบุแถวที่คุณต้องการคัดลอกและแทรกหลาย ๆ ครั้งจากนั้นกดไฟล์ ALT + F11 จากนั้นจะเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ในไฟล์ โมดูล หน้าต่าง.

รหัส VBA: ทำซ้ำแถวเดียวหลาย ๆ ครั้ง:

Sub test()
'Updateby Extendoffice
    Dim xCount As Integer
LableNumber:
    xCount = Application.InputBox("Number of Rows", "Kutools for Excel", , , , , , 1)
    If xCount < 1 Then
        MsgBox "the entered number of rows is error, please enter again", vbInformation, "Kutools for Excel"
        GoTo LableNumber
    End If
    ActiveCell.EntireRow.Copy
    Range(ActiveCell.Offset(1, 0), ActiveCell.Offset(xCount, 0)).EntireRow.Insert Shift:=xlDown
    Application.CutCopyMode = False
End Sub

3. หลังจากวางรหัสแล้วกรุณากด F5 คีย์เพื่อเรียกใช้รหัสนี้และกล่องพร้อมต์จะปรากฏขึ้นเพื่อเตือนให้คุณป้อนจำนวนครั้งที่คุณต้องการทำซ้ำดูภาพหน้าจอ:

4. จากนั้นคลิก OK และแทรกแถวที่คัดลอกใหม่สามแถวใต้แถวที่เลือกดูภาพหน้าจอ:


คัดลอกและแทรกแต่ละแถวหลาย ๆ ครั้งตามจำนวนที่ระบุได้อย่างง่ายดาย

โดยปกติไม่มีวิธีการที่ดีในการคัดลอกและแทรกแถวหลาย ๆ ครั้งยกเว้นการคัดลอกและแทรกด้วยตนเอง แต่ด้วย Kutools สำหรับ Excel's ทำซ้ำแถว / คอลัมน์ตามค่าของเซลล์ คุณลักษณะนี้คุณสามารถแก้ปัญหานี้ได้อย่างง่ายดาย คลิกเพื่อดาวน์โหลด Kutools for Excel!

Kutools สำหรับ Excel: ด้วย Add-in ของ Excel ที่มีประโยชน์มากกว่า 300 รายการให้ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 60 วัน ดาวน์โหลดและทดลองใช้ฟรีทันที!


คัดลอกและแทรกแต่ละแถวหลาย ๆ ครั้งด้วยรหัส VBA

หากต้องการทำซ้ำแต่ละแถวหลาย ๆ ครั้งในช่วงคุณสามารถใช้รหัส VBA ต่อไปนี้ได้โปรดทำตามด้านล่าง:

1. กด ALT + F11 จากนั้นจะเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ในไฟล์ โมดูล หน้าต่าง.

รหัส VBA: ทำซ้ำแต่ละแถวหลายครั้ง:

Sub insertrows()
'Updateby Extendoffice
Dim I As Long
Dim xCount As Integer
LableNumber:
xCount = Application.InputBox("Number of Rows", "Kutools for Excel", , , , , , 1)
If xCount < 1 Then
MsgBox "the entered number of rows is error ,please enter again", vbInformation, "Kutools for Excel"
GoTo LableNumber
End If
For I = Range("A" & Rows.CountLarge).End(xlUp).Row To 2 Step -1
Rows(I).Copy
Rows(I).Resize(xCount).Insert
Next
Application.CutCopyMode = False
End Sub

3. จากนั้นกด F5 คีย์เพื่อเรียกใช้รหัสนี้และกล่องพร้อมต์จะปรากฏขึ้นเพื่อเตือนให้คุณป้อนจำนวนครั้งที่คุณต้องการทำซ้ำสำหรับแต่ละระเบียนดูภาพหน้าจอ:

4. จากนั้นคลิก OKและแต่ละแถวถูกคัดลอกและแทรก 3 ครั้งด้านล่างแถวที่ใช้งานดูภาพหน้าจอ:

หมายเหตุ: ในโค้ดด้านบนไฟล์ A ระบุว่าช่วงข้อมูลเริ่มต้นที่คอลัมน์ A หากข้อมูลของคุณเริ่มต้นที่คอลัมน์ Kโปรดเปลี่ยน A ไปยัง K ตามความต้องการของคุณ


คัดลอกและแทรกแต่ละแถวหลาย ๆ ครั้งตามจำนวนเฉพาะพร้อมคุณสมบัติที่ยอดเยี่ยม

บางทีคุณอาจไม่คุ้นเคยกับรหัส VBA หรือกังวลว่าโค้ดจะทำให้ข้อมูลของคุณผิดพลาด ที่นี่ฉันจะแนะนำคุณสมบัติที่มีประโยชน์ Kutools สำหรับ Excel's แถว / คอลัมน์ซ้ำกันตามค่าของเซลล์ด้วยยูทิลิตี้นี้คุณสามารถคัดลอกและแทรกแถวตามจำนวนที่คุณระบุได้อย่างรวดเร็ว

ทิปส์:ที่จะใช้สิ่งนี้ แถว / คอลัมน์ซ้ำกันตามค่าของเซลล์ ประการแรกคุณควรดาวน์โหลดไฟล์ Kutools สำหรับ Excelแล้วใช้คุณสมบัตินี้อย่างรวดเร็วและง่ายดาย

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามนี้:

1. ป้อนตัวเลขซ้ำที่คุณต้องการทำซ้ำแถวในรายการเซลล์ข้างข้อมูลของคุณดูภาพหน้าจอ:

2. คลิก Kutools > สิ่งที่ใส่เข้าไป > แถว / คอลัมน์ซ้ำกันตามค่าของเซลล์ดูภาพหน้าจอ:

3. ใน คัดลอกและแทรกแถวและคอลัมน์ ใหเลือก คัดลอกและแทรกแถว ตัวเลือกใน ชนิดภาพเขียน จากนั้นเลือกช่วงข้อมูลที่คุณต้องการทำซ้ำจากนั้นระบุเวลาทำซ้ำเพื่อทำซ้ำแถวดูภาพหน้าจอ:

4. จากนั้นคลิก Ok or ใช้ คุณจะได้รับผลลัพธ์ต่อไปนี้ตามที่คุณต้องการ:

คลิกเพื่อดาวน์โหลด Kutools สำหรับ Excel และทดลองใช้ฟรีทันที!


เครื่องมือเพิ่มประสิทธิภาพการทำงานในสำนักงานที่ดีที่สุด

Kutools สำหรับ Excel ช่วยแก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%

  • นำมาใช้ใหม่: ใส่อย่างรวดเร็ว สูตรที่ซับซ้อนแผนภูมิ และสิ่งที่คุณเคยใช้มาก่อน เข้ารหัสเซลล์ ด้วยรหัสผ่าน; สร้างรายชื่อผู้รับจดหมาย และส่งอีเมล ...
  • ซุปเปอร์ฟอร์มูล่าบาร์ (แก้ไขข้อความและสูตรหลายบรรทัดได้อย่างง่ายดาย); การอ่านเค้าโครง (อ่านและแก้ไขเซลล์จำนวนมากได้อย่างง่ายดาย); วางลงในช่วงที่กรองแล้ว...
  • ผสานเซลล์ / แถว / คอลัมน์ โดยไม่สูญเสียข้อมูล แยกเนื้อหาของเซลล์ รวมแถว / คอลัมน์ที่ซ้ำกัน... ป้องกันเซลล์ซ้ำ; เปรียบเทียบช่วง...
  • เลือกซ้ำหรือไม่ซ้ำ แถว; เลือกแถวว่าง (เซลล์ทั้งหมดว่างเปล่า); Super Find และ Fuzzy Find ในสมุดงานจำนวนมาก สุ่มเลือก ...
  • สำเนาถูกต้อง หลายเซลล์โดยไม่เปลี่ยนการอ้างอิงสูตร สร้างการอ้างอิงอัตโนมัติ ถึงหลายแผ่น ใส่สัญลักษณ์แสดงหัวข้อย่อย, กล่องกาเครื่องหมายและอื่น ๆ ...
  • แยกข้อความ, เพิ่มข้อความ, ลบตามตำแหน่ง, ลบ Space; สร้างและพิมพ์ผลรวมย่อยของเพจ แปลงระหว่างเนื้อหาของเซลล์และความคิดเห็น...
  • ซุปเปอร์ฟิลเตอร์ (บันทึกและใช้โครงร่างตัวกรองกับแผ่นงานอื่น ๆ ); การเรียงลำดับขั้นสูง ตามเดือน / สัปดาห์ / วันความถี่และอื่น ๆ ตัวกรองพิเศษ โดยตัวหนาตัวเอียง ...
  • รวมสมุดงานและแผ่นงาน; ผสานตารางตามคอลัมน์สำคัญ แยกข้อมูลออกเป็นหลายแผ่น; Batch แปลง xls, xlsx และ PDF...
  • คุณสมบัติที่ทรงพลังมากกว่า 300 รายการ. รองรับ Office / Excel 2007-2019 และ 365 รองรับทุกภาษา ใช้งานง่ายในองค์กรหรือองค์กรของคุณ ทดลองใช้ฟรี 30 วันเต็ม รับประกันคืนเงิน 60 วัน
kte แท็บ 201905

แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มผลผลิตของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
ด้านล่าง officetab
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (31)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอขอบคุณ!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
Awesome Macro - ช่วยฉันประหยัดเวลาได้มาก!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
เพื่อนมาโครที่ดีจริง ๆ!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันต้องการสร้างแถวที่ซ้ำกันแบบสุ่ม

สำหรับเช่น สร้างแถวที่ซ้ำกันแบบสุ่มระหว่าง 20 ถึง 80


สิ่งที่จะได้รับการอัปเดตรหัสต่อไปนี้


แทรกย่อย ()
'Updateby Extendoffice 2016616
หรี่ฉันนาน
Dim xCount เป็นจำนวนเต็ม
หมายเลขฉลาก:
xCount = Application.InputBox("จำนวนแถว", "Kutools สำหรับ Excel", , , , , , , 1)
ถ้า xCount < 1 แล้ว
MsgBox "จำนวนแถวที่ป้อนมีข้อผิดพลาด โปรดป้อนอีกครั้ง", vbInformation, "Kutools for Excel"
GoTo LableNumber
End If
สำหรับผม = Range("A" & Rows.CountLarge).End(xlUp).Row To 1 Step -1
แถว(I).คัดลอก
แถว(I).Resize(xCount).Insert
ต่อไป
Application.CutCopyMode = เท็จ
ย่อยสิ้นสุด
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันต้องการทำซ้ำแถวตามพารามิเตอร์ ตัวอย่างเช่น ฉันมีคอลัมน์ชื่อ ระยะเวลาการประชุม ถ้าคอลัมน์นั้นมากกว่า 1 ฉันต้องการทำซ้ำแถว ID การประชุมตามหมายเลขนั้น หากระยะเวลาการประชุมคือ 2 ชั่วโมง ให้ทำซ้ำ ID การประชุมสองครั้ง หากการประชุมเป็นเวลา 3 ชั่วโมง ให้ทำซ้ำสามครั้ง
การเพิ่มทีละครึ่งชั่วโมงสามารถปัดเศษขึ้นเป็นชั่วโมงได้

MeetingID เวลาเริ่มต้น เวลาสิ้นสุด ระยะเวลาการประชุม
43117 9:00 น. 11:00 น. 02:00 น.
43580 9:30 น. 11:00 น. 01:30 น.
42699 10:00 น. 11:30 น. 01:30 น.
12345 01:00 น. 2:00 น. 01:00 น.
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ผมมีปัญหาเดียวกัน. คุณพบวิธีแก้ปัญหาหรือไม่?
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีพวก
อาจเป็นรหัส VBA ต่อไปนี้สามารถช่วยคุณได้ โปรดใช้:
แทรกย่อย ()
หรี่ฉันนาน
Dim xRg เป็นช่วง
Dim xHour, xMin As Long
เกี่ยวกับข้อผิดพลาดต่อไป
Application.ScreenUpdating = เท็จ
สำหรับผม = Range("D" & Rows.CountLarge).End(xlUp).Row To 1 Step -1
xชั่วโมง = 0
ตั้งค่า xRg = ช่วง ("D" & I)
xHour = ชั่วโมง (xRg.Value) + 1
xMin = นาที (xRg.Value)
ถ้า xMin < 30 แล้ว xHour = xHour - 1
แถว(I).คัดลอก
แถว(I).Resize(xHour).Insert
ต่อไป
Application.ScreenUpdating = จริง
Application.CutCopyMode = เท็จ
ย่อยสิ้นสุด

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

1. ทำซ้ำตามจำนวนวัน
2. เปลี่ยนคอลัมน์ EOM จากสิ้นเดือนเป็นรายวัน
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณมากสำหรับการสนับสนุนของคุณ !!!!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
รักรหัส! ฉันจะตั้งค่าช่วงเริ่มต้นให้ข้ามแถวแรก (ส่วนหัวของคอลัมน์) และเริ่มในแถวที่ 2 ได้อย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี Devin
หากต้องการข้ามแถวส่วนหัวแรก โปรดใช้รหัส VBA ต่อไปนี้:

แทรกย่อย ()
หรี่ฉันนาน
Dim xCount เป็นจำนวนเต็ม
หมายเลขฉลาก:
xCount = Application.InputBox("จำนวนแถว", "Kutools สำหรับ Excel", , , , , , , 1)
ถ้า xCount < 1 แล้ว
MsgBox "จำนวนแถวที่ป้อนมีข้อผิดพลาด โปรดป้อนอีกครั้ง", vbInformation, "Kutools for Excel"
GoTo LableNumber
End If
สำหรับผม = Range("A" & Rows.CountLarge).End(xlUp).Row To 2 Step -1
แถว(I).คัดลอก
แถว(I).Resize(xCount).Insert
ต่อไป
Application.CutCopyMode = เท็จ
ย่อยสิ้นสุด

โปรดลอง หวังว่าจะช่วยคุณได้!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ฉันต้องการความช่วยเหลือ นี่คือลักษณะที่ตารางของฉัน ตัวอย่างเช่น เมื่อฉันเพิ่ม 2 แถวที่ท้ายตารางที่ 1 ของฉัน ฉันต้องการให้ vba ช่วยฉันทำสิ่งเดียวกันกับตารางด้านล่าง (เพิ่ม 2 แถวที่ ท้ายตาราง) ดังนั้นงานของฉันคือ เพียงแค่เพิ่มแถวที่ตารางที่ 1 ตารางที่ร้องทั้งหมดจะสร้างแถวโดยอัตโนมัติตามจำนวนแถวในตารางที่ 1 คือรหัสที่ฉันใช้ตอนนี้เพื่อเพิ่มแถวสำหรับตารางที่ 1 ฉันหวังว่าบางคนสามารถแก้ปัญหานี้ให้ฉันได้ thx.Sub InsertNumRows()

ActiveCell.EntireRow.Copy

หรี่ Rng ตราบ

Application.DisplayAlerts = เท็จ
เกี่ยวกับข้อผิดพลาดต่อไป
Rng = InputBox("ป้อนจำนวนแถวที่ต้องการ")
เมื่อเกิดข้อผิดพลาด GoTo 0
Application.DisplayAlerts = จริง

ถ้า Rng = 0 แล้ว
MsgBox "คุณไม่ได้ระบุช่วง!"
ออกจาก Sub

อื่น
ช่วง(ActiveCell.Offset(1, 0), ActiveCell.Offset(Rng, 0)).เลือก
Selection.EntireRow.Insert Shift:=xlDown
End If

ย่อยสิ้นสุด
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
รักมัน! มันได้ผลทุกครั้ง! ขอบคุณมากสำหรับเรื่องนี้ :)
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันจะทำสิ่งนี้สำหรับคอลัมน์ได้อย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันจะทำสิ่งนี้สำหรับคอลัมน์ได้อย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
วิธีดำเนินการเดียวกันกับเซลล์ที่เลือกโดยใช้ VB


ฉันต้องการทำซ้ำบางเซลล์ที่เลือก (แถวและคอลัมน์) x ไม่กี่ครั้งในแผ่นงานเดียวกันและในลำดับเดียวกันกับ:

บรรทัดที่ 1
บรรทัดที่ 2
บรรทัดที่ 3

บรรทัดที่ 1
บรรทัดที่ 2
บรรทัดที่ 3
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีมันใช้งานได้ดีฉันต้องการเพียงสองแถวที่คัดลอก N จำนวนครั้ง คุณช่วยปรับโค้ดให้หน่อยได้ไหม ดังนั้นเมื่อฉันเลือกสองแถว มันจะคัดลอกสองแถวนั้นลง N ครั้ง ? ขอบคุณสำหรับความช่วยเหลือของคุณ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีค่ะ คุณซอล
หากคุณต้องการคัดลอกเพียงสองแถวหลาย ๆ ครั้ง คุณเพียงแค่ต้องใช้รหัส VBA 1 ในบทความนี้ ใช้รหัสสองครั้งเพื่อแก้ปัญหาของคุณ โปรดลอง หวังว่าจะช่วยคุณได้!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
คัดลอกและแทรกแต่ละแถวหลายครั้งด้วยรหัส VBA

ในโค้ด VBA ฉันจะเลือกแถวเริ่มต้นได้อย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ไม่มี funciona สำหรับ Windows 2019, deseo usar la función en mención pero simplemente no hace absolutamente nada
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีทุกคน .. ขอบคุณล่วงหน้าสำหรับความช่วยเหลือของคุณ !!

โค้ด VBA เพื่อทำซ้ำแถวหนึ่งๆ หลายๆ แถวทำงานได้อย่างสมบูรณ์จนกว่าคุณจะใช้ตัวกรอง ฉันสงสัยว่าใครสามารถช่วยฉันแก้ปัญหานี้ได้ ฉันต้องการรหัสที่ใช้งานได้แม้ว่าคุณจะกรองค่าบางค่าไปแล้วก็ตาม ฉันใช้ข้อมูลจำนวนมากที่จัดเรียงตามสถานที่ โค้ดใช้งานได้บางส่วน โดยจะวางจำนวนแถวที่ต้องการ แต่ไม่มีข้อมูลหรือรูปแบบเมื่อฉันใช้ตัวกรอง
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี เป็นไปได้ไหมที่จะใช้ขนาด (ค่า) ต่างกันสำหรับแต่ละแถว? ฉันกำลังลองใช้เวกเตอร์ แต่มันไม่ทำงาน
ตัวอย่างเช่น:
แถว(I).Resize(xCount(y) ).Insert

โดยที่ค่าที่บันทึกไว้ใน xCount(y) จะถูกอ่านจากตาราง
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีกัซ
อาจเป็นบทความด้านล่างสามารถช่วยคุณได้ โปรดตรวจสอบ:
https://www.extendoffice.com/documents/excel/4054-excel-duplicate-rows-based-on-cell-value.html
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สำหรับรหัส VBA ที่สอง (รหัส VBA: ทำซ้ำแต่ละแถวหลาย ๆ ครั้ง) ฉันได้รับข้อผิดพลาดขณะทำงาน: 1004
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
โหลดเพิ่มเติม
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ