Dò tìm giá trị tương ứng với 2 điều kiện

Tham gia ngày
8 Tháng sáu 2007
Bài viết
623
Thích
351
Điểm
735
Tuổi
33
#1
Em có 2 bảng excel kết xuất từ phần mềm kế toán.
+bảng 1 là Sheet NXT-300617; chứa dữ liệu phát sinh chi tiết theo mã hàng
+bảng 2 là Sheet Kho; chứa dữ liệu tồn cuối theo mã hàng và theo mã kho (trình bày theo dạng tiêu đề ngang và dọc)
Em muốn dò lấy mã kho nằm ở tiều đề ngang của bảng 2 sang bảng 1. (tương ứng với từng mã hàng và tồn cuối )
Chi tiết em đã trình bày trong file gửi kèm
Rất mong anh chị giúp em
Em xin cảm ơn
 

File đính kèm

Tham gia ngày
22 Tháng ba 2008
Bài viết
3,393
Thích
5,825
Điểm
100
#2
Em có 2 bảng excel kết xuất từ phần mềm kế toán.
+bảng 1 là Sheet NXT-300617; chứa dữ liệu phát sinh chi tiết theo mã hàng
+bảng 2 là Sheet Kho; chứa dữ liệu tồn cuối theo mã hàng và theo mã kho (trình bày theo dạng tiêu đề ngang và dọc)
Em muốn dò lấy mã kho nằm ở tiều đề ngang của bảng 2 sang bảng 1. (tương ứng với từng mã hàng và tồn cuối )
Chi tiết em đã trình bày trong file gửi kèm
Rất mong anh chị giúp em
Em xin cảm ơn
Thử:
PHP:
F9=LOOKUP(2,1/(OFFSET(Kho!$B$2:$T$2,MATCH($C9,Kho!$A$3:$A$100,0),)=$M9),Kho!$B$2:$T$2)
Chỉ Enter rồi fill xuống

Chúc em ngày vui.
 

Ba Tê

Cạo Luôn Khỏi Gội
Tham gia ngày
5 Tháng năm 2009
Bài viết
9,989
Thích
13,959
Điểm
1,560
Tuổi
59
#3
Em có 2 bảng excel kết xuất từ phần mềm kế toán.
+bảng 1 là Sheet NXT-300617; chứa dữ liệu phát sinh chi tiết theo mã hàng
+bảng 2 là Sheet Kho; chứa dữ liệu tồn cuối theo mã hàng và theo mã kho (trình bày theo dạng tiêu đề ngang và dọc)
Em muốn dò lấy mã kho nằm ở tiều đề ngang của bảng 2 sang bảng 1. (tương ứng với từng mã hàng và tồn cuối )
Chi tiết em đã trình bày trong file gửi kèm
Rất mong anh chị giúp em
Em xin cảm ơn
Bạn chạy thử Sub này coi sao
PHP:
Public Sub S_GPE()
Dim sArr(), Arr1(), Arr2(), tArr(), R1 As Long, R2 As Long, I As Long, J As Long, N As Long
sArr = Sheet1.Range("C9", Sheet1.Range("C9").End(xlDown)).Value
    R1 = UBound(sArr)
    ReDim Arr1(1 To R1, 1 To 1)
    ReDim Arr2(1 To R1, 1 To 1)
tArr = Sheet2.Range("A2", Sheet2.Range("A2").End(xlDown)).Resize(, 20).Value
    R2 = UBound(tArr)
    For I = 1 To R1
        For N = 2 To R2
            If tArr(N, 1) = sArr(I, 1) Then
                For J = 2 To 20
                    If tArr(N, J) > 0 Then
                        Arr1(I, 1) = tArr(1, J)
                        Arr2(I, 1) = tArr(N, J)
                    End If
                Next J
                Exit For
            End If
        Next N
    Next I
Sheet1.Range("F9").Resize(R1) = Arr1
Sheet1.Range("M9").Resize(R1) = Arr2
End Sub
 
Tham gia ngày
8 Tháng sáu 2007
Bài viết
623
Thích
351
Điểm
735
Tuổi
33
#4
Thử:
PHP:
F9=LOOKUP(2,1/(OFFSET(Kho!$B$2:$T$2,MATCH($C9,Kho!$A$3:$A$100,0),)=$M9),Kho!$B$2:$T$2)
Chỉ Enter rồi fill xuống

Chúc em ngày vui.
Đêm qua em cứ loay hoay với hàm lookup, rồi cũng sang dùng Offset, rồi Index với Match (Nhưng mà chưa biết phối hợp) Nên khi gà nó gáy đến tận canh 3, mà vẫn không ra, đành phải xoay sang dùng cột phụ để giải. Rồi đi ngủ, nhưng vẫn không ngon vì không giải được theo hàm mà không cần đến cột phụ.
Hôm nay nhận được bài giải và cũng là bài dạy của anh em thực sự rất vui. Em cảm ơn anh nhiều
Chúc anh ngày vui
 
Tham gia ngày
8 Tháng sáu 2007
Bài viết
623
Thích
351
Điểm
735
Tuổi
33
#5
Bạn chạy thử Sub này coi sao
PHP:
Public Sub S_GPE()
Dim sArr(), Arr1(), Arr2(), tArr(), R1 As Long, R2 As Long, I As Long, J As Long, N As Long
sArr = Sheet1.Range("C9", Sheet1.Range("C9").End(xlDown)).Value
    R1 = UBound(sArr)
    ReDim Arr1(1 To R1, 1 To 1)
    ReDim Arr2(1 To R1, 1 To 1)
tArr = Sheet2.Range("A2", Sheet2.Range("A2").End(xlDown)).Resize(, 20).Value
    R2 = UBound(tArr)
    For I = 1 To R1
        For N = 2 To R2
            If tArr(N, 1) = sArr(I, 1) Then
                For J = 2 To 20
                    If tArr(N, J) > 0 Then
                        Arr1(I, 1) = tArr(1, J)
                        Arr2(I, 1) = tArr(N, J)
                    End If
                Next J
                Exit For
            End If
        Next N
    Next I
Sheet1.Range("F9").Resize(R1) = Arr1
Sheet1.Range("M9").Resize(R1) = Arr2
End Sub
Em cảm ơn anh nhiều. Code chạy đúng như em muốn (loại được cả mã hàng tồn = 0). Thật tuyệt /-*+/
 
Lần chỉnh sửa cuối:
Tham gia ngày
22 Tháng ba 2008
Bài viết
3,393
Thích
5,825
Điểm
100
#6
Đêm qua em cứ loay hoay với hàm lookup, rồi cũng sang dùng Offset, rồi Index với Match (Nhưng mà chưa biết phối hợp) Nên khi gà nó gáy đến tận canh 3, mà vẫn không ra, đành phải xoay sang dùng cột phụ để giải. Rồi đi ngủ, nhưng vẫn không ngon vì không giải được theo hàm mà không cần đến cột phụ.
Hôm nay nhận được bài giải và cũng là bài dạy của anh em thực sự rất vui. Em cảm ơn anh nhiều
Chúc anh ngày vui
Trước đây, khi tiếp xúc với 'Mảng' anh và nhiều anh em khác cũng từng bị 'khổ sở' vì 'người đẹp huyền bí' này.

Chào mừng em gia nhập vào fan 'người đẹp huyền bí': "Mảng"

Từ từ qua các bài học em sẽ 'kiểm soát' được nó thôi, cứ nghiên cứu cách thức lấy 'Mảng' trong công thức của tụi anh gửi lên, so sánh, đối chiếu cho các trường hợp em sớm sẽ nhận ra 'chân dung mỹ miều' của nó.

Chúc em ngày vui.
:):):)
 
Tham gia ngày
8 Tháng sáu 2007
Bài viết
623
Thích
351
Điểm
735
Tuổi
33
#7
Trước đây, khi tiếp xúc với 'Mảng' anh và nhiều anh em khác cũng từng bị 'khổ sở' vì 'người đẹp huyền bí' này.

Chào mừng em gia nhập vào fan 'người đẹp huyền bí': "Mảng"

Từ từ qua các bài học em sẽ 'kiểm soát' được nó thôi, cứ nghiên cứu cách thức lấy 'Mảng' trong công thức của tụi anh gửi lên, so sánh, đối chiếu cho các trường hợp em sớm sẽ nhận ra 'chân dung mỹ miều' của nó.

Chúc em ngày vui.
:):):)
Vâng!. Ngoài vẻ đẹp huyền ảo; người đẹp này đôi khi còn sở hữu 1 chiều cao ; chiều sâu tư duy đến nỗi các anh em mới tiếp xúc; gặp gỡ làm quen phải mất ăn mất ngủ vì "Mảng"
Còn với anh quocgiacan thì em nào có tên là "Mảng" đều đã là bồ nhí của anh rồi phải hông anh nhỉ^^^^
 
Tham gia ngày
22 Tháng ba 2008
Bài viết
3,393
Thích
5,825
Điểm
100
#8
Vâng!. Ngoài vẻ đẹp huyền ảo; người đẹp này đôi khi còn sở hữu 1 chiều cao ; chiều sâu tư duy đến nỗi các anh em mới tiếp xúc; gặp gỡ làm quen phải mất ăn mất ngủ vì "Mảng"
Còn với anh quocgiacan thì em nào có tên là "Mảng" đều đã là bồ nhí của anh rồi phải hông anh nhỉ^^^^
Không dám đâu em!

Mấy 'cô đẹp' thì mấy anh như: thầy @ndu96081631, anh @huuthang_bd, @eke_rula , @HieuCD, @bebo021999 'chọn làm bồ nhí' hết rồi, cũng 'xứng đôi vừa lứa' thôi em! anh chỉ an phận thủ thường, nhặt các 'em' còn lại.

Chúc em ngày thiệt vui.
/-*+//-*+//-*+/
 

Đỗ Tú Anh

Thành viên tiêu biểu
Tham gia ngày
17 Tháng mười 2017
Bài viết
538
Thích
351
Điểm
85
#9
Trước đây, khi tiếp xúc với 'Mảng' anh và nhiều anh em khác cũng từng bị 'khổ sở' vì 'người đẹp huyền bí' này.
Ối giời ơi,........... sợ quá......................................................................................................................................................... Ủa, đôi dép đâu mất rồi ta???
 

PacificPR

Thành viên tích cực
Tham gia ngày
12 Tháng tư 2017
Bài viết
1,114
Thích
1,697
Điểm
360
#10
Đêm qua em cứ loay hoay với hàm lookup, rồi cũng sang dùng Offset, rồi Index với Match (Nhưng mà chưa biết phối hợp) Nên khi gà nó gáy đến tận canh 3, mà vẫn không ra, đành phải xoay sang dùng cột phụ để giải. Rồi đi ngủ, nhưng vẫn không ngon vì không giải được theo hàm mà không cần đến cột phụ.
Hôm nay nhận được bài giải và cũng là bài dạy của anh em thực sự rất vui. Em cảm ơn anh nhiều
Chúc anh ngày vui
Mày mò đến tận canh ba mà nó vẫn ... vẫn không ra -\\/. Ghê thật ....
 

Đỗ Tú Anh

Thành viên tiêu biểu
Tham gia ngày
17 Tháng mười 2017
Bài viết
538
Thích
351
Điểm
85
#11
Không dám đâu em!
Mấy 'cô đẹp' thì mấy anh như: thầy @ndu96081631, anh @huuthang_bd, @eke_rula , @HieuCD, @bebo021999 'chọn làm bồ nhí' hết rồi, cũng 'xứng đôi vừa lứa' thôi em! anh chỉ an phận thủ thường, nhặt các 'em' còn lại.
Chúc em ngày thiệt vui.
/-*+//-*+//-*+/
Àh, vậy ra là bạn nhiều "bồ nhí" (=các em còn lại) hơn mọi người à nha. Đào hoa gớm, không sợ bị vợ đánh ghen à??? Mà hỏi thiệt nghen, cung phụng nổi mấy em đó không vậy??? Hôm nào đẹp trời mấy ẻm "tặng" cho chục "cặp sừng" mà đeo để còn lấy le với thiên hạ nữa chứ (fun only:p. Cấm chỉ định=giận).


 
Top