ạ E muốn copy Dữ liệu từ 1 File excel này sang File excel khác bằng VBA thì

Chào bạn làm được bạn nhé, bạn có thể dùng vòng lặp hoặc sql nhé,

Bạn có thể tham khảo code mẫu trong chương 8 của khóa học nhé, bài 60.6.

Copy data từ sheet này sang sheet khác trong cùng 1 workbook e đã làm được rồi ạ. Nhưng mà em đã không làm được Copy data từ Workbook A sang Workbook B ạ.

Sub Copydata()
'Copy Excel sang Excel
Dim DongCuoi As Long
DongCuoi = Windows("D:\Cong viec\Work\BTN\To BTN\Chuan hoa ma loi BTN ver2.xlsx").Sheets(7).Range("B" & Rows.Count).End(xlUp).Row
Windows("D:\Cong viec\Work\BTN\To BTN\Chuan hoa ma loi BTN ver2.xlsx").Sheets(7).Range("D4:G" & DongCuoi).Copy Destination:=Sheets(2).Range("B6:E6")
Windows("D:\Cong viec\Work\BTN\To BTN\Chuan hoa ma loi BTN ver2.xlsx").Sheets(7).Range("L4:L4" & DongCuoi).Copy Destination:=Sheets(2).Range("O6:O6")
Windows("D:\Cong viec\Work\BTN\To BTN\Chuan hoa ma loi BTN ver2.xlsx").Sheets(7).Range("M4:M4" & DongCuoi).Copy Destination:=Sheets(2).Range("Q6:Q6")
End Sub

bạn xem chương 11 bạn nhé.

em vẫn chưa làm được ạ. E có làm theo chương 11 nhưng ko đc ạ

Bạn đang vướng phần nào nhỉ?

Dạ vâng. Em có dùng VBA để copy data từ Sheet sang Sheet trong cùng 1 Workbook thì rất oke ạ.

Nhưng mà khi copy từ Sheet1 ở WorkBook A sang Sheet 2 ở WorkBook B thì luôn bị lỗi và ko chạy hết đc code ạ

Thường khi code với workbook bạn sẽ cần chú ý:

- Viết Sheet kèm với Workbook thì phải viết dạng sheet Name chứ không phải CodeName

- Viết workbook thì cần có tên workbook kèm với loại file (như đuôi .xlsx) chứ không chỉ viết tên workbook.

Thường thì sẽ có 2 đối tượng:

- Workbook đích đến là workbook chứa code, là ThisWorkbook

- Workbook có nội dung cần lấy, là Open Workbook.

Bạn gán biến cho 2 workbook này thì khi viết sẽ đỡ bị nhầm lẫn.