THỐNG KÊ DỮ LIỆU DỰA VÀO NHIỀU ĐIỀU KIỆN. (3 người xem)

Liên hệ QC

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

Đang trực tuyến: 1 (Thành viên: 0, Khách: 1)
huonglien1901

huonglien1901

GPE là ngôi nhà thứ 2 của tôi!!!
Tham gia
17/4/16
Bài viết
2,701
Được thích
2,434
Giới tính
Nam
Nghề nghiệp
Nhân viên kỹ thuật in ấn
Chào mọi người!

Em có file này có những vấn đề nhờ mọi người hỗ trợ.
Sheet NEGATIVE STOCK: Lọc Cột SKU QUANLITY ở sheet GPE nhỏ hơn 0(<0) rồi copy hết dữ liệu qua sheet NEGATIVE.
Lọc cột WEIGH/SKU giá trị nhỏ hơn 0, Chọn cột ARTICLE STATUS là số 3 và số 5, Chọn cột CEXTdùng hàm MID(CEXT,3,2) để lấy ra mã quầy 05 rồi copy dữ liệu qua sheet NEGATIVE ở ví trí kế tiếp.(Lấy cả tên tiêu đê)
Sheet F3,F5 H.STOCK: Lọc cột SKU QUANLITY ở sheet GPE giá trị lớn hơn 0(>0),Chọn cột ARTICLE STATUS là số 3 và 5,Chọn cột CEXT dùng hàm MID(CEXT,3,2) để lấy ra mã quầy 04 rồi copy dữ liệu qua sheet F3,F5 H.STOCK (kể cả tên tiêu đề
Sheet HIGH STOCK: Lọc SKU QUANLITY các giá trị từ cao đến thấp.
Ở tiêu đề TOP 100 CHẠY THEO SỐ LƯỢNG.
DÙNG HÀM MID(CEXT,3,2) bỏ mã quầy 03,05, rồi copy 100 dòng rồi dán vào ô D3 ở sheet HIGH STOCK.
ở tiêu đề TOP 100 CHẠY THEO GIÁ TRỊ
Lọc cột STock Cost Value các giá trị từ cao đến thấp, dùng hàm mid(CEXT,3,2) bỏ mã quầy 03,05, rồi copy 100 dòng dán vào ô d106 của sheet HIGH STOCK.
Sheet SAOA: cột K(SUPPLIER CODE): dò kết quả bên sheet Oderdass dựa vào điều kiện cột BARCODE., Nếu dữ liệu không tìm thấy vần giữ định dạng lỗi #NA.
Cột L(SUPPLIER NAME): dò kết quả bên sheet Oderdass dựa vào điều kiện cột BARCODE., Nếu dữ liệu không tìm thấy vần giữ định dạng lỗi #NA.
Cột M(STOCK): dựa vào kết quả ơt cột SKU QUANLITY dựa vào điều kiện Cột BARCODE.(ở sheet GPE)
Nếu không tìm thấy thì tìm dựa vào Cột CODE(ở sheet GPE) để tìm.
Nếu không tìm thấy thì vẫn giữ định dạng lỗi #NA.
Cột N(Awating): dựa vào kết quả bên sheet Awating dùng hàm sumif để tính dựa vào điều kiện cột BARCODE.
Sheet SAOA STOCK AVAILBLE: Chọn cột STOCK bên Sheet SAOA các giá trị lớn hơn 0. rồi copy tất cả dữ rồi dán vào sheet SAOA STOCK AVAILBLE ở ô A2.
Sheet SAOA NON STOCK: Chọn cột STOCK bên Sheet SAOA các giá trị bằng 0 rồi copy tất cả dữliệu rồi dán vào sheet SAOA NON STOCK ở ô A2.
Chọn cột STOCK (ở sheet SAOA) là các giá trị lỗi #NA, rồi copy dán vào sheet SAOA NON STOCKở dòng kế tiếp.
Sheet Ruptute: dùng công thức dò bên sheet SAOA kết hợp Sheet GPE :(Vlookup(Cột BARCODE,(ở sheet GPE),bảng dò (kết quả ở cột E(FGR),3,0) rôi lọc lấy những giá trị là số rồi copy tất cả dữ liệu thảo mãn vào sheet RUPTURE(lấy cả tên tiêu đề)
Em cảm ơn mọi người nhiều|~!
 
Lần chỉnh sửa cuối:
Sắp xếp theo thời gian sắp xếp theo bầu chọn
huonglien1901 đã viết:
Chào mọi người!

Em có file này có những vấn đề nhờ mọi người hỗ trợ.
Sheet NEGATIVE STOCK: Lọc Cột SKU QUANLITY ở sheet GPE nhỏ hơn 0(<0) rồi copy hết dữ liệu qua sheet NEGATIVE.
Lọc cột WEIGH/SKU giá trị nhỏ hơn 0, Chọn cột ARTICLE STATUS là số 3 và số 5, Chọn cột CEXTdùng hàm MID(CEXT,3,2) để lấy ra mã quầy 05 rồi copy dữ liệu qua sheet NEGATIVE ở ví trí kế tiếp.(Lấy cả tên tiêu đê)
Sheet F3,F5 H.STOCK: Lọc cột SKU QUANLITY ở sheet GPE giá trị lớn hơn 0(>0),Chọn cột ARTICLE STATUS là số 3 và 5,Chọn cột CEXT dùng hàm MID(CEXT,3,2) để lấy ra mã quầy 04 rồi copy dữ liệu qua sheet F3,F5 H.STOCK (kể cả tên tiêu đề
Sheet HIGH STOCK: Lọc SKU QUANLITY các giá trị từ cao đến thấp.
Ở tiêu đề TOP 100 CHẠY THEO SỐ LƯỢNG.
DÙNG HÀM MID(CEXT,3,2) bỏ mã quầy 03,05, rồi copy 100 dòng rồi dán vào ô D3 ở sheet HIGH STOCK.
ở tiêu đề TOP 100 CHẠY THEO GIÁ TRỊ
Lọc cột STock Cost Value các giá trị từ cao đến thấp, dùng hàm mid(CEXT,3,2) bỏ mã quầy 03,05, rồi copy 100 dòng dán vào ô d106 của sheet HIGH STOCK.
Sheet SAOA: cột K(SUPPLIER CODE): dò kết quả bên sheet Oderdass dựa vào điều kiện cột BARCODE., Nếu dữ liệu không tìm thấy vần giữ định dạng lỗi #NA.
Cột L(SUPPLIER NAME): dò kết quả bên sheet Oderdass dựa vào điều kiện cột BARCODE., Nếu dữ liệu không tìm thấy vần giữ định dạng lỗi #NA.
Cột M(STOCK): dựa vào kết quả ơt cột SKU QUANLITY dựa vào điều kiện Cột BARCODE.(ở sheet GPE)
Nếu không tìm thấy thì tìm dựa vào Cột CODE(ở sheet GPE) để tìm.
Nếu không tìm thấy thì vẫn giữ định dạng lỗi #NA.
Cột N(Awating): dựa vào kết quả bên sheet Awating dùng hàm sumif để tính dựa vào điều kiện cột BARCODE.
Sheet SAOA STOCK AVAILBLE: Chọn cột STOCK bên Sheet SAOA các giá trị lớn hơn 0. rồi copy tất cả dữ rồi dán vào sheet SAOA STOCK AVAILBLE ở ô A2.
Sheet SAOA NON STOCK: Chọn cột STOCK bên Sheet SAOA các giá trị bằng 0 rồi copy tất cả dữliệu rồi dán vào sheet SAOA NON STOCK ở ô A2.
Chọn cột STOCK (ở sheet SAOA) là các giá trị lỗi #NA, rồi copy dán vào sheet SAOA NON STOCKở dòng kế tiếp.
Sheet Ruptute: dùng công thức dò bên sheet SAOA kết hợp Sheet GPE :(Vlookup(Cột BARCODE,(ở sheet GPE),bảng dò (kết quả ở cột E(FGR),3,0) rôi lọc lấy những giá trị là số rồi copy tất cả dữ liệu thảo mãn vào sheet RUPTURE(lấy cả tên tiêu đề)
Em cảm ơn mọi người nhiều|~!
Nhấp chuột vào đây để mở rộng...
Đọc hoa cả mắt mà chưa chắc đã hiểu.
Tải file về mở ra lại càng "chẳng hiểu".
Híc!
 
Upvote 0
Ba Tê đã viết:
Mở file chẳng có sheet nào liên quan. Ví dụ sheet NEGATIVE STOCK ? sheet NEGATIVE.? .... Một đống sheet "ma" nữa.
Nhấp chuột vào đây để mở rộng...
Em gửi nhầm file Bác ơi, file của em 13M làm sao gủi lên diễn đàn đây Bác?
Bác chi em gửi file với.
 
Upvote 0
huonglien1901 đã viết:
Em gửi nhầm file Bác ơi, file của em 13M làm sao gủi lên diễn đàn đây Bác?
Bác chi em gửi file với.
Nhấp chuột vào đây để mở rộng...
Đúng là..... Đọc file thấy "trớt quớt"
Mỗi sheet chỉ chừa khoảng vài chục dòng mẫu đủ các tình huống thôi, kết quả làm thủ công cũng chỉ khoảng 100 dòng thôi, để chi mỗi sheet mấy chục ngàn dòng cho nặng file.
Những sheet nào không liên quan đến công việc thì xóa đi. Chừng nào code chạy ổn thì áp dụng vào file thật của bạn.
Nén file trước khi gởi cũng nhẹ được 1 phần.
 
Upvote 0
Ba Tê đã viết:
Đúng là..... Đọc file thấy "trớt quớt"
Mỗi sheet chỉ chừa khoảng vài chục dòng mẫu đủ các tình huống thôi, kết quả làm thủ công cũng chỉ khoảng 100 dòng thôi, để chi mỗi sheet mấy chục ngàn dòng cho nặng file.
Những sheet nào không liên quan đến công việc thì xóa đi. Chừng nào code chạy ổn thì áp dụng vào file thật của bạn.
Nén file trước khi gởi cũng nhẹ được 1 phần.
Nhấp chuột vào đây để mở rộng...
em gửi Bác lại file sau khi Bác đưa ra lời khuyên cho em.
Chúc Bác ngày vui.
 

File đính kèm

Upvote 0
huonglien1901 đã viết:
em gửi Bác lại file sau khi Bác đưa ra lời khuyên cho em.
Chúc Bác ngày vui.
Nhấp chuột vào đây để mở rộng...
Làm từ từ thôi nhé, nhiều quá "chóng mặt lắm".
Kiểm tra 2 chuyện này trên dữ liệu thật
Sheet NEGATIVE STOCK: Lọc Cột SKU QUANLITY ở sheet GPE nhỏ hơn 0(<0) rồi copy hết dữ liệu qua sheet NEGATIVE.
Lọc cột WEIGH/SKU giá trị nhỏ hơn 0, Chọn cột ARTICLE STATUS là số 3 và số 5, Chọn cột CEXTdùng hàm MID(CEXT,3,2) để lấy ra mã quầy 05 rồi copy dữ liệu qua sheet NEGATIVE ở ví trí kế tiếp.(Lấy cả tên tiêu đê)
Nhấp chuột vào đây để mở rộng...
PHP: 
Public Sub Negative()
Dim sArr(), dArr(), I As Long, J As Long, K As Long, R As Long
With Sheets("GPE")
    sArr = .Range("A2", .Range("A2").End(xlDown)).Resize(, 18).Value
    R = UBound(sArr): ReDim dArr(1 To R, 1 To 18)
End With
For I = 2 To R
    If sArr(I, 11) < 0 Then
        K = K + 1
        For J = 1 To 17
            dArr(K, J) = sArr(I, J)
        Next J
    End If
Next I
K = K + 2
For J = 1 To 18
    dArr(K, J) = sArr(1, J)
Next J
For I = 2 To R
    If sArr(I, 12) < 0 Then
        If sArr(I, 7) = "3" Or sArr(I, 7) = "5" Then
            If Mid(sArr(I, 2), 3, 2) = "05" Then
                K = K + 1
                For J = 1 To 18
                    dArr(K, J) = sArr(I, J)
                Next J
            End If
        End If
    End If
Next I
With Sheets("Stock Negative")
    .Range("A3:A1000").Resize(, 18).ClearContents
    .Range("A3").Resize(K, 18) = dArr
End With
End Sub
 
Upvote 0
Ba Tê đã viết:
Làm từ từ thôi nhé, nhiều quá "chóng mặt lắm".
Kiểm tra 2 chuyện này trên dữ liệu thật

PHP: 
Public Sub Negative()
Dim sArr(), dArr(), I As Long, J As Long, K As Long, R As Long
With Sheets("GPE")
    sArr = .Range("A2", .Range("A2").End(xlDown)).Resize(, 18).Value
    R = UBound(sArr): ReDim dArr(1 To R, 1 To 18)
End With
For I = 2 To R
    If sArr(I, 11) < 0 Then
        K = K + 1
        For J = 1 To 17
            dArr(K, J) = sArr(I, J)
        Next J
    End If
Next I
K = K + 2
For J = 1 To 18
    dArr(K, J) = sArr(1, J)
Next J
For I = 2 To R
    If sArr(I, 12) < 0 Then
        If sArr(I, 7) = "3" Or sArr(I, 7) = "5" Then
            If Mid(sArr(I, 2), 3, 2) = "05" Then
                K = K + 1
                For J = 1 To 18
                    dArr(K, J) = sArr(I, J)
                Next J
            End If
        End If
    End If
Next I
With Sheets("Stock Negative")
    .Range("A3:A1000").Resize(, 18).ClearContents
    .Range("A3").Resize(K, 18) = dArr
End With
End Sub
Nhấp chuột vào đây để mở rộng...
Tại vì em đưa thiếu yêu cầu là: nên code Bác Lọc cột SKU nhỏ hơn 0 và lấy mã quầy 05 luôn, em muốn không lấy mã quầy 05 khi cột ARTICLE STATUS là 1.
Và em muốn những dòng lấy ra gộp chung với nhau luôn không tách tiêu đề ra. và có thể sắp sếp từ nhỏ đến lớn luôn Bác dựa vào cột CEXT sử dụng hàm MID(CEXT,7,3) để lấy mã 410,420,430,......590.
Em cảm ơn Bác nhiều.
 
Upvote 0
huonglien1901 đã viết:
Tại vì em đưa thiếu yêu cầu là: nên code Bác Lọc cột SKU nhỏ hơn 0 và lấy mã quầy 05 luôn, em muốn không lấy mã quầy 05 khi cột ARTICLE STATUS là 1.
Và em muốn những dòng lấy ra gộp chung với nhau luôn không tách tiêu đề ra. và có thể sắp sếp từ nhỏ đến lớn luôn Bác dựa vào cột CEXT sử dụng hàm MID(CEXT,7,3) để lấy mã 410,420,430,......590.
Em cảm ơn Bác nhiều.
Nhấp chuột vào đây để mở rộng...
Nói rõ lại đi. không hiểu. Yêu cầu rõ ràng từng câu, từng chữ. Thiếu hoài ai chịu được.
 
Upvote 0
Ba Tê đã viết:
Nói rõ lại đi. không hiểu.]
code Bác lấy luôn mã quầy 05 luôn khi cột ARTICLE STATUS là 1:
Giờ em muốn không lấy mã quầy 05 khi cột ARTICLE STATUS là 1:
và em muốn sắp xếp giống như hình vậy Anh: dựa vào cột CEXT(trên sheet GPE) dùng hàm MID(CEXT,7,3) để lấy ra các mã này 410,420...............(Hình ảnh trong hình là em ví dụ cho Bác hiểu)
Như trong hình đó Bác.
upload_2017-6-14_10-49-23.png
Nhấp chuột vào đây để mở rộng...
 
Upvote 0
"Giờ em muốn không lấy mã quầy 05 khi cột ARTICLE STATUS là 1:"
Vẫn là kiểu lấp lững, cái gì cũ thì không nhắc nữa. Phải nói rõ lại yêu cầu:
Có phải như vầy không"
1/
"Lọc Cột SKU QUANLITY ở sheet GPE nhỏ hơn 0(<0), rồi copy hết dữ liệu qua sheet NEGATIVE.
Nhưng: Nếu cột Article Status là 1 và Mid(cột CEXT,3,2) ="05" thì không lấy."
2/ Gì gì đó cho rõ, không nhắc chuyện cũ. Tự tôi biết yêu cầu mới khác cũ chỗ nào.
 
Upvote 0
Ba Tê đã viết:
"Giờ em muốn không lấy mã quầy 05 khi cột ARTICLE STATUS là 1:"
Vẫn là kiểu lấp lững, cái gì cũ thì không nhắc nữa. Phải nói rõ lại yêu cầu:
Có phải như vầy không"
1/
"Lọc Cột SKU QUANLITY ở sheet GPE nhỏ hơn 0(<0), rồi copy hết dữ liệu qua sheet NEGATIVE.
Nhưng: Nếu cột Article Status là 1 và Mid(cột CEXT,3,2) ="05" thì không lấy."
2/ Gì gì đó cho rõ, không nhắc chuyện cũ.
Nhấp chuột vào đây để mở rộng...
Dạ đúng rồi Bác ơi. Có như vậy mà em diễn đạt khó nữa.
 
Upvote 0
huonglien1901 đã viết:
Dạ đúng rồi Bác ơi. Có như vậy mà em diễn đạt khó nữa.
Nhấp chuột vào đây để mở rộng...
PHP: 
Public Sub Negative()
Dim sArr(), dArr(), I As Long, J As Long, K As Long, R As Long
With Sheets("GPE")
    sArr = .Range("A2", .Range("A2").End(xlDown)).Resize(, 18).Value
    R = UBound(sArr): ReDim dArr(1 To R, 1 To 18)
End With
For I = 2 To R
    If sArr(I, 11) < 0 Then
        If Not (sArr(I, 7) = "1" And Mid(sArr(I, 2), 3, 2) = "05") Then
            K = K + 1
            For J = 1 To 17
                dArr(K, J) = sArr(I, J)
            Next J
            dArr(K, 2) = Mid(sArr(I, 2), 7, 3)
        End If
    End If
Next I
For I = 2 To R
    If sArr(I, 12) < 0 Then
        If sArr(I, 7) = "3" Or sArr(I, 7) = "5" Then
            If Mid(sArr(I, 2), 3, 2) = "05" Then
                K = K + 1
                For J = 1 To 18
                    dArr(K, J) = sArr(I, J)
                Next J
                dArr(K, 2) = Mid(sArr(I, 2), 7, 3)
            End If
        End If
    End If
Next I
With Sheets("Stock Negative")
    .Range("A3:A1000").Resize(, 18).ClearContents
    .Range("A3").Resize(K, 18) = dArr
    .Range("A3").Resize(K, 18).Sort Key1:=.Range("B3")
End With
End Sub
 
Upvote 0
Ba Tê đã viết:
PHP: 
Public Sub Negative()
Dim sArr(), dArr(), I As Long, J As Long, K As Long, R As Long
With Sheets("GPE")
    sArr = .Range("A2", .Range("A2").End(xlDown)).Resize(, 18).Value
    R = UBound(sArr): ReDim dArr(1 To R, 1 To 18)
End With
For I = 2 To R
    If sArr(I, 11) < 0 Then
        If Not (sArr(I, 7) = "1" And Mid(sArr(I, 2), 3, 2) = "05") Then
            K = K + 1
            For J = 1 To 17
                dArr(K, J) = sArr(I, J)
            Next J
            dArr(K, 2) = Mid(sArr(I, 2), 7, 3)
        End If
    End If
Next I
For I = 2 To R
    If sArr(I, 12) < 0 Then
        If sArr(I, 7) = "3" Or sArr(I, 7) = "5" Then
            If Mid(sArr(I, 2), 3, 2) = "05" Then
                K = K + 1
                For J = 1 To 18
                    dArr(K, J) = sArr(I, J)
                Next J
                dArr(K, 2) = Mid(sArr(I, 2), 7, 3)
            End If
        End If
    End If
Next I
With Sheets("Stock Negative")
    .Range("A3:A1000").Resize(, 18).ClearContents
    .Range("A3").Resize(K, 18) = dArr
    .Range("A3").Resize(K, 18).Sort Key1:=.Range("B3")
End With
End Sub
Nhấp chuột vào đây để mở rộng...
code Bác ra đúng rồi Bác ơi, Còn những câu hỏi trên Bác hỗ trợ giúp em với.
Em chúc Bác ngày vui.
 
Upvote 0
huonglien1901 đã viết:
code Bác ra đúng rồi Bác ơi, Còn những câu hỏi trên Bác hỗ trợ giúp em với.
Em chúc Bác ngày vui.
Nhấp chuột vào đây để mở rộng...
Muốn tiếp tục thì giải thích rõ yêu cầu làm từng sheet.
Tiếp tục với sheet "F3,F5 H.Stock" thế nào?
Tiêu đề thì copy từ GPE qua 1 lần đầu.
Các cột nào muốn dạng Text thì format trước là Text, muốn Number thì format trước 1 lần.
PHP: 
Public Sub F3_F5()
Dim sArr(), dArr(), I As Long, J As Long, K As Long, R As Long
With Sheets("GPE")
    sArr = .Range("A2", .Range("A2").End(xlDown)).Resize(, 18).Value
    R = UBound(sArr): ReDim dArr(1 To R, 1 To 18)
End With
For I = 2 To R
    If sArr(I, 11) > 0 Then
        If sArr(I, 7) = "3" Or sArr(I, 7) = "5" Then
            If Mid(sArr(I, 2), 3, 2) = "04" Then
                K = K + 1
                For J = 1 To 18
                    dArr(K, J) = sArr(I, J)
                Next J
                dArr(K, 2) = Mid(sArr(I, 2), 3, 2)
            End If
        End If
    End If
Next I
With Sheets("F3,F5 H.Stock")
    .Range("A3:A1000").Resize(, 18).ClearContents
    .Range("A3").Resize(K, 18) = dArr
    .Range("A3").Resize(K, 18).Sort Key1:=.Range("B3")
End With
End Sub
 
Upvote 0
Ba Tê đã viết:
Muốn tiếp tục thì giải thích rõ yêu cầu làm từng sheet.
Tiếp tục với sheet "F3,F5 H.Stock" thế nào?
Tiêu đề thì copy từ GPE qua 1 lần đầu.
Các cột nào muốn dạng Text thì format trước là Text, muốn Number thì format trước 1 lần.
PHP: 
Public Sub F3_F5()
Dim sArr(), dArr(), I As Long, J As Long, K As Long, R As Long
With Sheets("GPE")
    sArr = .Range("A2", .Range("A2").End(xlDown)).Resize(, 18).Value
    R = UBound(sArr): ReDim dArr(1 To R, 1 To 18)
End With
For I = 2 To R
    If sArr(I, 11) > 0 Then
        If sArr(I, 7) = "3" Or sArr(I, 7) = "5" Then
            If Mid(sArr(I, 2), 3, 2) = "04" Then
                K = K + 1
                For J = 1 To 18
                    dArr(K, J) = sArr(I, J)
                Next J
                dArr(K, 2) = Mid(sArr(I, 2), 3, 2)
            End If
        End If
    End If
Next I
With Sheets("F3,F5 H.Stock")
    .Range("A3:A1000").Resize(, 18).ClearContents
    .Range("A3").Resize(K, 18) = dArr
    .Range("A3").Resize(K, 18).Sort Key1:=.Range("B3")
End With
End Sub
Nhấp chuột vào đây để mở rộng...
Dạ Bác ơi giờ em đi làm tối em về mới trả lời cho bác được. Thông cảm cho em nhé!
Chúc Bác ngày vui.
 
Upvote 0
Ba Tê đã viết:
Muốn tiếp tục thì giải thích rõ yêu cầu làm từng sheet.
Tiếp tục với sheet "F3,F5 H.Stock" thế nào?
Tiêu đề thì copy từ GPE qua 1 lần đầu.
Các cột nào muốn dạng Text thì format trước là Text, muốn Number thì format trước 1 lần.
PHP: 
Public Sub F3_F5()
Dim sArr(), dArr(), I As Long, J As Long, K As Long, R As Long
With Sheets("GPE")
    sArr = .Range("A2", .Range("A2").End(xlDown)).Resize(, 18).Value
    R = UBound(sArr): ReDim dArr(1 To R, 1 To 18)
End With
For I = 2 To R
    If sArr(I, 11) > 0 Then
        If sArr(I, 7) = "3" Or sArr(I, 7) = "5" Then
            If Mid(sArr(I, 2), 3, 2) = "04" Then
                K = K + 1
                For J = 1 To 18
                    dArr(K, J) = sArr(I, J)
                Next J
                dArr(K, 2) = Mid(sArr(I, 2), 3, 2)
            End If
        End If
    End If
Next I
With Sheets("F3,F5 H.Stock")
    .Range("A3:A1000").Resize(, 18).ClearContents
    .Range("A3").Resize(K, 18) = dArr
    .Range("A3").Resize(K, 18).Sort Key1:=.Range("B3")
End With
End Sub
Nhấp chuột vào đây để mở rộng...
Em xin lỗi Bác giờ mới trả lời cho Bác được.Em muốn cột CODE, BARCODE, LÀ TEXT,
Cột SKU QUANLITY, WEIGH/SKU,
Purchase Stock Value ,Stock Cost Value , Sales Stock Value là number,
nhờ Bác sửa giúp em không lấy mã quầy 05 khi cột ARTICLE STATUS là 5. Bác ơi vẫn lấy ra mã quầy 410.......như sheet NEGATIVE STOCK đó Bác và sắp xếp từ thấp đến cao.

Em cảm ơn Bác nhiều!
 
Upvote 0
huonglien1901 đã viết:
Em xin lỗi Bác giờ mới trả lời cho Bác được.Em muốn cột CODE, BARCODE, LÀ TEXT,
Cột SKU QUANLITY, WEIGH/SKU,
Purchase Stock Value ,Stock Cost Value , Sales Stock Value là number,
nhờ Bác sửa giúp em không lấy mã quầy 05 khi cột ARTICLE STATUS là 5. Bác ơi vẫn lấy ra mã quầy 410.......như sheet NEGATIVE STOCK đó Bác và sắp xếp từ thấp đến cao.

Em cảm ơn Bác nhiều!
Nhấp chuột vào đây để mở rộng...
- Bạn có đọc hiểu câu này không?
"Tiêu đề thì copy từ GPE qua 1 lần đầu.
Các cột nào muốn dạng Text thì format trước là Text, muốn Number thì format trước 1 lần."
- Tôi từng nói là: "không nhắc chuyện cũ, không so sánh cái cũ". Từng phần phải giải thích rõ của riêng phần đó thôi
- Lại là sửa. "nhờ Bác sửa giúp em không lấy mã quầy 05 khi cột ARTICLE STATUS là 5"
- Sau này bạn nên ghi rõ, đúng tên tiêu đề cột, ví dụ cột "CEXT", tôi có biết "mã quầy" là cột nào.

"Sheet F3,F5 H.STOCK: Lọc cột SKU QUANLITY ở sheet GPE giá trị lớn hơn 0(>0),Chọn cột ARTICLE STATUS là số 3 và 5,Chọn cột CEXT dùng hàm MID(CEXT,3,2) để lấy ra mã quầy 04 rồi copy dữ liệu qua sheet F3,F5 H.STOCK" Làm gì có mã "05"?
 
Lần chỉnh sửa cuối:
Upvote 0
Ba Tê đã viết:
- Bạn có đọc hiểu câu này không?
"Tiêu đề thì copy từ GPE qua 1 lần đầu.
Các cột nào muốn dạng Text thì format trước là Text, muốn Number thì format trước 1 lần."
- Tôi từng nói là: "không nhắc chuyện cũ, không so sánh cái cũ". Từng phần phải giải thích rõ của riêng phần đó thôi
- Lại là sửa. "nhờ Bác sửa giúp em không lấy mã quầy 05 khi cột ARTICLE STATUS là 5"
Nhấp chuột vào đây để mở rộng...
Dạ em đã hiểu ý Bác rồi.
do trong quá trình làm việc có vấn đề phát sinh nên em nhờ Bác sửa code, em muốn không lấy mã quầy 05 khi cột ARTICLE STATUS là 3,5.
với sheet HIGH STOCK:
Sheet HIGH STOCK: Lọc SKU QUANLITY các giá trị từ cao đến thấp.
Ở tiêu đề TOP 100 CHẠY THEO SỐ LƯỢNG.
DÙNG HÀM MID(CEXT,3,2) bỏ mã quầy 03,05, rồi copy 100 dòng rồi dán vào ô D3 ở sheet HIGH STOCK.
ở tiêu đề TOP 100 CHẠY THEO GIÁ TRỊ
Lọc cột STock Cost Value các giá trị từ cao đến thấp, dùng hàm mid(CEXT,3,2) bỏ mã quầy 03,05, rồi copy 100 dòng dán vào ô d106 của sheet HIGH STOCK.
Em cảm ơn Bác nhiều.
P/s: Bác đừng giân em mong Bác thông cảm cho em.
 
Upvote 0
Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.
Web KT

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

B
Xin hướng dẫn cách để hàm Xlookup tự hiển thị theo số dòng có chứa điều kiện tìm kiếm ko dùng VBA (4 người xem)
Trả lời
4
Đọc
58
thuytrangbp28
T
S
NHỜ ANH EM GIÚP MÌNH TÌM KIẾM DỮ LIỆU (4 người xem)
Trả lời
12
Đọc
126
sangdennh
S
H
chuyển dữ liệu từ 1 dòng thành nhiều dòng, (3 người xem)
Trả lời
9
Đọc
61
hanhnguyen12022021
H
DinhManh1307
Cách thống kê công việc sản xuất từng người để tính lương sản phẩm (3 người xem)
Trả lời
14
Đọc
215
DinhManh1307
DinhManh1307
T
tìm ra số tháng mà lượng hàng nhập ban đầu sử dụng hết
Trả lời
1
Đọc
49
bebo021999
B
V
Help: Hàm đếm lọc giá trị trùng
Trả lời
12
Đọc
75
DeTong
D
C
Filter có điều kiện đang ở dạng Cột (1 người xem)
Trả lời
2
Đọc
56
thuytrangbp28
T
L
Có ai biết fix lỗi này không ạ
    • Buồn
Trả lời
2
Đọc
48
lekimhuy0812
L
tonny jj
Lập hàm thể hiện số công lệnh của ngày đi công tác
Trả lời
5
Đọc
170
Gà Công Nghệ
Gà Công Nghệ
GPE-Trợ Lý
[GPE] TALKSHOW KHÁM PHÁ SỨC MẠNH HÀM FILTER TRONG EXCEL 365
    • Thích
Trả lời
1
Đọc
3K
PhanTuHuong
PhanTuHuong
K
Lỗi cấu trúc hình ảnh khi mở file bằng điện thoại
Trả lời
0
Đọc
37
Kecodonlalala
K
N
  • Question Question
Nhờ mọi người góp ý cho file Quản lý bán hàng viết bằng VBA đầu tay của mình
    • Cảm ơn
    • Thích
Trả lời
7
Đọc
163
newbiexo
N
H
Xin được trợ giúp lỗi máy không mở được cửa sổ VBE.
Trả lời
3
Đọc
67
Nguyễn Duy Tuân
Nguyễn Duy Tuân
HeSanbi
  • Question Question
Sự khác nhau giữa book.Worksheets và book.Sheets trong Application
    • Thích
Trả lời
2
Đọc
145
Nguyễn Duy Tuân
Nguyễn Duy Tuân
PhanTuHuong
Hà Nội hẹn hò gặp gỡ đầu năm 2025 thôi :)
    • Thích
    • Yêu thích
Trả lời
7
Đọc
333
PhanTuHuong
PhanTuHuong
yeudoi
Cà phê giao lưu cùng thành viên kỳ cựu Cao Mạnh Sơn 19h 23/2/2025
    • Thích
    • Yêu thích
Trả lời
1
Đọc
76
PhanTuHuong
PhanTuHuong
K
Làm sao để ô excel hiển thị tên nhưng khi nhấp vào thì đó là công thức
Trả lời
1
Đọc
53
pycckuu410
P
Nguyễn Duy Tuân
Phiên bản mới Add-in A-Tools v10 (2024)
    • Thích
2 3
Trả lời
41
Đọc
3K
Nguyễn Duy Tuân
Nguyễn Duy Tuân
ongke0711
  • Question Question
Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba (3 người xem)
    • Thích
    • Yêu thích
    • Cảm ơn
15 16 17
Trả lời
326
Đọc
25K
pycckuu410
P
V
  • Question Question
Đếm xếp loại của đơn hàng
Trả lời
8
Đọc
240
vanlinh_2904
V
Xem thêm…

Thành viên có số lượng bài viết cao nhất tháng

Thành viên có điểm tương tác cao nhất tháng

Đếm ngược thời gian

000
Ngày
00
Giờ
00
phút
00
giây
TALKSHOW KHÁM PHÁ SỨC MẠNH HÀM FILTER TRONG EXCEL 365
Back
Top Bottom