Tạo lịch báo giảng (2 người xem)

[nqt61]

Mình đang dùng VBA trích lọc từ Thời khóa biểu gốc của trường ra lịch báo giảng cho từng giáo viên. Chọn tên GV ở ô K1 thì sẽ cho lịch báo giảng tương ứng của GV đó. Hiện tại khí thực hiện cho kết quả đúng như ý muốn, tuy nhiên có 1 trường hợp cho kết quả sai: Cụ thể khí chọn GV tên Hảo thì kết quả lại lấy lịch của GV Hảo và cả GV T.Thảo, Đ.Thảo. Mình không hiểu tai sao, Nhờ các cao thủ trên diễn đàn giúp chữa lại code với. Xin cám ơn nhiều. Mình gởi file kèm

 

[ChanhTQ@]

Trong macro bạn sửa lại dòng lệnh như vầy, sẽ đúng

 Set sRng = Rng.Find(MN & Targ.Value, , xlFormulas, xlPart)

thay vì

 Set sRng = Rng.Find(Targ.Value, , xlFormulas, xlPart)