Nguyễn Thụy Tường Vy
Nguyễn Thụy Tường Vy
Thảo luận 2 thảo luận
Vỗ tay 0 vỗ tay
Lượt xem 175 lượt xem

em muốn copy dữ liệu từ sheet Mastersheet qua sheet Data Với a và b là 2 ô được

Thầy ơi, em muốn copy dữ liệu từ sheet Mastersheet qua sheet Data. Với a và b là 2 ô được nhập sau (Ví dụ muốn copy từ dùng 7 và 10). Em đã chạy thử code và dữ liệu chỉ được copy 1 hàng (hàng 7) mà không phải là từ hàng 7 - 10. Thầy có check code giúp em sai chỗ nào với ạ. 

Ngoài ra mình có code tìm duplicate không ạ ví dụ hàng trước đó đã nhập rồi thì sẽ không thêm vào nữa. 

Sub copydulieusheet1qua2()

Dim i, a, b As Integer

'khai báo bien voi a va b la row chi dinh

a = ThisWorkbook.Sheets("MasterSheet").Range("J2").Value

b = ThisWorkbook.Sheets("MasterSheet").Range("K2").Value

'B1: xac dinh dong cuoi bang template

Dim dongcuoi_template As Integer

dongcuoi_template = ThisWorkbook.Sheets("Data").Range("B" & Rows.Count).End(xlUp).Row

For i = a To b

ThisWorkbook.Sheets("Data").Range("A" & dongcuoi_template + 1 & ":AA" & dongcuoi_template + 1).Value = ThisWorkbook.Sheets("Mastersheet").Range("BC" & a & ":CB" & b).Value

Next i

End Sub

Thảo luận 2 câu trả lời
Lượt xem 175 lượt xem
Vỗ tay vỗ tay
Nguyễn Thụy Tường Vy 19:06 - Jun 24, 2021

Khi em sửa code này thành ThisWorkbook.Sheets("Mastersheet").Range("BC" & i & ":CB" & i ).Value. thì dữ liệu cũng chỉ copy 1 dòng cuối đó là dòng 10 thôi ạ

Vỗ tay vỗ tay
Nguyễn Thụy Tường Vy 08:06 - Jun 25, 2021

Chào bạn bạn xem chương 10 nhé, hoặc xem code mẫu

https://drive.google.com/file/d/1ZfKQ...

Vỗ tay vỗ tay
Câu hỏi liên quan
© 2020 - Bản quyền của Công Ty Cổ Phần Công Nghệ Giáo Dục Gitiho Việt Nam
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông