วิธีการส่งออกและบันทึกแต่ละแผ่นงานเป็นสมุดงานใหม่แยกต่างหากใน Excel
สมมติว่าคุณต้องการส่งออกและบันทึกแผ่นงานหนึ่งหรือหลายแผ่นเป็นสมุดงานใหม่คุณจะจัดการกับมันอย่างไร? โดยปกติคุณสามารถคัดลอกแผ่นงานแต่ละแผ่นและวางลงในสมุดงานใหม่ได้ แต่ที่นี่เรานำเสนอเคล็ดลับที่มีประโยชน์เพื่อจัดการกับมัน:
ส่งออกและบันทึกแผ่นงานเป็นสมุดงานใหม่ด้วยคำสั่ง Move หรือ Copy
ส่งออกและบันทึกแผ่นงานเป็นสมุดงานใหม่ด้วยรหัส VBA
ส่งออกและบันทึกแผ่นงานเป็นสมุดงานใหม่ด้วย Kutools for Excel 
ส่งออกและบันทึกแผ่นงานเป็นสมุดงานใหม่ด้วยคำสั่ง Move หรือ Copy
การใช้ ย้ายหรือคัดลอก คำสั่งจะช่วยให้คุณส่งออกหรือคัดลอกแผ่นงานหนึ่งหรือหลายแผ่นไปยังสมุดงานใหม่ได้อย่างรวดเร็ว
ขั้นตอนที่ 1: เลือกชื่อแผ่นงานในแถบแท็บ คุณสามารถเลือกหลายรายการโดยกดค้างไว้ Ctrl คีย์หรือ เปลี่ยน กุญแจ
ขั้นตอนที่ 2: คลิกขวาที่ชื่อแผ่นงานแล้วคลิกไฟล์ ย้ายหรือคัดลอก จากเมนูบริบท
ขั้นตอนที่ 3: ใน ย้ายหรือคัดลอก กล่องโต้ตอบเลือกไฟล์ (หนังสือเล่มใหม่) รายการจากรายการแบบเลื่อนลงของ ย้ายแผ่นงานที่เลือกไปที่หนังสือ.
ขั้นตอนที่ 4: จากนั้นคลิก OKตอนนี้คุณได้เปลี่ยนไปใช้ไฟล์ สมุดงานใหม่ ด้วยแผ่นงานที่ส่งออกหรือคัดลอกให้คลิก เนื้อไม่มีมัน > ลด เพื่อบันทึกสมุดงานใหม่
หมายเหตุ ตัว Vortex Indicator ได้ถูกนำเสนอลงในนิตยสาร ย้ายหรือคัดลอก กล่องโต้ตอบมีไฟล์ สร้างสำเนา ตัวเลือก หากคุณไม่ตรวจสอบมันจะย้ายเวิร์กชีตที่เลือกออกจากสมุดงานต้นฉบับ หากตรวจสอบมันจะคัดลอกแผ่นงานที่เลือก
แยกแผ่นงานหลายแผ่นออกเป็นสมุดงานแยกกันใน Excel ได้อย่างรวดเร็ว
|
| ใน Microsoft Excel คุณสามารถบันทึกหรือแยกแผ่นงานจากสมุดงานหนึ่งเป็นไฟล์ Excel ใหม่ได้โดยการคัดลอกและวางแผ่นงานนี้ลงในสมุดงานใหม่ ดูเหมือนจะยุ่งยากหากคุณต้องการแยกแต่ละแผ่น / แผ่นงานของสมุดงานขนาดใหญ่เป็นไฟล์ Excel, txt, csv, pdf แยกกัน แต่ด้วย Kutools สำหรับ Excel's แยกสมุดงาน ยูทิลิตี้คุณสามารถจัดการกับมันได้อย่างรวดเร็ว คลิกเพื่อทดลองใช้ฟรี 30 วันพร้อมคุณสมบัติเต็มรูปแบบ! |
 |
| Kutools for Excel: มีโปรแกรมเสริม Excel ที่มีประโยชน์มากกว่า 300 รายการให้ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 30 วัน |
ส่งออกและบันทึกแผ่นงานเป็นสมุดงานใหม่ด้วยรหัส VBA
รหัสต่อไปนี้จะส่งออกทุกแผ่นงานที่มองเห็นได้ในสมุดงานใหม่และบันทึกสมุดงานด้วยชื่อของแผ่นงานต้นฉบับในโฟลเดอร์ที่สร้างขึ้นใหม่ในเส้นทางเดียวกับสมุดงานที่ใช้งานอยู่ กรุณาทำตามขั้นตอนต่อไปนี้:
ขั้นตอนที่ 1: กดปุ่มค้างไว้ ALT + F11 และจะเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
ขั้นตอนที่ 2: คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางมาโครต่อไปนี้ในหน้าต่างโมดูล:
VBA: ส่งออกและบันทึกแผ่นงานเป็นสมุดงานใหม่ในโฟลเดอร์ใหม่
Sub SplitWorkbook()
'Updateby20200806
Dim FileExtStr As String
Dim FileFormatNum As Long
Dim xWs As Worksheet
Dim xWb As Workbook
Dim xNWb As Workbook
Dim FolderName As String
Application.ScreenUpdating = False
Set xWb = Application.ThisWorkbook
DateString = Format(Now, "yyyy-mm-dd hh-mm-ss")
FolderName = xWb.Path & "\" & xWb.Name & " " & DateString
If Val(Application.Version) < 12 Then
FileExtStr = ".xls": FileFormatNum = -4143
Else
Select Case xWb.FileFormat
Case 51:
FileExtStr = ".xlsx": FileFormatNum = 51
Case 52:
If Application.ActiveWorkbook.HasVBProject Then
FileExtStr = ".xlsm": FileFormatNum = 52
Else
FileExtStr = ".xlsx": FileFormatNum = 51
End If
Case 56:
FileExtStr = ".xls": FileFormatNum = 56
Case Else:
FileExtStr = ".xlsb": FileFormatNum = 50
End Select
End If
MkDir FolderName
For Each xWs In xWb.Worksheets
On Error GoTo NErro
If xWs.Visible = xlSheetVisible Then
xWs.Select
xWs.Copy
xFile = FolderName & "\" & xWs.Name & FileExtStr
Set xNWb = Application.Workbooks.Item(Application.Workbooks.Count)
xNWb.SaveAs xFile, FileFormat:=FileFormatNum
xNWb.Close False, xFile
End If
NErro:
xWb.Activate
Next
MsgBox "You can find the files in " & FolderName
Application.ScreenUpdating = True
End Subขั้นตอนที่ 3: กดปุ่ม F5 กุญแจสำคัญในการเรียกใช้รหัสนี้ และกล่องพร้อมต์จะปรากฏขึ้นเพื่อบอกตำแหน่งของเวิร์กบุ๊กที่ส่งออกใหม่และเวิร์กชีตทั้งหมดของเวิร์กบุ๊กต้นฉบับได้ถูกส่งออกไปยังเวิร์กบุ๊กใหม่แยกต่างหากซึ่งตั้งชื่อแผ่นงานต้นฉบับในโฟลเดอร์เฉพาะใหม่ ดูภาพหน้าจอ:
ส่งออกและบันทึกแผ่นงานเป็นสมุดงานใหม่ด้วย Kutools for Excel
หากคุณมีแผ่นงานหลายแผ่นที่ต้องบันทึกเป็นสมุดงานแยกกันวิธีแรกอาจไม่ใช่ทางเลือกที่ดี และรหัส VBA อาจซับซ้อนเล็กน้อยสำหรับผู้เริ่มต้น Excel ที่นี่คุณสามารถใช้ไฟล์ แยกสมุดงาน ประโยชน์ของ Kutools สำหรับ Excel เพื่อส่งออกและบันทึกแต่ละแผ่นงานของสมุดงานเดียวอย่างรวดเร็วและง่ายดายเพื่อแยกสมุดงานใหม่
| Kutools สำหรับ Excel, ที่มีมากกว่า 300 ฟังก์ชั่นที่มีประโยชน์ทำให้งานของคุณง่ายขึ้น | ||
หลังจาก ติดตั้งฟรี Kutools สำหรับ Excel โปรดทำดังนี้:
ขั้นตอนที่ 1: คลิก Kutools พลัส > สมุดงาน > แยกสมุดงาน .... ดูภาพหน้าจอ:
ขั้นตอนที่ 2: ในไฟล์ แยกสมุดงาน ทำตามขั้นตอนด้านล่าง:
2: หากคุณต้องการหลีกเลี่ยงการแยกเวิร์กชีตที่ซ่อนอยู่หรือว่างเปล่าคุณสามารถตรวจสอบไฟล์ ข้ามแผ่นงานที่ซ่อนอยู่ or ข้ามแผ่นงานเปล่า-
3: และคุณสามารถตรวจสอบได้ ระบุบันทึก และเพื่อเลือกแยกแผ่นงานจากนั้นบันทึกเป็นไฟล์ข้อความไฟล์ pdf หรือไฟล์ csv ในค่าเริ่มต้นหากคุณไม่เลือกตัวเลือกนี้ระบบจะแบ่งแผ่นงานและบันทึกเป็นสมุดงาน
ขั้นตอนที่ 3: จากนั้นคลิก แยก แล้วเลือกโฟลเดอร์ที่คุณต้องการใส่สมุดงานใหม่ ดูภาพหน้าจอ:
ขั้นตอนที่ 4: จากนั้นคลิก OKจากนั้นแต่ละแผ่นงานที่ตรวจสอบในไฟล์ แยกสมุดงาน กล่องโต้ตอบจะถูกส่งออกและบันทึกเป็นสมุดงานแต่ละเล่ม สมุดงานใหม่แต่ละเล่มถูกตั้งชื่อด้วยชื่อแผ่นงานเดิม ดูภาพหน้าจอ:
คลิกเพื่อทราบข้อมูลเพิ่มเติมเกี่ยวกับเครื่องมือ Split Workbook นี้.
ส่งออกและบันทึกแต่ละแผ่นเป็นสมุดงานใหม่
แบ่งข้อมูลออกเป็นหลายแผ่นอย่างรวดเร็วตามคอลัมน์หรือแถวคงที่ใน Excel
|
| สมมติว่าคุณมีเวิร์กชีตที่มีข้อมูลในคอลัมน์ A ถึง G ชื่อพนักงานขายจะอยู่ในคอลัมน์ A และคุณต้องแยกข้อมูลนี้ออกเป็นหลายแผ่นโดยอัตโนมัติตามคอลัมน์ A ในสมุดงานเดียวกันและพนักงานขายแต่ละคนจะถูกแบ่งออกเป็นใหม่ แผ่นงาน Kutools สำหรับ Excel's วันที่แยก ยูทิลิตี้สามารถช่วยให้คุณแบ่งข้อมูลออกเป็นหลายแผ่นงานได้อย่างรวดเร็วตามคอลัมน์ที่เลือกดังภาพด้านล่างที่แสดงใน Excel คลิกเพื่อทดลองใช้งานฟรี 30 วันเต็มรูปแบบ! |
 |
| Kutools for Excel: มีโปรแกรมเสริม Excel ที่มีประโยชน์มากกว่า 300 รายการให้ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 30 วัน |
บทความที่เกี่ยวข้อง:
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
