นี่คือแมโครที่ดำเนินการค้นหา/แทนที่ชุดของเอกสาร MS word
หากต้องการดูสคริปต์นอก MS word ให้เปิด FindReplaceAllFiles.bas และ helpers.bas ในโปรแกรมแก้ไขข้อความใดๆ
ตั้งค่า
การตั้งค่าเกี่ยวข้องกับการจัดระเบียบไฟล์ตามที่แสดงใน SetupDiagram.png:
- FindReplaceMacro.dotm ในไดเร็กทอรีการทำงาน
- มี lookuptable.csv ข้างมาโคร
- รูปแบบตารางค้นหาควรเป็นสองคอลัมน์ โดยคอลัมน์แรกคือ find-strings และคอลัมน์ที่สองคือสตริงการแทนที่ - ดูตัวอย่าง lookuptable.csv ในที่เก็บนี้
- สร้างไดเรกทอรีชื่อ ไฟล์ ข้างมาโครและตารางค้นหา
- ไฟล์ต่างๆ มีไฟล์ .docx ทั้งหมดที่คุณต้องการดำเนินการค้นหา/แทนที่โดยตรง
- ไม่ควรเปลี่ยนชื่อไฟล์ตารางการค้นหาและไดเร็กทอรีไฟล์จากสคีมานี้ เว้นแต่ว่าคุณต้องการแก้ไขมาโครด้วยตนเอง
วิ่ง
การเปิดมาโครจะปรากฏขึ้นเพื่อเปิดเอกสารคำ หากต้องการเรียกใช้:
- คุณจะต้องเปิดใช้งานมาโคร (การตั้งค่าความปลอดภัย)
- คุณจะต้องเปิดใช้งานแท็บนักพัฒนาซอฟต์แวร์
- คลิกที่ปุ่ม Macros บนแท็บ Developer
- เลือก findReplaceAllFiles แล้วกด Run
- ตอนนี้ FilesWithSubs จะมีไฟล์ที่มีการทดแทน หากชื่อไฟล์อยู่ในตารางการทดแทน ไฟล์จะถูกเปลี่ยนชื่อตามการทดแทน
การปรับปรุงในอนาคตที่เป็นไปได้
- ทำให้อัลกอริทึมค้นหาโฟลเดอร์ย่อยของไฟล์ซ้ำ
