แมโคร VBA เพื่อค้นหาและแทนที่สตริงข้อความในไฟล์คำใดๆ ภายในโฟลเดอร์ที่เลือก

เรายินดีที่จะช่วยเหลือในการแก้ปัญหา แต่คุณต้องแสดงให้เห็นถึงความเข้าใจเพียงเล็กน้อยเกี่ยวกับปัญหาที่กำลังแก้ไข ดูรายการตรวจสอบคำถาม SO สำหรับรายละเอียด โปรดทราบว่าคำถามของคุณไม่เป็นไปตามหลักเกณฑ์ของ Stack Overflow ในขณะนี้ แต่แก้ไขได้ง่าย! หลังจากที่คุณอ่านหลักเกณฑ์แล้ว คลิก "แก้ไข" ใต้คำถามของคุณ และขัดเกลาเล็กน้อย

ทุกคนเริ่มเป็นคนใหม่ในบางสิ่งบางอย่าง เนื่องจากคุณเพิ่งเริ่มใหม่ คุณมีตัวเลือกดีๆ สองสามทางในการเริ่มต้นโครงการ

คุณอาจลองใช้โค้ดในลิงก์ที่คุณวางด้านบนเพื่อเริ่มต้น และลองแก้ไขบางส่วนตามวัตถุประสงค์ของคุณเอง

หนึ่งในตัวเลือกที่ดีที่สุดคือการบันทึกแมโคร จากนั้นไปที่โปรแกรมแก้ไข VBA (โดยการกด Alt-F11) เพื่อดูโค้ดที่แมโครสร้างขึ้น ซึ่งช่วยให้คุณเห็นวิธีการตั้งค่าโค้ดและเป็นจุดเริ่มต้นในการเขียนโค้ดของคุณเอง

นอกจากนี้ คุณสามารถดูไฟล์วิธีใช้ของ Microsoft ได้จากเมนูวิธีใช้ในตัวแก้ไข VBA มีเว็บไซต์ Excel VBA มากมายทางออนไลน์เช่นกัน

แก้ไข: หากต้องการใช้โค้ดในลิงก์ที่คุณโพสต์ คุณสามารถข้ามส่วนที่ค้นหาโฟลเดอร์ย่อยและเพิ่มลงในคอลเลกชันได้ ในตอนต้นของส่วนถัดไปที่วนซ้ำไฟล์ต่างๆ มีคำสั่ง:

For Each varItem In colSubFolders

นำสิ่งนี้ออกสำหรับ... แต่ละวงที่ค้นหาผ่านไดเรกทอรีปัจจุบันของโฟลเดอร์ย่อยและเพียงใช้โค้ดที่อยู่ภายในซึ่งดูผ่านเอกสาร Word ในโฟลเดอร์ย่อย (ตอนนี้ดูผ่านเอกสาร Word ในโฟลเดอร์ หนึ่ง เท่านั้น ไม่ใช่ทุกโฟลเดอร์ย่อย)