chèn thêm câu lệnh "where f1 is not null" trong câu lệnh (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

NguyenthiH

Thành viên mới đăng ký
Tham gia
11/12/16
Bài viết
965
Được thích
175
Giới tính
Nữ
Em có câu lệnh này trong file:
Mã:
Sub LocKhongTrung3Cot()
    
    'Xoa du lieu cu
    ClearOld
    
    'Lap danh sach duy nhat moi
    With CreateObject("ADODB.Connection")
        .Open ("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.FullName & ";Extended Properties=""Excel 12.0;HDR=No""")
       Sheets("List Meterial").Range("E4").CopyFromRecordset .Execute("Select f1,f2,f11 From [MR Issue$E2:O] Group by f1,f2,f11 ")
    End With

End Sub
vì dữ liệu không đập vào E4 mà đập vào E5(có dong trống ở trên (E4), và Anh giúp em nói thêm câu lệnh "Where f1 is not null" vào, mà em không rành code nên chả biết thêm vào chổ nào.
Mong các anh chị giúp đỡ.
 
Web KT

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

Back
Top Bottom