ผสานเอกสาร Word 2010 หลายตัว

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

ในการเริ่มต้นอันดับแรกคุณต้องใส่มันไว้ในที่เดียวกันตรวจสอบให้แน่ใจว่าทั้งหมดอยู่ใน Word เวอร์ชันเดียวกันทั้ง Doc หรือ Docx ดังที่คุณเห็นในภาพหน้าจอด้านล่างเราได้เปิดเอกสารสองฉบับที่จะรวมเข้าด้วยกัน

สองเอกสาร

ตอนนี้เปิดเอกสาร Word ใด ๆ และบันทึกเป็นเอกสารที่เปิดใช้งานแมโครสำหรับสิ่งนี้ให้ไปที่เมนูไฟล์แล้วคลิก บันทึกเป็น.

บันทึกเป็น

กล่องโต้ตอบจะปรากฏขึ้นจาก บันทึกเป็นประเภท คลิก แม่แบบที่เปิดใช้งานแมโคร Word และคลิกบันทึก

dotm

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

ผู้พัฒนา 1

ตอนนี้ไปที่ ผู้พัฒนา แท็บและคลิก Visual Basic

ผู้พัฒนา

คุณจะไปถึงกล่องโต้ตอบตัวแก้ไข VB จากแถบด้านข้างซ้ายดับเบิลคลิก เอกสารนี้เพื่อ เปิดเป็นหน้าต่างแก้ไข VB คุณจะเห็นหน้าต่างรหัสทางด้านขวา ตอนนี้ใส่บรรทัดของรหัสเหล่านี้ลงไป

บันทึก: อย่าลืมเปลี่ยนเส้นทางของโฟลเดอร์ตำแหน่งที่เอกสารนั้นอยู่และรุ่นของเอกสาร Word ในบรรทัดรหัสเหล่านี้ เพื่อให้ง่ายขึ้นเราได้เพิ่มข้อควรระวังนี้ไว้ด้านหน้าโค้ดด้วย

Sub MergeDocs ()

สลัว rng เป็นช่วง

Dim MainDoc เป็นเอกสาร

Dim strFile As String

Const strFolder =“ C: เอกสาร UsersUsman JavaidDesktopWord” ||| (เปลี่ยนเส้นทางที่เอกสารของคุณอยู่)

ตั้ง MainDoc = Documents.Add

strFile = Dir $ (strFolder &“ * .docx”) ||| (เปลี่ยนนามสกุลไฟล์เป็น. doc ในกรณีที่คุณกำลังใช้งานเวอร์ชัน Word 97-03)

ทำจนกระทั่ง strFile =“”

ตั้ง rng = MainDoc.Range

rng.Collapse wdCollapseEnd

rng.InsertFile strFolder & strFile

strFile = Dir $ ()

ห่วง

ส่วนท้าย

เครื่องมือแก้ไข vb

ตอนนี้กด Ctrl + S เพื่อบันทึกแมโครที่เพิ่มเข้ามาใหม่และปิดตัวแก้ไข VB นำทางไปยัง ผู้พัฒนา แท็บและคลิก แมโคร

แมโคร

จาก แมโคร ให้เลือก MergeDocs มาโครและคลิก วิ่ง.

มาโคร 1

หากคุณระบุพา ธ และเวอร์ชันอย่างถูกต้องเอกสารทั้งหมดจะผสานและเปิดในเอกสารใหม่

รวม

คุณสามารถตรวจสอบคำแนะนำที่ผ่านการตรวจสอบก่อนหน้านี้ของเราเกี่ยวกับ Return to Last Line ที่แก้ไขใน Word 2010 และการใช้ Mail Merge ใน Word 2010

[ผ่าน gaebler]

ความคิดเห็น