Excel ค้นหาและแทนที่ช่วง

ปัญหา

ฉันต้องการค้นหาและแทนที่ช่วงของค่าใน excel หรือไม่

ทุกคนสามารถแจ้งให้เราทราบหากเป็นไปได้?

สารละลาย

ฉันมีสิ่งนี้ในโครงการของฉัน แต่ฉันสามารถแทนที่ช่วงของเซลล์ได้

 Sub ChgInfo () Dim WS เป็นเวิร์กชีต Dim ค้นหาเป็นการแทนที่ Dim Dim เป็นพร้อมต์ติ่มสตริงเป็นชื่อ Dim Dim เป็น String Dim MatchCase เป็นบูลีน MsgBox "ตัวเลือกนี้มีผลต่อเวิร์กชีททั้งหมดถูกสร้างขึ้นเพื่อเปลี่ยน ADM TITLE ของโครงการเท่านั้น "& vbCrLf &" สำหรับข้อมูลเพิ่มเติมโปรดดูที่: เมทริกซ์ SOP แจ้งให้ทราบถึง Proyectos ", vbExclamation + vbOKOnly" อ่านก่อนหน้า "Prompt =" ค่าดั้งเดิมที่คุณต้องการแทนที่คืออะไร " ชื่อ = "การป้อนค่าการค้นหา" การค้นหา = กล่องป้อนข้อมูล (พร้อมท์, ชื่อเรื่อง) พร้อมท์ = "ค่าการแทนที่คืออะไร" ชื่อ = "การเปลี่ยนค่าการค้นหา" การแทนที่ = InputBox (พร้อมท์, ชื่อเรื่อง) สำหรับแต่ละ WS ในเวิร์กชีต WS.Cells.Replace อะไร: = การค้นหา, การเปลี่ยน: = การเปลี่ยน, _ LookAt: = xlPart, MatchCase: = False Sub End