Giúp em Insert và xóa dòng hàng tự động (1 người xem)

[googlehtvn]

Các bác giúp em dùng VBA để insert các dòng hàng có dữ liệu từ Sheet "TCVN" sang sheet "Lket" với ạ
Công việc của em cụ thể là
1. từ Sheet "TCVN" sheet này các cột sẽ thay đổi liên tục theo từng TCVN (lúc 1 dòng cột, lúc thì đên 100 dòng cột)
2. Sau đó em sang Sheet "LKet", nếu dòng hàng ít hơn dòng hàng bên Sheet"TCVN", thì mình sẽ insert ra dòng hàng cho đủ như bên "TCVN". Còn nếu nhiều hơn dòng hàng so với Sheet"TCVN" thì mình sẽ xóa các dòng hàng đi để cho bằng như "TCVN"

Các bác cho e giải pháp dùng VBA để nó tự động được không ạ, hoặc dùng Macro sử dụng nút button cũng dc ạ
Em xin cảm ơn

 

[MuaBuiRoi]

Các bác giúp em dùng VBA để insert các dòng hàng có dữ liệu từ Sheet "TCVN" sang sheet "Lket" với ạ
Công việc của em cụ thể là
1. từ Sheet "TCVN" sheet này các cột sẽ thay đổi liên tục theo từng TCVN (lúc 1 dòng cột, lúc thì đên 100 dòng cột)
2. Sau đó em sang Sheet "LKet", nếu dòng hàng ít hơn dòng hàng bên Sheet"TCVN", thì mình sẽ insert ra dòng hàng cho đủ như bên "TCVN". Còn nếu nhiều hơn dòng hàng so với Sheet"TCVN" thì mình sẽ xóa các dòng hàng đi để cho bằng như "TCVN"

Các bác cho e giải pháp dùng VBA để nó tự động được không ạ, hoặc dùng Macro sử dụng nút button cũng dc ạ
Em xin cảm ơn

dữ liệu bạn đưa lên có 1 dòng 1 ở cả 2sheets vậy thì xóa cái gì, chỉ có 1 dòng thì sao phải xóa phải chèn,

nên đưa đủ dữ liệu để ng ta mới biết mà giúp cho chuẩn, còn đơn sơ thế này thì không hình dung ra bạn muốn gì

+ đưa đủ dữ liệu các trường hợp có thể xảy ra thực tế ở sheet TCVN
+ Sheet Lket hiện trạng

+và 1 sheet Lket -KQ mong muốn.

làm lại nhé

 

[googlehtvn]

Mình gửi lại file các pác xem thế nào . Khi sheet " TCVN" mình chọn trang 2 ở ô "C1" thì ở sheet 2 "Lket" xoá những dòng ko có giá trị và ngược lại

 

[MuaBuiRoi]

Mình gửi lại file các pác xem thế nào . Khi sheet " TCVN" mình chọn trang 2 ở ô "C1" thì ở sheet 2 "Lket" xoá những dòng ko có giá trị và ngược lại

1) tại A3 she et TCVN, công thức

=""&INDEX(A4:A5,$C$1)

copy kéo sang ngang đến hết,

2) tại she et LKet
đơn giản dùng công thức này cho ô A2 ở Lket

=""&INDEX(TCVN!$B$3:$G$3,ROW(1:1))

copy kéo xuống bao nhiêu thì tùy,

Còn kẻ khung border thì dùng conditional formatting để chỉ kẻ những ô có giá trị nhé

 

[googlehtvn]

Thanks MuaBuiRoi ! Nhưng ý mình là xoá được dòng không có giá trị đi hoặc là chèn những dòng có giá trị. Vì ở dưới bảng sheet 2 mình còn có các dòng text cố định để in .

 

[SA_DQ]

Nhưng ý mình là xoá được dòng không có giá trị đi hoặc là chèn những dòng có giá trị. Vì ở dưới bảng sheet 2 mình còn có các dòng text cố định để in .

/-)iều ước này của bạn hay ẩn đi những dòng không số liệu chỉ có thể thực hiện bằng VBA;

Mà theo mình thì cho ẩn đi số dòng không dữ liệu sẽ hay & tiên hơn.

 

[googlehtvn]

Gần giống với cái file này .Nhưng mình ko biết về VBA pác nào giúp mình với

 

[ChanhTQ@]

Gần giống với cái file này .Nhưng mình ko biết về VBA pác nào giúp mình với

Bạn cần mô tả lại là bạn cần làm gì chứ?
File này gần giống với file trên đâu cơ chứ.