Nhờ giúp đỡ bài tập về tìm kiếm dữ liệu! (1 người xem)

[tqh5985]

Các anh chị giúp đỡ em giải bài tập trong file đính kèm với ah! Rất hi vọng nhận được sự giúp đỡ của anh, chị! Nếu ko tải được file đính kèm thì đây là link của file: http://www.mediafire.com/?ij3jf46yx1ajays

 

[tqh5985]

hichic,không có ai có thể giúp em với ah?e đang cần gấp quá, hi vọng có ai đó giúp được e!Thank cả nhà nhiều!

 

[Ba Tê]

hichic,không có ai có thể giúp em với ah?e đang cần gấp quá, hi vọng có ai đó giúp được e!Thank cả nhà nhiều!

Hỏi chung chung thì trả lời chung chung.

=VLOOKUP(15;$A$4:$B$25;2;0)&"-"&VLOOKUP(15;$C$4:$D$25;2;0)&"-"&VLOOKUP(15;$E$4:$F$25;2;0)

Híc!

 

[tqh5985]

e xin lỗi, câu hỏi e ghi phía cuối của file excel đính kèm mà. Mục đích của e là tìm được tất cả các giá trị của mã 15. Rồi cổng tổng chúng lại.Lưu ý tránh nhầm lẫn giữa mã 15 và giá trị 15. Nếu dùng hàm vlookup thì nếu ko thấy sẽ xuất hiện N/A, ko tính tổng được.

 

[bebo021999]

Nếu chỉ có 3 cột:

=SUMIF(A4:A25,15,B4:B25)+SUMIF(C4:C25,15,D4:D25)+SUMIF(E4:E25,15,F4:F25)

 

[tqh5985]

mà cách của bác là làm với từng cột. Neu bài toán của em phát sinh thành 100 cột thì có cách nào tự động được không? Nếu dùng công thức thì tốt quá. Vì e mới làm excel nên ko biết về các mã lập trình.

 

[hoamattroicoi]

mà cách của bác là làm với từng cột. Neu bài toán của em phát sinh thành 100 cột thì có cách nào tự động được không? Nếu dùng công thức thì tốt quá. Vì e mới làm excel nên ko biết về các mã lập trình.

Hóa ra bạn là chủ của TOPIC này, tôi không xem nên không biết.
Với yêu cầu của bạn, 100 cột như thế, giải pháp công thức là không thể dù mọi người có nhiệt tình giúp bạn.
Muốn tự động thì chỉ có cách dùng CODE VBA thôi. Bạn hãy nhờ các cao thủ trên diễn đàn giúp bạn viết code nhé
Thân!

 

[tqh5985]

dạ vâng,nhưng e nhớ là thầy ndu trên diễn đàn có giải quyết 1 bài tập tương tự rồi, hình như là tính tổng số lượng qua mít (ở đây tương ứng với mã 15). Nhưng tìm lại ko thấy đâu. Nếu dùng VBA thì có ai giúp e với. Và add mã VBA vào file excel của mình ntn a?

 

[concogia]

dạ vâng,nhưng e nhớ là thầy ndu trên diễn đàn có giải quyết 1 bài tập tương tự rồi, hình như là tính tổng số lượng qua mít (ở đây tương ứng với mã 15). Nhưng tìm lại ko thấy đâu. Nếu dùng VBA thì có ai giúp e với. Và add mã VBA vào file excel của mình ntn a?

Thử với file này xem
Bạn cứ thêm vào bao nhiêu cột Mã & cột Giá trị cũng được (nếu bảng tính cho phép)
Nhập Mã muốn tính tổng giá trị vào [I2] là .....xong
Thân
Mà sao mấy hôm nay hổng thất Lão Chết Tiệt nhỉ, có vị nào biết Lão í đi đâu không ạ

 

[bebo021999]

Mà sao mấy hôm nay hổng thất Lão Chết Tiệt nhỉ, có vị nào biết Lão í đi đâu không ạ

Dễ ợt à bác cò, sáng mai không tìm thấy bài của bác và bài này là biết ngay

 

[hoamattroicoi]

Thử với file này xem
Bạn cứ thêm vào bao nhiêu cột Mã & cột Giá trị cũng được (nếu bảng tính cho phép)
Nhập Mã muốn tính tổng giá trị vào [I2] là .....xong
Thân
Mà sao mấy hôm nay hổng thất Lão Chết Tiệt nhỉ, có vị nào biết Lão í đi đâu không ạ

Bác Cò ơi, nếu trong cột mã số của bạn ấy chứa 2 mã giống nhau (ví dụ 01 - cột 1) thì nó sẽ chỉ cộng giá trị của mã đầu tiên nó tìm thấy trong cột đó (vì trong code bác dùng Match để tìm giá trị của mã)
@tqh5985 : Bạn kiểm tra kỹ xem có trường hợp nào như trên không nhé, nếu có nhờ bác Cò sửa giúp nhen không kết quả của bạn sẽ bị sai đó.
Thanks!

 

[Ba Tê]

Bác Cò ơi, nếu trong cột mã số của bạn ấy chứa 2 mã giống nhau (ví dụ 01 - cột 1) thì nó sẽ chỉ cộng giá trị của mã đầu tiên nó tìm thấy trong cột đó (vì trong code bác dùng Match để tìm giá trị của mã)
@tqh5985 : Bạn kiểm tra kỹ xem có trường hợp nào như trên không nhé, nếu có nhờ bác Cò sửa giúp nhen không kết quả của bạn sẽ bị sai đó.
Thanks!

Trong một cột chắc không có 2 mã trùng nhau đâu.
Nhưng muốn "Cộng Láng" thì thử với Code này xem có bị lỗi gì nữa không.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Rng(), Arr(), I As Long, Y As Long, Tem As Double
If Target.Address = "$I$2" Then
With Sheet1
   Rng = .Range(.[A4], .[A1000].End(xlUp)).Resize(, .[A4].End(xlToRight).Column)
    ReDim Arr(1 To UBound(Rng, 1), 1 To UBound(Rng, 2))
        For I = 1 To UBound(Rng, 1)
            For Y = 1 To UBound(Rng, 2) Step 2
                If Rng(I, Y) = .[I2].Value Then
                    Tem = Tem + Rng(I, Y + 1)
                End If
            Next Y
        Next I
    .[J2].Value = Tem
End With
End If
End Sub

 

[tqh5985]

e cám ơn các bác, nhưng e tìm trong các file các bác gửi chả thấy tí công thức nào là ntn? Mà khi e thay giá trị mã số ở ô I2 thì tổng giá trị I3 có thấy thay đổi j đâu? hichic!

 

[Ba Tê]

e cám ơn các bác, nhưng e tìm trong các file các bác gửi chả thấy tí công thức nào là ntn? Mà khi e thay giá trị mã số ở ô I2 thì tổng giá trị I3 có thấy thay đổi j đâu? hichic!

Từ từ nào.
Mở Excel. Vào Tools - Macro - Vào Security ... Chọn Mức Medium. OK.
Thoát khỏi Excel rồi mở lại tập tin, có hộp thoại, Chọn Enable Macros.
Mỗi lần thay đổi ô I2 code mới hoạt động cho ra kết quả ở ô J2.
Thêm 100 cột thử xem. Nhớ các cột phải liên tục: Mã - Giá trị - Mã - Giá trị ...
Muốn xem Code thì ấn Alt+F11.
Híc!

 

[tqh5985]

hì,e cám ơn các bác nhiều

 

[vantuan2525]

cảm ơn bạn, nếu mình biết thì mình hỏi làm gì? bạn giỏi quá, nhưng mà...???