Lọc dữ liệu có điều kiện (1 người xem)

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

thunga25

Thành viên hoạt động
Tham gia
12/5/12
Bài viết
118
Được thích
8
Mình có file excel này: mình nhập vào sheet ALL: chi tiết tất cả các nhân viên, sau đó mình chia ra cho mỗi nhân viên 1 sheet, mình muốn lọc từ sheet ALL tên nhân viên trùng với tên sheet thì thông tin của nhân viên đó sẽ được lọc ra ở sheet tên của họ.
Chi tiết các bạn xem file đính kèm rồi xem cho mình với!
Mình có file mẫu của họ nhưng khổng hiểu để áp dụng vào bài của mình, các bạn xem thử rồi giúp mình với!(Sheet ALL của họ là XLNV, gần cuối). đường dẫn đây ạ:
http://www.mediafire.com/download/7g3dhpco5agegcw/file+mau.rar
 

File đính kèm

Lần chỉnh sửa cuối:
Mình có file excel này: mình nhập vào sheet ALL: chi tiết tất cả các nhân viên, sau đó mình chia ra cho mỗi nhân viên 1 sheet, mình muốn lọc từ sheet ALL tên nhân viên trùng với tên sheet thì thông tin của nhân viên đó sẽ được lọc ra ở sheet tên của họ.
Chi tiết các bạn xem file đính kèm rồi xem cho mình với!
Mình có file mẫu của họ nhưng khổng hiểu để áp dụng vào bài của mình, các bạn xem thử rồi giúp mình với!(Sheet ALL của họ là XLNV, gần cuối). đường dẫn đây ạ:
http://www.mediafire.com/download/7g3dhpco5agegcw/file+mau.rar
Có ai xem được 2 sheet 1 lúc đâu. Tạo 2 sheet thôi. Bạn xem ý tưởng trong file
Ps: lần đâu tiên mình dùng công thức để lọc. Nên chắc thấy gớm lắm. Các anh em chuyên công thức xem và góp ý giúp nhé.
 

File đính kèm

Lần chỉnh sửa cuối:
nhưng đó chỉ xem được 1 sheet chi tiết thôi, bạn xem file mẫu trên đường dẫn mình đưa đó, họ làm mấy sheet cũng được hết, bạn xem thử rồi giúp mình với, hình như họ dựa vào tên sheet chứ không phải vào cái tên trên C2 đó thì phải.
 
Lần chỉnh sửa cuối:
nhưng đó chỉ xem được 1 sheet chi tiết thôi, bạn xem file mẫu trên đường dẫn mình đưa đó, họ làm mấy sheet cũng được hết, bạn xem thử rồi giúp mình với, hình như họ dựa vào tên sheet chứ không phải vào cái tên trên C2 đó thì phải.
Thì đương nhiên là làm bao nhiêu sheet mà không được chứ, nhưng có cần thiết vậy không? Vì tại ô C2 thay đổi tên NV thì bạn sẽ có dữ liệu cần rồi mà. Nhiều sheet sẽ nặng file rồi chạy như rùa đấy.
 
Dạ tại vì em cần phải làm 1 sheet quản lý những người đó(từ mỗi sheet của mỗi người) nữa, còn sheet ALL đó dùng để nhập từng ngày vào. Anh làm chi tiết từng sheet cho em với
 
Dạ tại vì em cần phải làm 1 sheet quản lý những người đó(từ mỗi sheet của mỗi người) nữa, còn sheet ALL đó dùng để nhập từng ngày vào. Anh làm chi tiết từng sheet cho em với
Bạn xem file. Nếu đúng ý muốn thì nhân bản sheet ra, đổi tên sheet cho đúng tên NV
 

File đính kèm

Anh Quang Hải ơi vẫn chưa được anh nak, cái sheet NAM mình bấm tên NAM thì cả 2 sheet NAM và THANH chạy thông tin của NAM luôn.Anh xem em với. Bên Filter với macro có giúp được gì không anh?
 
Anh Quang Hải ơi vẫn chưa được anh nak, cái sheet NAM mình bấm tên NAM thì cả 2 sheet NAM và THANH chạy thông tin của NAM luôn.Anh xem em với. Bên Filter với macro có giúp được gì không anh?
Nếu bạn biết xài macro thì mọi chuyện đơn giản hơn nhiều
 

File đính kèm

Đúng ý em rồi anh nak, cảm ơn anh nhiều. Nhưng a giải thích cho em mấy câu macro ở sub loc() với,
"Sub loc()[IV1] = [B4]
[IV2] = ActiveSheet.Name
Sheets("ALL").[A4:G10000].AdvancedFilter 2, [IV1:IV2], [A4:G4]
Range([A5], [A65536].End(3)).Value = [row(a:a)]
End Sub
"
nhất là cái này: "[IV1] = [B4]
[IV2] = ActiveSheet.Name"
Tại em chỉ nghe nói đến macro chứ ko hiểu rõ, với lại nếu mình muốn thêm 1 người mới,và thêm sheet mới thì phải làm sao a? e hỏi ngu nhiều quá, a thông cảm nha.
hay a có teaviewer không?a làm thao tác mẫu cho e thấy được không?
Mong a giúp em với
 
Đúng ý em rồi anh nak, cảm ơn anh nhiều. Nhưng a giải thích cho em mấy câu macro ở sub loc() với,
"Sub loc()[IV1] = [B4]
[IV2] = ActiveSheet.Name
Sheets("ALL").[A4:G10000].AdvancedFilter 2, [IV1:IV2], [A4:G4]
Range([A5], [A65536].End(3)).Value = [row(a:a)]
End Sub
"
nhất là cái này: "[IV1] = [B4]
[IV2] = ActiveSheet.Name"
Tại em chỉ nghe nói đến macro chứ ko hiểu rõ, với lại nếu mình muốn thêm 1 người mới,và thêm sheet mới thì phải làm sao a? e hỏi ngu nhiều quá, a thông cảm nha.
hay a có teaviewer không?a làm thao tác mẫu cho e thấy được không?
Mong a giúp em với
Muốn thêm nhân viên thì cứ nhân bản sheet của NV nào đó, và đổi tên sheet thì code tự hiểu
Code kiểu gì mình cũng xử được nhưng không có thói quen giải thích qua mạng đâu.
Tự xử đi, code quá đơn giản mà.
 
hehe. chắc tối e mang sách vở qua nhà, a chỉ giáo cho e vài đường nha &&&%$R
à cho em hỏi câu ni với anh: em thêm 1 người nữa vào sheet ALL, chèn 1 sheet nữa đúng tên với nguòi mới nhập nhưng nó báo lỗi The extract range has a missing or ilegal field name. Xong rồi nó màu vàng ở dòng:Sheets("ALL").[A4:G10000].AdvancedFilter 2, [IV1:IV2], [A4:G4]
ở sheet e mới tạo e đã có "Option Explicit" rồi
Anh bày em làm sao thêm người vào danh sách và thêm 1 sheet mới mà OK e với
 
Lần chỉnh sửa cuối:
hehe. chắc tối e mang sách vở qua nhà, a chỉ giáo cho e vài đường nha &&&%$R
à cho em hỏi câu ni với anh: em thêm 1 người nữa vào sheet ALL, chèn 1 sheet nữa đúng tên với nguòi mới nhập nhưng nó báo lỗi The extract range has a missing or ilegal field name. Xong rồi nó màu vàng ở dòng:Sheets("ALL").[A4:G10000].AdvancedFilter 2, [IV1:IV2], [A4:G4]
ở sheet e mới tạo e đã có "Option Explicit" rồi
Anh bày em làm sao thêm người vào danh sách và thêm 1 sheet mới mà OK e với
đơn giản thôi mà xem file nha... Voc diết sẽ ngộ ra một điều...
 

File đính kèm

Sao bạn thêm được vậy?mình cũng thêm 1 tên ở sheet ALL, sau đó insert theem1 sheet mới và đổi tên nó thành tên y bên sheet ALL, mà vẫn bị lỗi. Bạn biết thì chỉ mình với.
 
Sao bạn thêm được vậy?mình cũng thêm 1 tên ở sheet ALL, sau đó insert theem1 sheet mới và đổi tên nó thành tên y bên sheet ALL, mà vẫn bị lỗi. Bạn biết thì chỉ mình với.
Anh ở bài #12 làm dùm cho đó.. chứ mình cũng đâu có biết
 
anh ởi em ở Đà nẵng anh nak, tiếc quá.Em đã thêm 1 tên ở sheet ALL, sau đó insert thêm1 sheet mới và đổi tên nó thành tên y bên sheet ALL, mà vẫn bị lỗi.
Vì làm sai nên mới ra cớ sự. Mình nói là nhân bản từ sheet có sẵn cơ mà.
Nếu insert sheet mới thì phải copy dòng tiêu đề dán vào đúng dòng giống như các sheet kia nhá người ơi.
 
Vì làm sai nên mới ra cớ sự. Mình nói là nhân bản từ sheet có sẵn cơ mà.
Nếu insert sheet mới thì phải copy dòng tiêu đề dán vào đúng dòng giống như các sheet kia nhá người ơi.
Xin lỗi vì em làm anh nổi cáu, nhưng em làm theo hướng dẫn của anh nó vẫn không được. Mong anh giúp đỡ
 

File đính kèm

Lần chỉnh sửa cuối:
khi bạn mở file mình, có 2 cái sheet màu đỏ đã có dữ liệu chưa?chứ em thêm 2 cái sheet dó nó có được đâu?
Thì bạn chỉ mình cách thao tác đi. Ví dụ: đầu tiên thêm tên vào sheet ALL, sau đó .......Mình copy hay insert 1 sheet mới, dổi tên sheet đó thành tên mới thêm.rứa mà bị lỗi.
 
Lần chỉnh sửa cuối:
Xin lỗi vì em làm anh nổi cáu, nhưng em làm theo hướng dẫn của anh nó vẫn không được. Mong anh giúp đỡ
Lần này nữa mà không xong thì để mình mua vé máy bay ra ĐN chỉ cho hén
Khi bị lỗi, bạn bấm chọn End.
Bạn nhìn tại dòng số 4, cột A. Tại A4 bạn nhập là STT, mọi chuyện xong rồi hén.
Không được thì mở team view lên nhá.
 
Hihi.Nhập STT ở cột A4 thì được anh nak, vì răng rứa anh hè?răng anh không nói trước phải nhập STT????không tý nữa thì anh phải mất công 1 chuyến ra ĐN rồi.Cảm ơn anh nhiều nghe.Mà anh siêu thật,hjhj.Chắc cái gì anh cũng biết nhỉ -+*/.
Àh mà có cách nào khắc phục không cần nhập STT mà vẫn ra kết quả không anh?!$@!!
 
Hihi.Nhập STT ở cột A4 thì được anh nak, vì răng rứa anh hè?răng anh không nói trước phải nhập STT????không tý nữa thì anh phải mất công 1 chuyến ra ĐN rồi.Cảm ơn anh nhiều nghe.Mà anh siêu thật,hjhj.Chắc cái gì anh cũng biết nhỉ -+*/.
Àh mà có cách nào khắc phục không cần nhập STT mà vẫn ra kết quả không anh?!$@!!
Nếu muốn thì cái gì cũng được. Không muốn thì không được.
Đối với mình thì không có gì là khó. Mà khó quá thì ...bỏ.
 
sặc. rứa anh chỉ em làm cách nào để STT không cần phải nhập hả anh?anh chỉ giúp em nhé!
Chỉ thế này thôi.
PHP:
Sub loc()
Sheets("ALL").[A4:G4].Copy [A4]
[IV1] = [B4]: [IV2] = ActiveSheet.Name
Sheets("ALL").[A4:G10000].AdvancedFilter 2, [IV1:IV2], [A4:G4]
Range([A5], [A65536].End(3)).Value = [row(a:a)]
End Sub
 
Đã OK. em cảm ơn anh Quang Hải nhiều nhiều, @$@!^% .Sau này gì thắc mắc em có thể hỏi anh tiếp không ạ?anh đừng cáu vì mấy cái hỏi ngu của em hi
 
Em có 1 vấn đề nữa là: bài bữa trước anh làm cho em đó, khi mình kích vô sheet của từng người(tên cá nhân) thì nó mới lọc dữ liệu từ sheet ALL sang sheet từng cá nhân, nhưng giờ em muốn khi mình thêm 1 dòng dữ liệu trong sheet ALL mà trùng tên với dữ liệu đã có thì nó tự động lọc luôn chứ không cần phải bấm chọn vô sheet của tên đó nữa.
Anh xem file đính kèm em với ạ.
Trong đó có sheet THỐNG KÊ, là sheet thống kê từ những sheet tên cá nhân đó anh nak
 

File đính kèm

Em có 1 vấn đề nữa là: bài bữa trước anh làm cho em đó, khi mình kích vô sheet của từng người(tên cá nhân) thì nó mới lọc dữ liệu từ sheet ALL sang sheet từng cá nhân, nhưng giờ em muốn khi mình thêm 1 dòng dữ liệu trong sheet ALL mà trùng tên với dữ liệu đã có thì nó tự động lọc luôn chứ không cần phải bấm chọn vô sheet của tên đó nữa.
Anh xem file đính kèm em với ạ.
Trong đó có sheet THỐNG KÊ, là sheet thống kê từ những sheet tên cá nhân đó anh nak
Kiên nhẫn chờ đáp án từ các bạn khác nhé, vì yêu cầu của bạn vượt xa khả năng của mình rồi.
Thân.
 
Em ở tphcm nè anh. Em có thể hẹn cafe với anh được không ạ -\\/.
P/s: Ngồi tìm lại những bài viết của anh muốn lòi con mắt luôn à
Những người biết VBA ở khu vực TPHCM cũng khá nhiều. Bạn muốn OffLine để chia sẻ kiến thức VBA thì cứ lên tiếng mời mọi người vào 1 ngày giờ cụ thể và cho địa điểm, chắc chắn sẽ có vài anh em tham gia.

Bạn tìm gì mà muốn lòi con mắt vậy? Mà sao lại chen ngang vào chỗ này? Không khéo bài bị xóa mất thôi vì vi phạm nội quy diễn đàn rồi.
 
Chả là em đang muốn tìm lại những chia sẻ của anh về những code báo cáo từ ngày đến ngày, dựa vào nhiều điều kiện. Ví dụ như thẻ kho, hay tổng hợp nhập xuất tồn..
 

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

Back
Top Bottom