Excel - เปรียบเทียบคอลัมน์เพื่อค้นหาข้อมูลที่หายไป

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

ปัญหา

ฉันต้องการความช่วยเหลือโปรด! ฉันมีสองแผ่นงาน (C & Q) แต่ละแผ่นงานมีสี่คอลัมน์แต่ละคอลัมน์มีข้อมูลที่แตกต่างกัน (A = วันที่ B = อื่น ๆ, C = คำอธิบาย, D = จำนวนเงิน) แต่แผ่นงานทั้งสองเหมือนกัน ฉันกำลังพยายามเปรียบเทียบคอลัมน์ D ในแผ่นงานทั้งสองเพื่อหาข้อมูลที่ขาดหายไปในแผ่นงานถาม

สารละลาย

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

ขั้นแรกให้เรียกใช้แมโครแล้วดูที่แผ่น C เพื่อดูว่าเกิดอะไรขึ้นก่อนที่จะแก้ไขแมโคร:

 การทดสอบย่อย () Dim cfindq เป็น Range, rc เป็น Range, CC เป็น Range, x เป็น Double On ข้อผิดพลาดกลับมาทำงานต่อไปด้วย Worksheets ("c") .Cells.Interior.ColorIndex = xlNone Set rc = Range (.Range ("d2" ), .Range ("d2") End (xlDown)) สำหรับแต่ละซีซีใน rc x = cc.Value ด้วยเวิร์กชีท ("q") คอลัมน์ ("D: D") ตั้งค่า cfindq = .Cells.Find (อะไร : = x, lookat: = xlWhole) ถ้า cfindq ไม่มีอะไรแล้ว GoTo line1 Else GoTo line2 สิ้นสุดถ้าลงท้ายด้วย line1: cc.Interior.ColorIndex = 6 line2: cc ต่อไปท้ายด้วย End Sub