Xin hướng dẫn về code vba thay thế cho hàm vlookup

Liên hệ QC

boy_cn_hb

Thành viên mới
Tham gia
3/1/12
Bài viết
11
Được thích
1
Em có 1 file exel.
Hiện tại em muốn ở sheet "XUAT VO", khi mình thay thế ngày tháng ở ô D2, thì dữ liệu sẽ nhảy vào các ô dưới giống như khi mình sử dụng hàm VLOOKUP.
Em để nguyên hàm VLOOKUP cho các bác dễ nhìn.
Mong các cao nhân giúp đỡ!
 

File đính kèm

  • 2 LỆNH SX ÉP 2020 macro.xlsm
    1.6 MB · Đọc: 21
Chỉnh sửa lần cuối bởi điều hành viên:
Em có 1 file exel.
Hiện tại em muốn ở sheet "XUAT VO", khi mình thay thế ngày tháng ở ô D2, thì dữ liệu sẽ nhảy vào các ô dưới giống như khi mình sử dụng hàm vloopup.
Em để nguyên hàm vloopup cho các bác dễ nhìn.
Mong các cao nhân giúp đỡ
Bạn chạy code sau thử và cho ý kiến nhé:

Mã:
Sub LocDL_HLMT()
    With CreateObject("ADODB.Connection")
        .Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.FullName & ";Extended Properties=""Excel 12.0;HDR=NO"""
        Sheet3.Range("K5").CopyFromRecordset .Execute("Select F9,'','',F11,F15,F13,F46 From [DON HANG$] Where F9 = #" & Sheet3.Range("D2") & "#")
    End With
End Sub
 
Upvote 0
Gởi @boy_cn_hb
Mặc dù Mod @leonguyenz sửa chính tả cho bạn ở bài 1 hàm viết sai VLOOPUP, nhưng bạn cũng phải lưu ý để lần sau viết cẩn thận hơn. Ngoài ra khi admin @Hai Lúa Miền Tây và 1 thành viên khác nhắc bạn thì bạn lại phản ứng.
Viết đầy đủ, không viết tắt đó là văn hoá của diễn đàn, là tôn trọng người đọc, viết đúng chính tả chứng tỏ con người cẩn thận, nên các thành viên mới nhắc. Vậy mà bạn không tiếp thu và cũng không tự sửa chữa. Mong bạn lưu ý lần sau
 
Upvote 0
Code củ chuối cho người mới tìm hiểu VBA
 

File đính kèm

  • 3 LỆNH SX ÉP 2020 macro.xlsm
    1.7 MB · Đọc: 7
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom