Lọc và sắp xếp theo nhiều điều kiện

[alex-luu]

Nhờ các anh / chị trên diễn đàn giúp em viết code VBA như sau :

So sánh số buổi dạy trong từng lớp, ai dạy nhiều hơn thì chọn làm trainer chính. Nếu số buổi dạy = nhau thì qua Sheet Vùng_Mien_Văn Phong để đối chiếu xem vị trí ai cao hơn theo quy luật AT > AsT > AMD thì chọn người đó làm trainer chính.
Cuối cùng ghép 2 lớp AR và UL lại thành 1 lớp ARFC, cũng so sánh trainer để chọn ra trainer chính theo quy luật trên.
Chú ý : nếu so vị trí vẫn = nhau thì chọn trainer nào cũng được, nhưng phải tô đỏ hàng đó, để biết lớp đó có số trainer dạy = buổi với nhau


ví dụ : lớp BGG3AR1907 có 1 trainer 0021035 dạy 4 buổi => người này là trainer chính của lớp BGG3AR1907
lớp BGG3UL1907 có 2 trainer người dạy 1 buổi, người dạy 2 buổi => người 2 buổi là trainer chính của lớp BGG3UL1907
Ghép 2 lớp này lại thành lớp BGG31907 (bỏ chữ AR và chữ UL) => chọn trainer 0021035 làm trainer chính của lớp BGG31907

Ví dụ 2 :
lớp BGG3AR1909 có 2 trainer cùng dạy = nhau = 3 buổi => chọn trainer nào làm trainer chính cũng được nhưng phải tô đậm, màu đỏ để biết. VD chọn 0044375
lớp BGG3UL1909 có 2 trainer cùng dạy 2 buổi => chọn trainer 0021035 làm trainer chính.
Ghép 2 lớp này lại thành 1 lớp BGG31909 => so sánh trainer chính của 2 lớp thì chọn 0044375 làm trainer chính của cả khóa BGG31909 (nhớ tô đậm và màu đỏ để biết khóa này có trainer dạy = buổi nhau)

Sheet này có khoảng 30.000 hàng nên nếu viết bằng hàm if với vlookup sẽ chạy cực kỳ nặng và chậm.
Nhờ các anh chị viết dùm em bằng VBA ạ, em xin cảm ơn.

E​

F​

G​

H

K

L​

M​

N​

O​

P​

Q​

R​

S​

T

U

V

W

X

Y

AFRC Class ID

Trainer code chính lớp ARFC

số buổi dạy ARFC

​ Class ID

Start Date

Trainer Code 1

Trainer Name 1

Trainer 1 No.Session weekday

Trainer 1 No.Session weekend

Trainer Code 2

Trainer Name 2

Trainer 2 No.Session weekday

Trainer 2 No.Session weekend

Trainer Code 3

Trainer Name 3

Trainer 3 No.Session weekday

Trainer 3 No.Session weekend

BGG31907

0021035

4

BGG3AR1907

06/04/2019

0021035

CAO THỊ NGỪNG

2​

2​

BGG31912

02002272581

5

BGG3AR1912

16/06/2019

02002272581

Nguyễn Thị Chuyên

1​

2​

0021035

CAO THỊ NGỪNG

1​

1​

BGG31909

0044375

3

BGG3AR1909

20-02-19​

0044375

NGUYỄN THỊ KIM THOA

3​

0021035

CAO THỊ NGỪNG

1​

2​

BGG3UL1907

06/04/2019

0021035

CAO THỊ NGỪNG

1​

0021089

ĐỖ VĂN XUẤT

2​

BGG3UL1908

16/04/2019

0021035

CAO THỊ NGỪNG

3​

0021089

ĐỖ VĂN XUẤT

1​

1​

BGG3UL1909

06/05/2019

0021035

CAO THỊ NGỪNG

2​

0021089

ĐỖ VĂN XUẤT

2​

BGG3UL1910

16/05/2019

0021035

CAO THỊ NGỪNG

2​

3​

BGG3UL1911

06/06/2019

02002272581

Nguyễn Thị Chuyên

2​

3​

BGG3UL1912

16/06/2019

02002272581

Nguyễn Thị Chuyên

5​