Đăng ký học Excel và VBA cùng GPE tháng 11 - TPHCM

Mua sách "VBA trong Excel - Cải thiện và tăng tốc" tái bản

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

Thảo luận trong 'Khu vực đăng bài chung' bắt đầu bởi Nguyễn Hồng Quang, 15 Tháng mười một 2017 lúc 00:52.

  1. Nguyễn Hồng Quang

    Nguyễn Hồng Quang Thành viên GPE Hà Nội

    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
     

    Các file đính kèm:

  2. quocgiacan

    quocgiacan Thành viên GPE

    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.
     
    befaintvanthinh3101 thích bài viết này.
  3. Ba Tê

    Ba Tê Cạo Rồi Vẫn Gội

    Bạn chạy thử Sub này coi sao
    PHP:
    Public Sub S_GPE()
    Dim sArr(), Arr1(), Arr2(), tArr(), R1 As LongR2 As LongAs LongAs LongAs Long
    sArr 
    Sheet1.Range("C9"Sheet1.Range("C9").End(xlDown)).Value
        R1 
    UBound(sArr)
        
    ReDim Arr1(1 To R11 To 1)
        
    ReDim Arr2(1 To R11 To 1)
    tArr Sheet2.Range("A2"Sheet2.Range("A2").End(xlDown)).Resize(, 20).Value
        R2 
    UBound(tArr)
        For 
    1 To R1
            
    For 2 To R2
                
    If tArr(N1) = sArr(I1Then
                    
    For 2 To 20
                        
    If tArr(NJ) > 0 Then
                            Arr1
    (I1) = tArr(1J)
                            
    Arr2(I1) = tArr(NJ)
                        
    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
     
    PacificPR, befaintquocgiacan thích bài viết này.
  4. Nguyễn Hồng Quang

    Nguyễn Hồng Quang Thành viên GPE Hà Nội

    Đê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
     
    quocgiacan thích bài này.
  5. Nguyễn Hồng Quang

    Nguyễn Hồng Quang Thành viên GPE Hà Nội

    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: 15 Tháng mười một 2017 lúc 09:31
    quocgiacan thích bài này.
  6. quocgiacan

    quocgiacan Thành viên GPE

    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.
    :):):)
     
    PacificPR thích bài này.
  7. Nguyễn Hồng Quang

    Nguyễn Hồng Quang Thành viên GPE Hà Nội

    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ỉ^^^^
     
    PacificPRquocgiacan thích bài viết này.
  8. quocgiacan

    quocgiacan Thành viên GPE

    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.
    /-*+//-*+//-*+/
     
    PacificPR, Nguyễn Hồng Quangbebanhbeo thích bài viết này.
  9. Đỗ Tú Anh

    Đỗ Tú Anh Thành viên hoạt động

    Ối giời ơi,........... sợ quá......................................................................................................................................................... Ủa, đôi dép đâu mất rồi ta???
     
    quocgiacan thích bài này.
  10. PacificPR

    PacificPR Thành viên tích cực

    Mày mò đến tận canh ba mà nó vẫn ... vẫn không ra -\\/. Ghê thật ....
     
    Nguyễn Hồng Quangquocgiacan thích bài viết này.
  11. Đỗ Tú Anh

    Đỗ Tú Anh Thành viên hoạt động

    À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).


     
    quocgiacan thích bài này.

Chia sẻ trang này