Nhờ giúp đỡ thêm Code (1 người xem)

[le_vis]

Mong các bạn giúp thêm Code tự động chèn thêm dòng vào giữa. giữ lại được phần ngày tháng và tổng hợp phía dưới
Quy trình trong File đính kèm là :
- Nhập dữ liệu thu chi vào Form nhập liệu => Lưu sang Sheet THop_TC => Lọc sang Sheet1
- Cần các bạn giúp thêm đoạn Code để khi dữ liệu Sheet THop_TC tăng thêm thì khi loc sang Sheet1 thì tự chèn thêm dòng vào giữa
và giữ lại được phần tổng hợp phía dưới
- Nhờ các bạn giúp thêm đoạn Code để thay hàm sumif để tổng hợp Tổng tiền mặt, tiền UNC, và tiền đối trừ công nợ ( Chi tiết tôi nhờ các bạn xem hộ trong File đính kèm) - Chân thành cảm ơn các bạn nhiều.

 

[ChanhTQ@]

Nhờ các bạn giúp thêm đoạn Code để khi dữ liệu tại Sheet THop_TC tăng thêm thì tại bảng Sheet1 này được chèn vào khoản giữa phần biểu mẫu phía trên ( Cần khoảng 500 dòng ) với phần tổng hợp được đánh dấu trong khung mầu đỏ ( Nói cách khác là phần dữ liệu trong khung mầu đỏ được giữ lại - Không bị xóa mất ).

/(/ếu là mình thì mình sẽ làm vầy:
Thêm hẵn ngay ban đầu 600 dòng cho dư giã! (Tất nhiên là dịnh dạng gì đó cho tòn bộ các dòng này như í bạn muốn);
Sau khi nạp dữ liệu vô; những dòng không chứa dữ liệu ta cho ẩn đi!

Tất nhiên, để làm được việc này, bạn cần có kỹ năng tìm cho ra dòng cuối có dữ liệu!

 

[le_vis]

Cảm ơn bạn ChanhTQ@ đã góp ý. Phương án này mình đã nghĩ tới rồi, nhưng như vậy khi dữ liệu chỉ cần 350 dòng chẳng hạn thì dùng Auto Filter để lọc lại cũng được nhưng như vậy mỗi thứ một tý sẽ tốn tài nguyên của máy . Bạn xem có thể giúp mình được không cả phần code tổng hợp nữa. Cảm ơn bạn

 

[le_vis]

Cảm ơn bạn ChanhTQ@. Với Phương án khống chế Pet sang sheet1 đến dòng 500. Bạn giúp mình đoạn Code đó mới nhé. Cảm ơn bạn đã quan tâm

 

[ChanhTQ@]

Bạn tiến hành kẻ bảng trên số liệu không thể nhanh hơn ẩn các dòng thừa!
Còn 1 iêu cầu nữa mình thật sự chưa rõ lắm!

 

[le_vis]

Chân thành cảm ơn ChanhTQ@ nhiều. Cái yêu cầu mà bạn nói chưa rõ lắm đó là :
- Khi đã lọc sang Sheet1 thì mình tổng hợp lại xem trong tháng tổng số thu là bao nhiêu ? Trong đó : Căn cứ vào các mã khoản tiền bên Sheet THop_TC ( Tiền mặt = TMA , chuyển khoản = UNC, đối trừ công nợ = T_CNO ) để tách ra
Phần thu :
+ Tiền mặt = ?
+ Tiền chuyển khoản = ?
+ Tiền đối trừ công nợ = ?
Phần chi :
+ Tiền mặt = ?
+ Tiền chuyển khoản = ?
+ Tiền đối trừ công nợ = ?
Bạn giúp thêm cho mình nhé. Hiện tại mình đang phải dùng cột phụ (Cột S Sheet C.tiet_TC) sau đó dùng hàm Sumif để tổng hợp đó bạn. Rất mong được bạn quan tâm giúp đỡ thêm. Cảm ơn bạn nhiều nhiều ...

 

[ChanhTQ@]

Xỉn quá nên để bạn chờ lâu!

[Thongbao]đó là :
- Khi đã lọc sang Sheet1 thì mình tổng hợp lại xem trong tháng tổng số thu là bao nhiêu ? Trong đó : Căn cứ vào các mã khoản tiền bên Sheet THop_TC ( Tiền mặt = TMA , chuyển khoản = UNC, đối trừ công nợ = T_CNO ) để tách ra
Phần thu :
+ Tiền mặt = ?
+ Tiền chuyển khoản = ?
+ Tiền đối trừ công nợ = ?
Phần chi : Cũng tương tự
Bạn giúp thêm cho mình nhé. [/Thongbao]

 

[le_vis]

Cảm ơn vì sự nhiệt thành của bạn dành cho mình. Rất vui nếu được bạn cho xin số điện thoại hoặc Gmail của bạn để có thể học hỏi được nhiều hơn . Chúc bạn cùng gia đình " Hữu Chí ý sẽ thành - Thiên niên gia phú quý"
- Mình sẽ doow về tes thử có gì xin được thưa lại bạn sau . Cảm ơn bạn

 

[ChanhTQ@]

Xin bạn chú í cho các điều sau:

(1) Bạn thấy file thứ 2 giảm đi vài kí, bạn đoán sao nó giảm làm vậy? Tuy rằng macro sau đã được mình khai báo thêm biến mảng

ReDim ATC(1 To 7, 1 To 2) As Double

& vài câu lệnh thêm trong macro so với macro file đầu.

(2) 1 NICK khác của mình có đăng số DĐ đó bạn!
Nhưng lúc nào bạn cũng có thể hỏi trên diễn đàn & sẽ có nhiều giải đáp hay để bạn lựa chọn!

 

[le_vis]

File thứ 2 Mình cho ứng dụng chạy thử 6.000 dòng cho kết quả tuyệt vời bạn ạ. Thực sự mình cũng đang đánh vật từ tối mà chưa tìm được câu trả lời vì cái lý do tại sao các dòng lệnh tăng, thêm biến mà dung lượng giảm ?
Cảm phục bạn nhiều. Có lẽ mình không được học cơ bản mà chỉ học mò mẫm cộng với tuổi tác cao nên cảm thấy học khó quá.
Rất mong có dịp được bái đường sư phụ nhé. Cảm ơn bạn nhiều lắm

 

[SA_DQ]

(1) File thứ 2 Mình cho ứng dụng chạy thử 6.000 dòng cho kết quả tuyệt vời bạn ạ.
(2)Thực sự mình cũng đang đánh vật từ tối mà chưa tìm được câu trả lời vì cái lý do tại sao các dòng lệnh tăng, thêm biến mà dung lượng giảm ?
(3) Cảm phục bạn nhiều. Có lẽ mình không được học cơ bản mà chỉ học mò mẫm cộng với tuổi tác cao nên cảm thấy học khó quá.
(3.1) Rất mong có dịp được bái đường sư phụ nhé. Cảm ơn bạn nhiều lắm

(1) Kết quả về tốc độ này là do bạn đã biết xài "mảng"; Nó không fụ thuộc vô cái mà người khác đã giúp bạn!

(2) Bạn khi khai báo mảng đã lấy đến 20 cột dữ liệu; Nhưng file của bạn chỉ cần 2/3 số cột này thôi(!)
Khi bạn iêu cầu tính thêm số liệu; Lúc đó cần lấy đến 17 cột dữ liệu (tựu chung đã giảm đi 3 cột DL), nên file giảm vài Kí lô!

Thêm nữa, thực ra cột đầu tiên của mảng dữ liệu bạn cũng không xài đến! Nếu giảm đi cột này chắc dữ liệu sẽ giảm tí chút không đáng kể nữa. Nhưng lúc đó kĩ năng lập trình của bạn sẽ tăng lên đáng kể!

(3) Tuổi tác của bạn không cao bằng người đã giúp bạn đâu đó nha!

(3.1) Chỉ cần bạn tỏ thiện cảm như vậy thì người giúp bạn cũng đã rất vui trong lòng rồi!

 

[le_vis]

Cảm ơn các bạn (Các Anh); Cảm ơn anh SA_DQ đã giải thích chi tiết và cho biết thêm thông tin về Bác ChanhTQ@. Rất cảm ơn các anh các chị, cảm ơn BQT đã dành cho chúng tôi những người không có điều kiện để theo học các lớp cơ bản được học tập qua diễn đàn. Chúc tất cả mọi người một năm mới :"Hữu chí ý sẽ thành - Thiên niên giai phú quý"