Lọc và truy vấn dữ liệu từ các sheet (1 người xem)

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

phamdinhnha

Thành viên mới
Tham gia
17/8/12
Bài viết
36
Được thích
4
Chào các anh/chị, các bạn!
Mình có 1 sheet tên là CN, nơi này là sheet tổng cần phải nhập các thông tin đầu vào, mình muốn lọc và theo dõi các dữ liệu được cập nhật trong sheet "CN" tại sheet "Tien do CN". Mình gửi kèm theo file, mong các anh chị giúp mình, cảm ơn.
 
Chào các anh/chị, các bạn!
Mình có 1 sheet tên là CN, nơi này là sheet tổng cần phải nhập các thông tin đầu vào, mình muốn lọc và theo dõi các dữ liệu được cập nhật trong sheet "CN" tại sheet "Tien do CN". Mình gửi kèm theo file, mong các anh chị giúp mình, cảm ơn.
Không hiểu gì luôn!! Bạn muốn lọc theo điều kiện nào từ CN?
 
Vâng rất cám ơn anh, ý em muốn lọc như sau:
Khi nhập thông tin ở các cột Số đăng ký, người thực hiện, ngày KT/Lấy mẫu, ngày gửi mẫu thử nghiệm (TN), ngày có kết quả thử nghiệm, ngày cấp chứng thư trong sheet "CN" thì trong sheet "Tien do CV" tự động lọc và bôi màu những Số đăng ký chưa cấp chứng thư sau 3 ngày kể từ ngày có kết quả thử nghiệm (KQTN). Em xin gửi lại file, mong anh giúp đỡ
 
Nghe có vẻ phức tạp quá, có bạn nào biết không?
 
Chào các anh/chị, các bạn!
Mình có 1 sheet tên là CN, nơi này là sheet tổng cần phải nhập các thông tin đầu vào, mình muốn lọc và theo dõi các dữ liệu được cập nhật trong sheet "CN" tại sheet "Tien do CN". Mình gửi kèm theo file, mong các anh chị giúp mình, cảm ơn.
Chào bạn!
Mình có thể làm được yêu cầu của bạn bằng công cụ add-in a-tools bạn nhé. Bạn thử tìm hiểu công cụ này của Công ty Bluesofts bạn nhé. Nhờ nó bạn sẽ làm việc này rất đơn giản bạn ạ.
Có gì không hiểu bạn có thể hỏi mình. Add skype mình là sonktpm2 bạn nhé.
Mình gửi bạn file mình làm nhé. Bạn cài add-in a-tools trước khi dùng file của mình nhé.
Rất vui nếu nó có thể giúp đỡ được bạn.
 

File đính kèm

Lần chỉnh sửa cuối:
Sau một thời gian đi công tác về lại thấy cần tiếp tục thực hiện ý muốn có 1 biểu quản lý công việc nhưng vẫn chưa làm đc, rất mong mọi người giúp đỡ. Cụ thể:
Mình có 1 file có 4 sheet là CN, GĐ, KT và Tien do CV.
Trong Sheet Tien do CV: Khi mình lựa chọn Người thực hiện và loại CV thì trong trong bảng bên dưới sẽ hiện các thông tin tương ứng với các cột (chỉ hiện các số đăng ký chưa cấp chứng thư)
VD: khi lựa chọn người thực hiện là Minh, loại CV là Chứng nhận (CN) thì các thông tin tương ứng trong sheet CN sẽ hiện ở các cột trong sheet Tien do CV
 

File đính kèm

Sau một thời gian đi công tác về lại thấy cần tiếp tục thực hiện ý muốn có 1 biểu quản lý công việc nhưng vẫn chưa làm đc, rất mong mọi người giúp đỡ. Cụ thể:
Mình có 1 file có 4 sheet là CN, GĐ, KT và Tien do CV.
Trong Sheet Tien do CV: Khi mình lựa chọn Người thực hiện và loại CV thì trong trong bảng bên dưới sẽ hiện các thông tin tương ứng với các cột (chỉ hiện các số đăng ký chưa cấp chứng thư)
VD: khi lựa chọn người thực hiện là Minh, loại CV là Chứng nhận (CN) thì các thông tin tương ứng trong sheet CN sẽ hiện ở các cột trong sheet Tien do CV

Bạn thử với code sau nhé.

Mã:
Sub Loc_HLMT()
    Dim adoConn As Object, adoRS As Object
    Set adoConn = CreateObject("ADODB.Connection")
    Set adoRS = CreateObject("ADODB.Recordset")
    With adoConn
       .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                           "Data Source=" & ThisWorkbook.FullName & _
                           ";Extended Properties=""Excel 8.0;HDR=No;IMEX=1"";"
       .Open
    End With
    With adoRS
       .ActiveConnection = adoConn
       .Open "select F2,F3,F13,F15,F16,F17 " & _
                 "from [" & Sheet2.[C3].Value & "$A9:R500] " & _
                 "where F12 ='" & Sheet2.[B4].Value & "' and F17 is null"
    End With
    With Sheet2
       .[A6:F500].ClearContents
       .[A6].CopyFromRecordset adoRS
    End With
    adoRS.Close: Set adoRS = Nothing
    adoConn.Close: Set adoConn = Nothing

End Sub
 

File đính kèm

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

Back
Top Bottom