Giúp đỡ về copy dữ liệu sang một sheet khác (1 người xem)

[langtuvn]

Mình có file excel như thế này (đã đính kèm)

SHEET NHAP là SHEET mình sẽ nhập dữ liệu vào. Nó tự động xác định bđ, nt,ngt,
và ĐT,TT ở cột [TABLE="width: 134"]
[TR]
[TD]XĐBN[/TD]
[TD]ĐT/TT[/TD]
[/TR]
[/TABLE]

Mình muốn là, mỗi lần khi nhập vào bên sheet NHAP, nó tự động xác định Ban đầu (bđ), nt(nội tỉnh)->Đúng tuyến(ĐT), nt(nội tỉnh)->Trái tuyến(TT), ngt(ngoại tỉnh)->ĐT,ngt->TT. Và tự động copy chèn sang bên sheet BAO CAO đã có khung mẫu, bệnh nhân ban đầu(bđ), bệnh nhân nội tỉnh(nt) đúng tuyến (ĐT), bệnh nhân nội tỉnh(nt) trái tuyến (TT), bệnh nhân ngoại tỉnh(ngt) đúng tuyến(ĐT), bệnh nhân ngoại tỉnh(ngt) trái tuyến(TT).
Viết bằng VBA tự động nhé. Xin cảm ơn nhiều!

 

[thang314]

cái cột EA của bạn tôi thấy nó cứ làm sao ấy. thử nhé: STT là 1 thì căn cứ vào đâu để xác định được là bđ hay nt và cột AF là ĐT. nếu giải thích cụ thể thì còn lấy được chứ.

 

[langtuvn]

Căn cứ để lấy bđ thì đơn giản, căn cứ theo mã thẻ. Nếu mà có đuôi là 42012 thì là bđ (Ban Đầu), đã là bđ thì luôn ĐT (Đúng Tuyến), còn NT (Nội Tỉnh) thì các thẻ có dạng đuôi là 42xxx mà ko phải là 42012 thì là NT (nội tỉnh), còn lại là NGT (Ngoại Tỉnh). Còn ĐT(Đúng Tuyến) là lấy tổng số bệnh nhân chi trả chia cho tổng tiền mà = 0.7 là TT(Trái Tuyến) còn không phải bằng 0.7 là ĐT (Đúng Tuyến).

 

[langtuvn]

Thử nhé: STT là 1: Mã thẻ (Cột E) HT542010040077442012 hoặc MĐK (Cột I) 42012 có đuôi là 42012 tức là nó là bđ và đã là bđ thì luôn luôn ĐT.
STT thứ 5: Cột E: DN742000480028142022 có đuôi 42xxx không phải 42012 nên là NT, do người bệnh cùng chi trả chia cho Tổng cộng không bằng 0.7 nên nó là ĐT (Đúng Tuyến).
STT 33: GD742100130013642225 Có đuôi 42xxx nhưng không phải 42012 nên là NT, nhưng do Người bệnh cùng chi trả chia cho Tổng cộng = 0.7 nên nó là TT (Trái Tuyến).

 

[dhn46]

Tôi làm cho bạn, kết hợp ADO và VBA. Nhưng có 1 số chú ý như sau:
1/ Đúng tuyến, nội tỉnh....cái đấy bạn tự làm và xuất ra cột như Form
2/ Không dùng dấu tiếng Việt cho 2 cột đó: ví dụ ĐT phải chuyển thành DT, BĐ phải thành BD
3/ Tôi tạo Sheet INF để tạo phần chữ ký, bạn thanh đổi chữ ký thì tay đổi trong 10 dòng đầu sheet INF
Trong File tôi gửi đã lược bớt dữ liệu để giảm dung lượng, bạn có thể thêm dữ liệu để Test.
Thân!

 

[Ba Tê]

Thử nhé: STT là 1: Mã thẻ (Cột E) HT542010040077442012 hoặc MĐK (Cột I) 42012 có đuôi là 42012 tức là nó là bđ và đã là bđ thì luôn luôn ĐT.
STT thứ 5: Cột E: DN742000480028142022 có đuôi 42xxx không phải 42012 nên là NT, do người bệnh cùng chi trả chia cho Tổng cộng không bằng 0.7 nên nó là ĐT (Đúng Tuyến).
STT 33: GD742100130013642225 Có đuôi 42xxx nhưng không phải 42012 nên là NT, nhưng do Người bệnh cùng chi trả chia cho Tổng cộng = 0.7 nên nó là TT (Trái Tuyến).

Thử thì thử.
1/ Sheet Mau để làm khung mẫu cho bảng báo cáo, không được thay đổi dòng, cột trong sheet này.
2/ Bấm nút GPE trong sheet GPE để chạy code.
3/ Đưa dữ liệu đầy đủ vào xem kết quả có đúng không, nhìn lu bu quá tôi chưa kiểm tra được.

 

[langtuvn]

Cảm ơn 2 bạn nhiều nhé, mình mới chạy thử, thấy nó work thế là good rồi, để mình đưa dữ liệu của tháng này vào kiểm tra xem sao. Cảm ơn 2 bạn nhiều!