Trích lọc số liệu dạng tóm lược (1 người xem)

[ramboIII]

Xin chào ACE trên GPE. Tình hình là mình có 1 file định dạng như đính kèm. Mình muốn Vlookup qua để lấy dữ liệu cho từng sheet theo từng dòng như mong muốn (mỗi sheet lấy 1 dòng dữ liệu theo màu đã tô). Nhưng khả năng sử dụng công thức của mình còn yếu kém. Mong sự giúp đỡ, mình xin cảm ơn!

 

[chuot0106]

Xin chào ACE trên GPE. Tình hình là mình có 1 file định dạng như đính kèm. Mình muốn Vlookup qua để lấy dữ liệu cho từng sheet theo từng dòng như mong muốn (mỗi sheet lấy 1 dòng dữ liệu theo màu đã tô). Nhưng khả năng sử dụng công thức của mình còn yếu kém. Mong sự giúp đỡ, mình xin cảm ơn!

Bạn giải thích kĩ hơn 1 chút được không? Có kết quả mong muốn bạn nhập bằng tay nữa càng tốt!

 

[ramboIII]

Mình bị giới hạn file tải lên rồi. Ý mình là sheet Plan SUM nó sẽ lấy tất cả các số từ Sheet 1 qua ở dòng PP Plan cho 53 Items. Sheet Actual SUM sẽ lấy các dòng Act. Production cho 53 items, Sheet Warehouse sẽ lấy từ các dòng PP-> W/H từ sheet 1 qua. Bạn có thể hình dung không? Mình ko biết làm sao để nâng quota cho file up lên nữa, bị giới hạn có 1Mb .hic

 

[chuot0106]

Mình ko biết làm sao để nâng quota cho file up lên nữa, bị giới hạn có 1Mb .hic

Bạn vào đọc topic này nhé!
http://www.giaiphapexcel.com/forum/...QT-khi-không-thể-tải-tập-tin-đính-kèm-lên-GPE

 

[ramboIII]

Số bài biết của mình ít hơn 30 bài nên chỉ đc có 1Mb à .hic

 

[siwtom]

Mình bị giới hạn file tải lên rồi. Ý mình là sheet Plan SUM nó sẽ lấy tất cả các số từ Sheet 1 qua ở dòng PP Plan cho 53 Items. Sheet Actual SUM sẽ lấy các dòng Act. Production cho 53 items, Sheet Warehouse sẽ lấy từ các dòng PP-> W/H từ sheet 1 qua. Bạn có thể hình dung không? Mình ko biết làm sao để nâng quota cho file up lên nữa, bị giới hạn có 1Mb .hic

Bạn luôn có thể đặt trên server nào đó vd. http://www.mediafire.com rồi cung cấp đường link

 

[ramboIII]

Xin cảm ơn bạn đã đóng góp, tại ở cty mình ko upload đc, để tối về nhà mình up file lên Mediafire.

 

[ramboIII]

Mình up file lên link này rồi: http://www.mediafire.com/view/u7zvdd9b2tt0c7z/Book2.xlsx bạn giúp mình nhé.

 

[ramboIII]

Xin chào mọi người, có cao nhân nào chỉ giúp mình với. Xin cảm ơn rất nhiều ạ!

 

[Ba Tê]

Xin chào ACE trên GPE. Tình hình là mình có 1 file định dạng như đính kèm. Mình muốn Vlookup qua để lấy dữ liệu cho từng sheet theo từng dòng như mong muốn (mỗi sheet lấy 1 dòng dữ liệu theo màu đã tô). Nhưng khả năng sử dụng công thức của mình còn yếu kém. Mong sự giúp đỡ, mình xin cảm ơn!

Nếu chịu dùng VBA thì tặng bạn Code này xài đỡ:
[GPECODE=vb]Public Sub GPEXI()
Dim sArr(), dArr1(), dArr2(), dArr3(), I As Long, J As Long, K As Long
With Sheet1
sArr = .Range(.[L5], .[L5].End(xlDown)).Offset(, -8).Resize(, 45).Value2
End With
ReDim dArr1(1 To UBound(sArr, 1) / 5, 1 To 34)
ReDim dArr2(1 To UBound(sArr, 1) / 5, 1 To 34)
ReDim dArr3(1 To UBound(sArr, 1) / 5, 1 To 34)
For I = 1 To UBound(sArr, 1)
If sArr(I, 1) <> Empty Then
K = K + 1
dArr1(K, 1) = K: dArr2(K, 1) = K: dArr3(K, 1) = K
dArr1(K, 2) = sArr(I, 1): dArr2(K, 2) = sArr(I, 1): dArr3(K, 2) = sArr(I, 1)
dArr1(K, 3) = sArr(I, 3): dArr2(K, 3) = sArr(I, 3): dArr3(K, 3) = sArr(I, 3)
For J = 4 To 34
dArr1(K, J) = sArr(I + 1, J + 11)
dArr2(K, J) = sArr(I + 3, J + 11)
dArr3(K, J) = sArr(I + 4, J + 11)
Next J
End If
Next I
If K Then
Sheet2.[A4].Resize(K, 34) = dArr1
Sheet3.[A4].Resize(K, 34) = dArr2
Sheet4.[A4].Resize(K, 34) = dArr3
End If
End Sub[/GPECODE]

 

[ramboIII]

Xin cảm ơn bạn nhiều, nhưng bạn có thể chỉ mình cách sử dụng Macro này không? Mình ko rành lắm.

 

[Ba Tê]

Xin cảm ơn bạn nhiều, nhưng bạn có thể chỉ mình cách sử dụng Macro này không? Mình ko rành lắm.

1/ Khi mở file nhớ Enable Macros
2/ Chọn Sheet1 xem hay chỉnh sửa
3/ Mở các Sheet2,3,4 khác là code đã lọc lại dữ liệu mới cho cả 3 Sheet bằng sự kiện Deactivate của Sheet1
4/ Muốn xem code thì ấn Alt+F11 xem trong Module và trong Sheet1
5/Chú ý chỉnh lại dữ liệu mỗi mã để có đủ 7 dòng như mã đầu tiên, nếu không kết quả "tèo".
Ví dụ:
Mã ở dòng 5-11 thì có 7 dòng
Mã ở dòng 96-102 chỉ có 6 dòng, không có dòng dòng Act.production. Dữ liệu không chuẩn sẽ gây khó.
............

 

[ramboIII]

1/ Khi mở file nhớ Enable Macros
2/ Chọn Sheet1 xem hay chỉnh sửa
3/ Mở các Sheet2,3,4 khác là code đã lọc lại dữ liệu mới cho cả 3 Sheet bằng sự kiện Deactivate của Sheet1
4/ Muốn xem code thì ấn Alt+F11 xem trong Module và trong Sheet1
5/Chú ý chỉnh lại dữ liệu mỗi mã để có đủ 7 dòng như mã đầu tiên, nếu không kết quả "tèo".
Ví dụ:
Mã ở dòng 5-11 thì có 7 dòng
Mã ở dòng 96-102 chỉ có 6 dòng, không có dòng dòng Act.production. Dữ liệu không chuẩn sẽ gây khó.
............

Cảm ơn bạn nhiều lắm! Vậy nếu mình xóa từ dòng 96 đến 113 thì code có ảnh hưởng gì không bạn. Vì 3 items đó mình cũng ko dùng đến.

 

[chuot0106]

Bạn xóa bao nhiêu dòng thì code cũng chẳng ảnh hưởng gì cả.

 

[ramboIII]

Bạn xóa bao nhiêu dòng thì code cũng chẳng ảnh hưởng gì cả.

Hiện tại mình trả giá trị tất cả các dòng về 0. Sheet2 cho kết quả sai ở dòng 55-56, sheet3 không có kết quả ở dòng 54-56, sheet 4 OK. Bạn có thể kiểm tra giúp mình không?

 

[ramboIII]

À! Mình xin lỗi, 3 dòng cuối ở các sheet mình nhầm lẫn, 3 items bị dư. Nên kết quả không chính xác. Mình sẽ hiệu chỉnh lại. Rất cảm ơn bạn đã giúp mình.