Sửa giúp code của ado này

[buivankiet]

Trên diễn đàn có thí dụ về lấy dữ liệu từ file excel bằng ado, tôi có up file lên .xin hỏi
- code trong nut lệnh "insert ado " co gì sai mà nó cứ báo lỗi ( tôi có tạo file c:\ado dest.xls )
- trong nút lệnh " example 2", các bạn có thể sửa cho sourcerange là "a1:c5 " thành "vdl" ( vdl là name tôi đặt cho "a1:c5" ) hay dùng biến là số hàng của "vdl". Vì khi áp dụng thực tế khi file nguồn lớn, nếu khai báo số hàng trong sourcerange quá lớn thì máy chạy rất chậm, còn khai báo ít thì sợ sau này không đủ cho " vdl". ( "vdl" của file nguồn tự động lớn lên khi dữ liệu được cập nhật ).
Cám ơn trước

 

[muontennguoikhac]

Trong đó có ghi rõ rồi mà:

Note if you want to use a named range in the code instead of a range leave the second argument
"SourceSheet" empty if you want to copy a workbook level name.

Như vậy bạn để SourceSheet là

GetData ThisWorkbook.Path & "\test.xls", "", _
"VDL", Sheets("Sheet1").Range("A1"), True, False