Code đánh dữ liệu từ sheet này sang sheet khác

[DungMD]

Tôi có 1 file thế này
- Sheet A là sheet điền
-Sheet B là sheet nhập
(Ảnh là sheet B)

Code của tôi khi bấm nhập Button3_Click() từ Sheet B vào Sheet A như sau

Private Sub CommandButton3_Click()


Dim dong_cuoi As Long
dong_cuoi = SheetA.Range("P100000").End(xlUp).Row + 1

SheetB.Range("C14:Q38").Copy
SheetA.Range("C" & dong_cuoi).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

Chỉ là code bình thường và vẫn chạy, Tuy nhiên tôi muốn hỏi cách nào chỉ hàng có dữ liệu để chuyển từ B sang A hay không ?
Trong trường hợp dưới ảnh, tôi chỉ cần dòng bôi đỏ chạy, những dòng trống giá trị ở cột P không được nhảy
Có Bác nào tư vấn giúp tôi vấn đề này được không ?

View attachment 261306

 

[Hoàng Tuấn 868]

Bạn có thể gửi file ví dụ lên được không?

 

[VetMini]

...Có Bác nào tư vấn giúp tôi vấn đề này được không ? ( Sorry nếu code lởm của tôi làm các bác khó chịu ))

Code không làm tôi khó chịu. Nhưng cái từ tiếng Tây nó làm tôi khó chịu.

Cách dễ nhất là cứ biệc copy hết. Xong duyệt lại, những dòng không cần thì xóa.

 

[SA_DQ]

Tôi có 1 file thế này. . .
Chỉ là code bình thường và vẫn chạy, Tuy nhiên tôi muốn hỏi cách nào chỉ hàng có dữ liệu để chuyển từ B sang A hay không ?
Trong trường hợp dưới ảnh, tôi chỉ cần dòng bôi đỏ chạy, những dòng trống giá trị ở cột P không được nhảy
Có Bác nào tư vấn giúp tôi vấn đề này được không ? ( Sorry nếu code lởm của tôi làm các bác khó chịu ))

Có vài khái niệm lạ, như "chỉ cần dòng bôi đỏ chạy" & "những dòng trống giá trị ở cột P không được nhảy"

Code đánh dữ liệu từ sheet này sang sheet khác​

 

[DungMD]

Bạn có thể gửi file ví dụ lên được không?

Đây là file của tôi

Bài đã được tự động gộp: 26/6/21

Code không làm tôi khó chịu. Nhưng cái từ tiếng Tây nó làm tôi khó chịu.

Cách dễ nhất là cứ biệc copy hết. Xong duyệt lại, những dòng không cần thì xó

Ồ xin lỗi đã làm bác khó chịu, việc copy sang và chọn dòng có giá trị có mục đích riêng, vì file A có dữ liệu lớn và không thể mỗi lần copy và lọc xóa blank được bác

Bài đã được tự động gộp: 26/6/21

Có vài khái niệm lạ, như "chỉ cần dòng bôi đỏ chạy" & "những dòng trống giá trị ở cột P không được nhảy"

Code đánh dữ liệu từ sheet này sang sheet khác​

Tôi học võ từ bé, lại ưa bạo lực nên bị bệnh nghề nghiệp đó bác )

 

[Hoàng Tuấn 868]

Đây là file của tôi

Bạn tham khảo .

 

[Maika8008]

Có vài khái niệm lạ, như "chỉ cần dòng bôi đỏ chạy" & "những dòng trống giá trị ở cột P không được nhảy"

Code đánh dữ liệu từ sheet này sang sheet khác​

Tôi học võ từ bé, lại ưa bạo lực nên bị bệnh nghề nghiệp đó bác )

À! Chỗ tôi mà như thế thì người ta gọi là "oánh dữ liệu từ sheet này sang sheet khác"

 

[SA_DQ]

Chắc cũng giống như hành vi ăn cắp được gọi là tiêu cực chứ gì? & như thế đâu phạm luật hình sự.

 

[DungMD]

Bạn tham khảo .

Hoàn hảo quá, tôi cảm ơn Anh rất nhiều !

Bài đã được tự động gộp: 26/6/21

À! Chỗ tôi mà như thế thì người ta gọi là "oánh dữ liệu từ sheet này sang sheet khác"

Mấy người học tiến sỹ bên tôi thường thay "đánh " bằng cụm " tác động một lực tương tối vào vật thể xác định " ...

 

[VetMini]

Mấy người học tiến sỹ bên tôi thường thay "đánh " bằng cụm " tác động một lực tương tối vào vật thể xác định " ...

Dóc.
Vậy mấy kẻ học tiến sỹ ấy chúng "tác động một lực tương tối vào con số từ 1 đến 99" để đánh số đề?

Ủa mà con số không phải là "vật thể xác định"
Vậy thì "tác động một lực tương tối vào một mẩu giấy 7x9" để đánh bài?

 

[DungMD]

Dóc.
Vậy mấy kẻ học tiến sỹ ấy chúng "tác động một lực tương tối vào con số từ 1 đến 99" để đánh số đề?

ồ không, khi đánh số đề họ dùng cụm từ: " Sử dụng vật- ngang giá chung để trao đổi hàng hóa và dịch vụ "- áp dụng cùng phương pháp xác suất thống kê trong toán học để nhân bản vật chất

Bài đã được tự động gộp: 26/6/21

thanks bạn

 

[Yennhi041199]

Cho e hỏi em có 1 bảng chấm công em muốn tạo nút lưu tháng cũ đã chấm sang sheet mới .de sheet cũ em chấm công tháng mới. Ai có thể cho e xin code ko ạ

 

[HUONGHCKT]

Cho e hỏi em có 1 bảng chấm công em muốn tạo nút lưu tháng cũ đã chấm sang sheet mới .de sheet cũ em chấm công tháng mới. Ai có thể cho e xin code ko ạ

bạn phải có file mẫu thì mới nhanh có người giúp.

 

[Yennhi041199]

Giúp giùm em với ạ. Cho e xin code ạ

Bài đã được tự động gộp: 1/7/21

bạn phải có file mẫu thì mới nhanh có người giúp.

Bài đã được tự động gộp: 1/7/21

Ai giúp giùm mình tạo 1 nút lưu châm công tháng cũ sang sheet mới đồng thời tại sheet cũ xoá những dữ liệu chấm công cũ để châm tháng mới với ạ . Cho e xin code với ạ

 

[HUONGHCKT]

Giúp giùm em với ạ. Cho e xin code ạ

Bài đã được tự động gộp: 1/7/21

Bài đã được tự động gộp: 1/7/21

Ai giúp giùm mình tạo 1 nút lưu châm công tháng cũ sang sheet mới đồng thời tại sheet cũ xoá những dữ liệu chấm công cũ để châm tháng mới với ạ . Cho e xin code với ạ

Góp vui tý, nếu còn quan tâm. hãy thử xem.
P/S Khi copy sang sheet mói tôi đã đổi tên Sh mới là T và số tháng ở ô K6 sh Chấm công. Sh Chấm công sễ xóa sạch dữ liệu từ C10 : AL29

 

[Yennhi041199]

Góp vui tý, nếu còn quan tâm. hãy thử xem.
P/S Khi copy sang sheet mói tôi đã đổi tên Sh mới là T và số tháng ở ô K6 sh Chấm công. Sh Chấm công sễ xóa sạch dữ liệu từ C10 : AL29

Cái

Góp vui tý, nếu còn quan tâm. hãy thử xem.
P/S Khi copy sang sheet mói tôi đã đổi tên Sh mới là T và số tháng ở ô K6 sh Chấm công. Sh Chấm công sễ xóa sạch dữ liệu từ C10 : AL29

em cảm ơn nhiều e lam được rồi nè, cho em hỏi thêm chút nữa thoi nha. Là em muốn xoá đư liệu nhưng vẫn dữ côg thức tổng hợp ngày công thì thêm code gì ạ . Hic e ko ràh vba mong giúp đỡ ạ

 

[HUONGHCKT]

Cái

em cảm ơn nhiều e lam được rồi nè, cho em hỏi thêm chút nữa thoi nha. Là em muốn xoá đư liệu nhưng vẫn dữ côg thức tổng hợp ngày công thì thêm code gì ạ . Hic e ko ràh vba mong giúp đỡ ạ

Thay vì xóa từ C10:AL29 bạn thay bằng C10:AG29 trong code là được

 

[Yennhi041199]

Thay vì xóa từ C10:AL29 bạn thay bằng C10:AG29 trong code là được

Em cảm ơn nhieu nha e làm dc ròi. Hỏi trên này các anh trả lời có tâm quá e cảm ơn nhiều may sao tìm đc diễn đàn này