จะบันทึกแต่ละแผ่นเป็นไฟล์ข้อความแยกจากสมุดงานได้อย่างไร?

หากคุณต้องการบันทึกเวิร์กชีตเป็นไฟล์ข้อความ คุณสามารถใช้ฟังก์ชัน Save As ของ Excel เพื่อบันทึกเวิร์กชีตเป็นไฟล์ข้อความได้ แต่หากคุณต้องการบันทึกทุกชีตของเวิร์กบุ๊กเป็นไฟล์ข้อความแยกกัน ขั้นตอนการบันทึกเป็นอาจทำให้คุณหงุดหงิดได้ ที่นี่ ฉันจะแนะนำเคล็ดลับที่น่าสนใจบางอย่างเพื่อให้คุณแก้ปัญหาที่น่าเบื่อนี้ใน Excel ได้อย่างรวดเร็ว

บันทึกแผ่นงานปัจจุบันเป็นไฟล์ข้อความด้วย VBA

บันทึกแต่ละแผ่นงานเป็นไฟล์ข้อความแยกกันด้วย Kutools for Excel

ส่งออกแผ่นงานที่เลือกเป็นไฟล์ข้อความด้วย Kutools for Excel

บันทึกแผ่นงานปัจจุบันเป็นไฟล์ข้อความด้วย VBA

หากคุณไม่ต้องการใช้ฟังก์ชัน Save As เพื่อบันทึกแผ่นงานเป็นไฟล์ข้อความคุณสามารถใช้รหัส VBA

1. เปิดใช้งานแผ่นงานที่คุณต้องการบันทึกเป็นไฟล์ข้อความ

2 กด Alt + F11 ปุ่มเพื่อแสดง Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

3 คลิก สิ่งที่ใส่เข้าไป > โมดูล จากหน้าต่างจากนั้นวางโค้ด VBA ด้านล่างลงในโมดูล

Sub SaveSheetToTxt()
'Updateby20150910
    Dim xRet As Long
    Dim xFileName As Variant
    On Error GoTo ErrHandler:
    xFileName = Application.GetSaveAsFilename(ActiveSheet.Name, "TXT File (*.txt), *.txt", , "Kutools for Excel")
    If xFileName = False Then Exit Sub
    If Dir(xFileName) <> "" Then
        xRet = MsgBox("File '" & xFileName & "' exists.  Overwrite?", vbYesNo + vbExclamation, "Kutools for Excel")
        If xRet <> vbYes Then
            Exit Sub
        Else
            Kill xFileName
        End If
    End If
    ActiveSheet.Copy
    ActiveWorkbook.SaveAs xFileName, xlUnicodeText
    If ActiveWorkbook.Name <> ThisWorkbook.Name Then
        ActiveWorkbook.Close False
    End If
My_Exit:
    Exit Sub
ErrHandler:
    MsgBox Err.Description, , "Kutools for Excel"
End Sub

4 คลิก วิ่ง เพื่อรันโค้ดจากนั้นในไฟล์ Kutools สำหรับ Excel ไดอะล็อกเลือกโฟลเดอร์ที่จะใส่ไฟล์ข้อความและระบุชื่อสำหรับไฟล์ข้อความ ดูภาพหน้าจอ:

5 คลิก ลด. ตอนนี้แผ่นงานที่ใช้งานอยู่ถูกบันทึกเป็นไฟล์ข้อความ

เคล็ดลับ: ด้วย VBA คุณสามารถบันทึกแผ่นงานเป็นไฟล์ข้อความได้เพียงครั้งละหนึ่งแผ่นเท่านั้น

บันทึกแต่ละแผ่นงานเป็นไฟล์ข้อความแยกกันด้วย Kutools for Excel

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

1. เปิดใช้งานสมุดงานที่คุณต้องการบันทึกแผ่นงานเป็นไฟล์ข้อความอิสระจากนั้นคลิก Kutools พลัส > สมุดงาน > แยกสมุดงาน. ดูภาพหน้าจอ:

2 ใน แยกสมุดงาน กล่องโต้ตอบเลือกแผ่นงานที่คุณต้องการแยกและบันทึกเป็นไฟล์ข้อความโดยค่าเริ่มต้นแผ่นงานทั้งหมดจะถูกเลือกจากนั้นตรวจสอบ ระบุรูปแบบการบันทึกและเลือก ข้อความ Unicode (*. txt) จากรายการแบบเลื่อนลงด้านล่าง ดูภาพหน้าจอ:

3 คลิก แยกแล้วเลือกโฟลเดอร์ที่จะใส่ไฟล์ข้อความ เรียกดูโฟลเดอร์ ไดอะล็อก ดูภาพหน้าจอ:

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

ด้วยระบบเส้นทาง แยกสมุดงาน of Kutools สำหรับ Excelคุณสามารถแยกสมุดงานและบันทึกเป็นไฟล์ xls แยกต่างหากไฟล์ xlsx ไฟล์ PDF หรือไฟล์ CSV คลิกที่นี่เพื่อทราบข้อมูลเพิ่มเติมเกี่ยวกับยูทิลิตี้นี้

ส่งออกแผ่นงานที่เลือกเป็นไฟล์ข้อความด้วย Kutools for Excel

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

1. เลือกช่วงหรือช่วงที่คุณต้องการบันทึกเป็นไฟล์ข้อความแล้วคลิก Kutools พลัส > นำเข้า / ส่งออก > ส่งออกช่วงไปยังไฟล์. ดูภาพหน้าจอ:

2. จากนั้นในกล่องโต้ตอบ popping ให้เลือก ข้อความ Unicode ภายใต้ รูปแบบไฟล์ จากนั้นไปที่ ตัวเลือกข้อความ เพื่อตรวจสอบตัวเลือกตามที่คุณต้องการจากนั้นเลือกตำแหน่งที่บันทึก

3 คลิก Ok. ตอนนี้ตั้งชื่อไฟล์ข้อความที่ส่งออกใน popping ส่งออกช่วงไปยังไฟล์ กล่องโต้ตอบแล้วคลิกไฟล์ OK ปุ่ม

จนถึงขณะนี้การเลือกถูกส่งออกเป็นไฟล์ข้อความแยกต่างหาก