บทความนี้แสดงวิธีแปลงเอกสาร Word เป็นสเปรดชีต Excel แต่คงรูปแบบเดิมไว้ สมมติว่าคุณต้องการจัดรูปแบบหรือจัดเรียงข้อมูลที่อยู่ในเอกสารเวิร์ด แน่นอน excel เป็นตัวเลือกที่ดีกว่าในการทำเช่นนั้น โชคดีที่คุณไม่จำเป็นต้องพิมพ์ข้อมูลอีกครั้งในไฟล์ excel ใหม่ คุณสามารถแปลงเอกสาร word เป็นสเปรดชีต excel ในขณะที่รักษารูปแบบ รูปภาพต่อไปนี้เน้นจุดประสงค์ของบทความนี้ ลองดูอย่างรวดเร็วเพื่อเรียนรู้วิธีการทำอย่างง่ายๆ

ดาวน์โหลดแบบฝึกหัดแบบฝึกหัด

คุณสามารถดาวน์โหลดแบบฝึกหัดแบบฝึกหัดได้จากปุ่มดาวน์โหลดด้านล่าง

การแปลง Word เป็น Excel.xlsm

2 วิธีในการแปลง Word เป็น Excel ด้วยรูปแบบเดียวกัน

ลองนึกภาพว่าคุณมี เอกสารคำต่อไปนี้ ตอนนี้คุณต้องการแปลงเป็นสเปรดชีต excel จากนั้นทำตามวิธีการด้านล่าง

1. แปลง Word เป็น Excel ด้วยการคัดลอกและวาง

คุณสามารถคัดลอกข้อมูลจากเอกสาร Word แล้ววาง ลงบนแผ่นงาน excel ทำตามขั้นตอนด้านล่าง

📌 ขั้นตอน

• ก่อนอื่น ไปที่ไฟล์ word จากนั้นกด CTRL+A เพื่อเลือกทั้งเอกสาร นอกจากนี้ คุณยังสามารถเลือกช่วงที่ต้องการได้เท่านั้น
• หลังจากนั้น ให้กด CTRL+C เพื่อคัดลอกข้อมูลตามที่แสดงด้านล่าง

• ถัดไป ไปที่สเปรดชีต excel จากนั้นเลือกเซลล์ซ้ายบนของช่วงที่คุณต้องการรับข้อมูล
• ตอนนี้ กด CTRL+V เพื่อวางข้อมูล หรือคุณสามารถคลิกขวาที่เซลล์นั้นได้ จากนั้น เลือก คงการจัดรูปแบบต้นฉบับ (K) จาก ตัวเลือกการวาง
• หลังจากนั้น คุณจะได้ผลลัพธ์ต่อไปนี้

อ่านเพิ่มเติม: วิธีคัดลอกจาก Word ไปยัง Excel เป็นหลายเซลล์ (3 วิธี)

2. แปลง Word เป็น Excel กับ VBA

คุณสามารถทำเช่นเดียวกันกับ Excel VBA ทำตามขั้นตอนด้านล่าง

📌 ขั้นตอน

• ขั้นแรก เพิ่มแผ่นงานใหม่ จากนั้น บันทึกสมุดงานเป็น สมุดงานที่เปิดใช้งานแมโคร
• ถัดไป กด ALT+F11 เพื่อเปิดหน้าต่าง VBA
• จากนั้น เลือก แทรก >> โมดูล เพื่อสร้างโมดูลใหม่ดังภาพด้านล่าง

• หลังจากนั้น ให้คัดลอกโค้ดต่อไปนี้โดยใช้ปุ่มคัดลอก

2286

• จากนั้นวางโค้ดที่คัดลอกลงในหน้าต่างโมดูลตามที่แสดงด้านล่าง

• ตอนนี้ กด F5 เพื่อรันโค้ด คุณสามารถทำได้จาก เรียกใช้
• หลังจากนั้น ระบบจะขอให้คุณเลือกไฟล์คำที่คุณต้องการแปลง
• ตอนนี้ เรียกดูตำแหน่ง ของเอกสารคำที่คุณต้องการ จากนั้น เลือกไฟล์และคลิก เปิด .

• สุดท้าย คุณจะได้ผลลัพธ์ที่คล้ายกับวิธีก่อนหน้านี้

🔎 หลักปฏิบัติเป็นอย่างไรทำงานหรือไม่

Sub WordToExcelWithFormatting()

Dim Document, Word As Object

Dim File As Variant

Dim PG, Range

การประกาศตัวแปรที่จำเป็น

Application.ScreenUpdating = False

File = Application.GetOpenFilename _

(“ไฟล์ Word(*.doc;*.docx) ,*.doc;* .docx”, , “ExcelWIKI.Com – โปรดเลือก”)

หากไฟล์ = False ให้ออกจาก Sub

Set Word = CreateObject( “Word.Application”)

ตั้งค่าตัวแปร Word เป็นเอกสารเวิร์ด

ตั้งค่า Document = Word.Documents.Open(ชื่อไฟล์ :=File, ReadOnly:=True)

กำหนดตัวแปร Document ให้กับวัตถุหรือไฟล์ที่ผู้ใช้อ้างถึง

Document .Activate

PG = Document.Paragraphs.Count

บรรทัดรหัสนี้กำหนดตัวแปร PG ให้กับจำนวนย่อหน้าใน เอกสารคำ

กำหนดช่วง = Document.Range(เริ่ม:=Document.Paragraphs(1).Range.Start, _ สิ้นสุด:=Document.Paragraphs(PG).Range .จบ)

Range.Select

เมื่อเกิดข้อผิดพลาด ให้ดำเนินการต่อ

Word.Selection.Copy

ActiveSheet.Range(“B2”) เลือก

ActiveSheet.Paste

Document.Close

Word.Quit (wdDoNotSaveChanges)

Application.ScreenUpdating = True

สิ้นสุดการย่อย

อ่านเพิ่มเติม: วิธีแปลงตาราง Word เป็นสเปรดชีต Excel (6 วิธี)

ข้อควรจำ

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

สรุป

ตอนนี้ คุณรู้วิธีแปลงเอกสาร word เป็นสเปรดชีต excel และรักษาการจัดรูปแบบด้วย โปรดแจ้งให้เราทราบหากบทความนี้ช่วยคุณแก้ปัญหาได้ คุณยังสามารถใช้ส่วนความคิดเห็นด้านล่างสำหรับคำถามหรือข้อเสนอแนะเพิ่มเติม เยี่ยมชมบล็อก ExcelWIKI ของเราเพื่อสำรวจเพิ่มเติมเกี่ยวกับ excel อยู่กับเราและเรียนรู้ต่อไป