Trích xuất và summary dữ liệu từ các sheet khác

Liên hệ QC

italian

Thành viên mới
Tham gia
28/9/07
Bài viết
4
Được thích
0
Hi all,

Mình có một câu hỏi về việc trích dữ liệu từ sheet này sang sheet khác theo điều kiện nhập vào nhờ mọi người chỉ giúp, câu hỏi này có thể đã có trên diễn đàn, nếu bị trùng thì vui lòng cho mình cai link tới thread đó nhé:

Yêu cầu như sau: có 2 sheet

- Sheet1 là các activity, được xếp theo hàng dọc là tuần, hàng ngang là các trường khác nhau của dữ liệu.
- Sheet2 la summary của sheet1, dữ liệu được trích ra theo input là week number, các cột hàng ngang sẽ được lọc tương ứng.

Mình ko thể attach ví dụ của mình vào đây nên mình chỉ mô tả ví dụ như dưới đây

- Sheet1 dữ liệu như sau
Công việc Ngày Trạng thái Ghi chú

Week1
1-Abcd 20/6 Xong xxx
2-Def 21/6 Chưa aaa

Week2
1-XYZ 16/6 Chưa &&&
2-??? 17/6 Xong bbb


- Sheet2 hiển thị như sau
Input = week number (1,2...)

Nếu week=1
Summary
1-Abcd 20/6 Xong xxx
2-Def 21/6 Chưa aaa

Nếu week=2
Summary
1-XYZ 16/6 Chưa &&&
2-??? 17/6 Xong bbb


Dữ liệu của mình phức tạp với nhiều tuần và nhiều trường hơn vd này nhiều, nhưng nếu hiểu được nguyên tắc làm vd trên thì áp dụng cho dữ liệu của mình không khó, nhờ mọi người giúp một tay nhé.

Cảm ơn mọi người nhiều lắm.

Italian

"Share to know, know to share"
 
Bạn sửa lại như sau
- Sheet1 dữ liệu như sau
Week Công việc Ngày Trạng thái Ghi chú
1-1---Abcd 20/6 Xong xxx
2-1---Def 21/6 Chưa aaa
3-2---XYZ 16/6 Chưa &&&
4-2---??? 17/6 Xong bbb
Còn lại tại Sh2 chỉ là Vlookup thôi
Bạn nên up file.
 
Cảm ơn bạn, nhân tiện bạn có thể cho mình biết câu lệnh vlookup o sheet2 như thế nào không, mình không rành mấy hàm lookup lắm.

Mình kô thể up file lên được nên phải dùng vd này

Thanks,
 
italian đã viết:
Cảm ơn bạn, nhân tiện bạn có thể cho mình biết câu lệnh vlookup o sheet2 như thế nào không, mình không rành mấy hàm lookup lắm.

Mình kô thể up file lên được nên phải dùng vd này

Thanks,
Dùng vlookkup trong cùng wb thì file sẽ to dần và nếu máy cấu hình yếu sẽ chạy chậm, giứi thiệu bạn đoạn code vlookkup từ closed wb,sau đó lấy giá trị thôi
Mã:
 Sub VlookupExCloseWb()
'D:\MyCDExcel\VBA Snippets\excel,vba,update data from closed workbooks\vlookupFromClosedWb Listed\[TABLE3DLOOKUP.xls]soktmay
'MyPath = Cells(15, 4).Value
'$H$3:$K$17
'MyAddress = Cells(16, 4).Value  

Dim MyPath As String, MyTable_Array As String
MyPath = "D:\PTC\Data\" & "[" & "2007DataBangDChieuCongNo.xls" & "]" & "Data"
MyTable_Array = "A4:H12"

With Range("D4")
        '.NumberFormat = "General"
        .NumberFormat = "#,##0"
        .Formula = _
            "=VLOOKUP(C1-1,'" & MyPath & "'!" & MyTable_Array & ",7,0)"
        .Value = .Value
End With

With Range("D5")
        '.NumberFormat = "General"
        .NumberFormat = "#,##0"
        .Formula = _
            "=VLOOKUP(C1,'" & MyPath & "'!" & MyTable_Array & ",4,0)"
        .Value = .Value
End With

End Sub
 
chào các bác!
Em có 1 câu hỏi mong các bác chỉ giáo:
Các bác hãy xem attach file.Em có 1 bảng ở Sheet1,em muốn sắp xếp lại theo thứ tự như ở Sheet2 mà ko bít làm thế nào cho nhanh
 

File đính kèm

Web KT

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

Back
Top Bottom