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

วิธีรวม / นำเข้าไฟล์ csv หลายไฟล์ลงในแผ่นงานหลายแผ่น

ถ้าคุณต้องการนำเข้าไฟล์ csv หลายไฟล์จากโฟลเดอร์เป็นแผ่นงานแยกกันภายในสมุดงานคุณจะจัดการกับงานนี้ใน Excel ได้อย่างไร?

นำเข้าไฟล์ csv หลายไฟล์ลงในแผ่นงานแยกกันด้วยรหัส VBA

นำเข้าไฟล์ csv หลายไฟล์ลงในแผ่นงานแยกกันด้วย Kutools for Excel

แยกสมุดงานออกเป็นไฟล์ csv / pdf / txt / excel แยกกัน


หากต้องการนำเข้าไฟล์ csv หลายไฟล์ไปยังสมุดงานอย่างรวดเร็วรหัส VBA ต่อไปนี้อาจช่วยคุณได้โปรดทำดังนี้:

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

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

รหัส VBA: นำเข้าไฟล์ข้อความหลายไฟล์ไปยังแผ่นงานแยกกัน:

Sub CombineCsvFiles()
'updateby Extendoffice
    Dim xFilesToOpen As Variant
    Dim I As Integer
    Dim xWb As Workbook
    Dim xTempWb As Workbook
    Dim xDelimiter As String
    Dim xScreen As Boolean
    On Error GoTo ErrHandler
    xScreen = Application.ScreenUpdating
    Application.ScreenUpdating = False
    xDelimiter = "|"
    xFilesToOpen = Application.GetOpenFilename("Text Files (*.csv), *.csv", , "Kutools for Excel", , True)
    If TypeName(xFilesToOpen) = "Boolean" Then
        MsgBox "No files were selected", , "Kutools for Excel"
        GoTo ExitHandler
    End If
    I = 1
    Set xTempWb = Workbooks.Open(xFilesToOpen(I))
    xTempWb.Sheets(1).Copy
    Set xWb = Application.ActiveWorkbook
    xTempWb.Close False
    Do While I < UBound(xFilesToOpen)
        I = I + 1
        Set xTempWb = Workbooks.Open(xFilesToOpen(I))
        xTempWb.Sheets(1).Move , xWb.Sheets(xWb.Sheets.Count)
    Loop
ExitHandler:
    Application.ScreenUpdating = xScreen
    Set xWb = Nothing
    Set xTempWb = Nothing
    Exit Sub
ErrHandler:
    MsgBox Err.Description, , "Kutools for Excel"
    Resume ExitHandler
End Sub

3. จากนั้นกด F5 คีย์เพื่อรันโค้ดนี้และหน้าต่างจะโผล่ออกมาให้ไปที่โฟลเดอร์เฉพาะและเลือกไฟล์ csv ที่คุณต้องการนำเข้าสู่ Excel ดูภาพหน้าจอ:

doc นำเข้า csv ไปยังแผ่นงาน 1

4. จากนั้นคลิก จุดเปิด ไฟล์ csv ที่เลือกถูกนำเข้าเป็นแผ่นงานแยกต่างหากภายในสมุดงานใหม่

5. สุดท้ายคุณสามารถบันทึกสมุดงานใหม่ได้ตามที่คุณต้องการ


ถ้าคุณมี Kutools สำหรับ Excelด้วยเครื่องมืออันทรงพลัง -รวมกันคุณสามารถรวมหรือนำเข้าไฟล์ csv หลายไฟล์ลงในแผ่นงานเดียวหรือหลายแผ่นงานแยกกันได้ตามที่คุณต้องการ

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

1. กรุณาคลิก Kutools พลัส > รวมกันดูภาพหน้าจอ:

2. ตัว Vortex Indicator ได้ถูกนำเสนอลงในนิตยสาร รวมแผ่นงาน โปรดเลือก รวมแผ่นงานหลายแผ่นจากสมุดงานไว้ในสมุดงานเดียวดูภาพหน้าจอ:

doc นำเข้า csv ไปยังแผ่นงาน 6

3. ใน ขั้นตอนที่ 2 ของตัวช่วยสร้างคลิก เพิ่ม > เนื้อไม่มีมัน เพื่อเลือกไฟล์ csv ที่คุณต้องการรวมดูภาพหน้าจอ:

doc นำเข้า csv ไปยังแผ่นงาน 7

4. ในการโผล่ออกมา จุดเปิด ใหเลือก (* .csv) จากรายการดรอปดาวน์จากนั้นระบุไฟล์ csv ที่คุณต้องการผสาน

doc นำเข้า csv ไปยังแผ่นงาน 8

5. จากนั้นคลิก จุดเปิด และไฟล์ csv ที่คุณเลือกได้ถูกนำเข้าในกล่องโต้ตอบดูภาพหน้าจอ:

doc นำเข้า csv ไปยังแผ่นงาน 9

6. ใน ขั้นตอนที่ 3โปรดดำเนินการดังต่อไปนี้:

(1. ) การตรวจสอบ แถวแรกของแต่ละแผ่นงาน (ความคิดเห็น) จาก แทรกข้อมูลแผ่นงาน ส่วนข้อมูลไฟล์ csv ทั้งหมดจะถูกแทรกลงในแผ่นงานรวมตามความคิดเห็น

(2. ) คุณสามารถเปลี่ยนชื่อไฟล์ csv ได้ตามต้องการ

(3. ) คุณสามารถข้ามไฟล์ csv เปล่าเมื่อคุณพบไฟล์ csv ว่าง

doc นำเข้า csv ไปยังแผ่นงาน 10

7. จากนั้นคลิก เสร็จสิ้น และหลังจากเสร็จสิ้นการรวมคุณสามารถระบุชื่อ filw และตำแหน่งสำหรับสมุดงานรวมใหม่ของคุณ ดูภาพหน้าจอ:

doc นำเข้า csv ไปยังแผ่นงาน 11

8. จากนั้นคลิก ลด ในช่อง Promt ที่โผล่ออกมาคุณสามารถเปิดไฟล์ใหม่ได้โดยคลิก ใช่และปิดโดยคลิก ไม่ดูภาพหน้าจอ:

doc นำเข้า csv ไปยังแผ่นงาน 12

9. จากนั้นคุณสามารถบันทึกสถานการณ์นี้หรือไม่ก็ได้ตามที่คุณต้องการ ดูภาพหน้าจอ:

doc นำเข้า csv ไปยังแผ่นงาน 13

10. ในที่สุดไฟล์ csv ที่คุณเลือกได้ถูกนำเข้าสู่สมุดงานใหม่พร้อมแผ่นงานแยกดูภาพหน้าจอ:

doc นำเข้า csv ไปยังแผ่นงาน 14

ดาวน์โหลดและทดลองใช้ Kutools for Excel ฟรีทันที!


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

ในบางกรณีคุณอาจต้องการแยกสมุดงานออกเป็นไฟล์ csv แยกต่างหาก Kutools สำหรับ Excel's Split Workbook ยูทิลิตี้สามารถทำงานนี้ให้เสร็จได้อย่างรวดเร็วและง่ายดาย

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

1. คลิก Kutools พลัส > สมุดงาน > แยกสมุดงานดูภาพหน้าจอ:

2. ตัว Vortex Indicator ได้ถูกนำเสนอลงในนิตยสาร แยกสมุดงาน กล่องโต้ตอบ:

(1. ) ตรวจสอบแผ่นงานที่คุณต้องการแยก

(2. ) และตรวจสอบ ระบุบันทึกรูปจากนั้นเลือกรูปแบบไฟล์ที่คุณต้องการบันทึก

(3. ) จากนั้นคลิก แยก และระบุโฟลเดอร์ที่จะใส่ไฟล์ที่แยกออกมา

doc นำเข้า csv ไปยังแผ่นงาน 3

3. จากนั้นคลิก OK เพื่อเริ่มการแยกสมุดงานจะถูกแบ่งออกเป็นไฟล์ csv แยกกันที่คุณต้องการ

doc นำเข้า csv ไปยังแผ่นงาน 4

ดาวน์โหลดและทดลองใช้ Kutools for Excel ฟรีทันที!


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

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

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
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (7)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณสำหรับรหัสในการรวมไฟล์ อย่างไรก็ตาม ฉันต้องการมีหลายไฟล์ในสมุดงานที่ฉันใช้งานอยู่ ไม่ใช่สำหรับรหัสเพื่อสร้างสมุดงานใหม่ ฉันจะบรรลุเป้าหมายนั้นได้อย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณสำหรับการแบ่งปันรหัสนี้ มันเป็นสิ่งที่ฉันกำลังมองหา น่าเศร้าที่มันไม่ได้ผลอย่างที่ฉันหวังไว้ ฉันได้รับข้อความแสดงข้อผิดพลาดทุกครั้งที่มีการเรียกใช้รหัส ข้อผิดพลาด: "ชื่อนี้ถูกใช้ไปแล้ว ลองใช้ชื่ออื่น" หมายเหตุ: - ฉันกำลังพยายามรวมไฟล์ csv สี่ไฟล์ - ไฟล์ csv ทั้งหมดมีชื่อเหมือนกัน "file_name.csv, file_name(1).csv ฯลฯ..." รหัสจะรวมไฟล์ csv สองไฟล์แรกเป็นสมุดงานเดียวและ ไฟล์ที่สามลงในสมุดงานของตัวเอง ไฟล์ที่สี่ไม่เคยมีโอกาสเนื่องจากข้อผิดพลาด หากใครมีความคิดเกี่ยวกับวิธีการแก้ไขปัญหานี้ฉันจะขอบคุณมากสำหรับความคิดเห็นของคุณ ขอขอบคุณทุกท่านล่วงหน้าสำหรับเวลาของคุณ ขอแสดงความนับถือ Andrew
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอขอบคุณ! รหัสมีประโยชน์มาก
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอขอบคุณ . มีประโยชน์มาก
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอขอบคุณ. รหัสทำงานได้ดี
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีมาโคร vba นี้ดีมาก แต่ฉันต้องการให้เปิดใช้งานโดยคลิกปุ่มบนเวิร์กบุ๊กอื่น ฉันจะทำอย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
Hi!
ฉันใช้รหัสนี้เพื่อรวมแบบฟอร์มการประเมินเป็นแผ่นงาน Excel แผ่นเดียว อย่างไรก็ตาม มันอ่านวันที่ในรูปแบบสหรัฐอเมริกาเป็น MM/DD/YYYY แทนรูปแบบยุโรปที่ฉันใช้ ซึ่งก็คือ DD/MM/YYYY ผลลัพธ์เป็นคอลัมน์ที่มีลักษณะดังนี้:

11-4-2021 17:13
22/10/2021 09:41:32 (นี่คือวันที่ 22 ตุลาคม แต่ไม่รู้จัก)
7-12-2022 14:55 (เข้าใจผิดว่าวันที่ 7 ธันวาคม น่าจะเป็นวันที่ 12 กรกฎาคม)
27/10/2021 16:53:19
29/10/2021 09:44:26
11-1-2021 11:36
11-2-2021 14:11
17/08/2022 16:46:06
11-1-2021 10:49
8-10-2022 12:19
22/10/2021 14:54:58
17/11/2021 13:48:54
26/10/2021 20:13:37
22/10/2021 16:26:13

ฉันจะป้องกันไม่ให้สิ่งนี้เกิดขึ้นได้อย่างไร ฉันเห็นความคิดเห็นเกี่ยวกับ โพสต์อื่น ที่แนะนำให้วาง 'Local=True' ไว้ที่ใดที่หนึ่ง แต่ฉันไม่สามารถทราบได้ว่าจะวางไว้ที่ไหนเพื่อให้ไฟล์ CSV โหลดได้อย่างถูกต้อง ความช่วยเหลือใด ๆ ที่ชื่นชม!
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ

ช่องทางอื่นๆ

ลิขสิทธิ์© 2009 - wwwextendoffice.com | สงวนลิขสิทธิ์. ขับเคลื่อนโดย ExtendOffice. | แผนผังเว็บไซต์
Microsoft และโลโก้ Office เป็นเครื่องหมายการค้าหรือเครื่องหมายการค้าจดทะเบียนของ Microsoft Corporation ในสหรัฐอเมริกาและ / หรือประเทศอื่น ๆ
ได้รับการปกป้องโดย Sectigo SSL