Dò tìm có cùng giá trị (1 người xem)

thanhduc_iit · 17/6/14

Chào các bác,
Hiện em đang dùng hàm để dò tìm, nhưng hạn chế là nếu có 2 giá trị tìm giống nhau trở lên thì gặp khó @#!^%

Em có gửi file đính kèm, mong các bác giúp đỡ /-*+/

Các bác hỗ trợ từ bài #15 nhé }}}}}

leonguyenz · 17/6/14

Công thức dò tìm nhiều điều kiện:

Mã:

=LOOKUP(2,1/($B$3:$B$7=G3)/($C$3:$C$7=H3)/($D$3:$D$7=I3),$A$3:$A$7)

Phạm Thị E bị lỗi vì không tìm thấy, nếu cần bẫy lỗi thì bạn đưa vào hàm IFERROR, ví dụ: =IFERROR(công thức,"")

nginh · 17/6/14

thanhduc_iit đã viết:
Chào các bác,
Hiện em đang dùng hàm để dò tìm, nhưng hạn chế là nếu có 2 giá trị tìm giống nhau trở lên thì gặp khó
Em có gửi file đính kèm, mong các bác giúp đỡ

Mã:

F3=INDEX(A:A,MATCH(G3&H3&I3,B$1:B$7&C$1:C$7&D$1:D$7,0))

Ctrl+Shift+Enter ???

thanhduc_iit · 17/6/14

Cảm ơn 2 bác,
Điều kiện dò tìm chỉ có Họ tên và năm sinh thôi ạ.
Nếu tìm ra 2 giá trị giống nhau thì đếm rồi điền vào ạ.
Người sử dụng phải tự kiểm tra lại rồi chọn giá trị thích hợp

Phuocam · 17/6/14

thanhduc_iit đã viết:
Cảm ơn 2 bác,
Điều kiện dò tìm chỉ có Họ tên và năm sinh thôi ạ.
Nếu tìm ra 2 giá trị giống nhau thì đếm rồi điền vào ạ.
Người sử dụng phải tự kiểm tra lại rồi chọn giá trị thích hợp

Bạn xem thử ..... .

thanhduc_iit · 17/6/14

phuocam đã viết:
Bạn xem thử ..... .

Thay chữ "cảnh báo" bằng số được k bác?
Đếm xem có bao nhiêu giá trị được tìm thấy /-*+/

nginh · 17/6/14

thanhduc_iit đã viết:
Cảm ơn 2 bác,
Điều kiện dò tìm chỉ có Họ tên và năm sinh thôi ạ.
Nếu tìm ra 2 giá trị giống nhau thì đếm rồi điền vào ạ.
Người sử dụng phải tự kiểm tra lại rồi chọn giá trị thích hợp

Mã:

=IF(SUM((B$3:B$7=H3)*(C$3:C$7=I3))=1,INDEX(A:A,MATCH(H3&I3,B$1:B$7&C$1:C$7,0)),SUM((B$3:B$7=H3)*(C$3:C$7=I3)))

ctrl+shift+enter ???

comet_1701 · 17/6/14

nginh đã viết:
Mã:

=IF(SUM((B$3:B$7=H3)*(C$3:C$7=I3))=1,INDEX(A:A,MATCH(H3&I3,B$1:B$7&C$1:C$7,0)),SUM((B$3:B$7=H3)*(C$3:C$7=I3)))

ctrl+shift+enter ???

Bác nhầm cột trong công thức thì phải

Phuocam · 17/6/14

thanhduc_iit đã viết:
Thay chữ "cảnh báo" bằng số được k bác?
Đếm xem có bao nhiêu giá trị được tìm thấy

Thay chữ cảnh báo bằng số:
=IFERROR(IF(COUNTIFS($B$3:$B$7,G3,$C$3:$C$7,H3)>1,COUNTIFS($B$3:$B$7,G3,$C$3:$C$7,H3),LOOKUP(2,1/($B$3:$B$7=G3)/($C$3:$C$7),$A$3:$A$7)),"Chưa có")

chuot0106 · 17/6/14

itbinhduong đã viết:
làm excel lâu nay giờ mình mới bik hàm IFERROR nhờ cái topic này.

Có rất nhiều hàm mà trong trường lớp chưa được học nhưng có ứng dụng rất hay! Chỉ có thể tìm trên GPE. Bạn có thể tra cứu các hàm Excel mà anh BNTT đã biên soạn rất chi tiết trên diễn đàn nhé!

susu16b · 17/6/14

itbinhduong đã viết:
làm excel lâu nay giờ mình mới bik hàm IFERROR nhờ cái topic này.

Mục đích của bạn cũng chỉ là Spam để quảng cáo ở chữ ký thôi.

chuot0106 · 17/6/14

susu16b đã viết:
Mục đích của bạn cũng chỉ là Spam để quảng cáo ở chữ ký thôi.

Tôi nghĩ quảng cáo ở trên GPE thì cũng bằng không. Những ai có ý định này nên từ bỏ đi. Tôi chẳng bao giờ để ý đến cả!

susu16b · 17/6/14

chuot0106 đã viết:
Tôi nghĩ quảng cáo ở trên GPE thì cũng bằng không. Những ai có ý định này nên từ bỏ đi. Tôi chẳng bao giờ để ý đến cả!

Tôi lại nhĩ khác.
GPE với hơn 70 vạn thành viên, hơn 60 nghìn đề tài và gần 50 vạn bài viết. Diễn đàn luôn luôn có hàng nghìn người truy cập hàng ngày.

thanhduc_iit · 18/6/14

Nhờ các bác giúp đở thêm ạ!
Nhờ các bác viết code Tự động điền công thức tại ô A2 đến hết vùng chứa dữ liệu

chuot0106 · 18/6/14

thanhduc_iit đã viết:
Nhờ các bác giúp đở thêm ạ!
Nhờ các bác viết code Tự động điền công thức tại ô A2 đến hết vùng chứa dữ liệu

Chỉ việc kéo Fill xuống là được rồi, cần gì code.

thanhduc_iit · 18/6/14

chuot0106 đã viết:
Chỉ việc kéo Fill xuống là được rồi, cần gì code.

E đang thiết kế cho nó tự động làm bác Chuột ạ /-*+/

Thiết kế NÚT, click là sẽ điền vào ấy --=0

susu16b · 18/6/14

thanhduc_iit đã viết:
Nhờ các bác viết code Tự động điền công thức tại ô A2 đến hết vùng chứa dữ liệu

Thế này thôi

HTML:

Public Sub dien()
Range("A3:A20").FormulaR1C1 = Range("A2").FormulaR1C1
End Sub

thanhduc_iit · 18/6/14

susu16b đã viết:
Thế này thôi

HTML:

Public Sub dien() Range("A3:A20").FormulaR1C1 = Range("A2").FormulaR1C1 End Sub

Có cách nào cho hàm For chạy từ ô A2 đến hết vùng chứa dữ liệu luôn k bác?
Set công thức luôn, chứ k phải set công thức từ ô A2
--------------------
Em đã thử bằng cách Ghi macro và được code sau:

Mã:

Sub Macro2()
    Range("A2").Select
    ActiveCell.FormulaR1C1 = _
        "=IFERROR(IF(COUNTIFS(m_HoTen,RC[2],m_NgaySinh,RC[3])>1,COUNTIFS(m_HoTen,RC[2],m_NgaySinh,RC[3]),LOOKUP(2,1/(m_HoTen=RC[2])/(YEAR(m_NgaySinh)=IF(LEN(RC[3])>=5,YEAR(RC[3]),VALUE(RC[3]))),m_SoBHXH)),""Không có"")"
    Selection.AutoFill Destination:=Range("A2:[B]A20[/B]")
End Sub

Vấn đề là làm sao Range("A2:A20") A20 k phải sét cứng. Mà nó tự hiểu đến dòng cuối cùng chứa dữ liệu /-*+/

Hau151978 · 18/6/14

thanhduc_iit đã viết:
Có cách nào cho hàm For chạy từ ô A2 đến hết vùng chứa dữ liệu luôn k bác?
Vấn đề là làm sao Range("A2:A20") A20 k phải sét cứng. Mà nó tự hiểu đến dòng cuối cùng chứa dữ liệu

Bạn thay Range("A2:A20") thành Range("A2",range("A2").end(xldown))

thanhduc_iit · 18/6/14

Hau151978 đã viết:
Bạn thay Range("A2:A20") thành Range("A2",range("A2").end(xldown))

Rất cảm ơn bác
Nhưng nếu từ ô A2 trở xuống k có dữ liệu thì nó chạy vô tận xuống dưới bác ạ

Hau151978 · 18/6/14

thanhduc_iit đã viết:
Rất cảm ơn bác
Nhưng nếu từ ô A2 trở xuống k có dữ liệu thì nó chạy vô tận xuống dưới bác ạ

Vậy thì đổi thành Range("A1:A" & Range("C65000").End(xlUp).Row)

thanhduc_iit · 18/6/14

Hau151978 đã viết:
Vậy thì đổi thành Range("A1:A" & Range("C65000").End(xlUp).Row)

Bị lỗi khi thực thi bác ạ. Chỉ chạy được ô A2

Mã:

Sub Macro2()
    Range("A2").Select
    ActiveCell.FormulaR1C1 = _
        "=IFERROR(IF(COUNTIFS(m_HoTen,RC[2],m_NgaySinh,RC[3])>1,COUNTIFS(m_HoTen,RC[2],m_NgaySinh,RC[3]),LOOKUP(2,1/(m_HoTen=RC[2])/(YEAR(m_NgaySinh)=IF(LEN(RC[3])>=5,YEAR(RC[3]),VALUE(RC[3]))),m_SoBHXH)),""Không có"")"
    Selection.AutoFill Destination:=Range("A1:A" & Range("C65000").End(xlUp).Row)
End Sub

ndu96081631 · 18/6/14

thanhduc_iit đã viết:

Bị lỗi khi thực thi bác ạ. Chỉ chạy được ô A2

Mã:

Sub Macro2()
    Range("A2").Select
    ActiveCell.FormulaR1C1 = _
        "=IFERROR(IF(COUNTIFS(m_HoTen,RC[2],m_NgaySinh,RC[3])>1,COUNTIFS(m_HoTen,RC[2],m_NgaySinh,RC[3]),LOOKUP(2,1/(m_HoTen=RC[2])/(YEAR(m_NgaySinh)=IF(LEN(RC[3])>=5,YEAR(RC[3]),VALUE(RC[3]))),m_SoBHXH)),""Không có"")"
    Selection.AutoFill Destination:=Range("[COLOR=#ff0000]A1[/COLOR]:A" & Range("C65000").End(xlUp).Row)
End Sub

Sai chỗ màu đỏ! Phải là A2 mới đúng
Ngoài lề: Đã code rồi còn công thức "lằng nhằng" thế không biết

thanhduc_iit · 18/6/14

ndu96081631 đã viết:
Sai chỗ màu đỏ! Phải là A2 mới đúng
Ngoài lề: Đã code rồi còn công thức "lằng nhằng" thế không biết

Xài công thức là do k bít code bác ạ --=0

Code được cái nào hay cái đó zị mà /-*+/

A2 chạy ngon bác ạ, thanks bác!

Dò tìm có cùng giá trị (1 người xem)

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

Thành viên chính thức

Thành viên gạo cội

File đính kèm

Thành viên thường trực

Thành viên chính thức

Thành viên mới

File đính kèm

Thành viên chính thức

Thành viên thường trực

Thành viên tiêu biểu

Thành viên mới

Thành viên gắn bó

Thành viên thường trực

Thành viên gắn bó

Thành viên thường trực

Thành viên chính thức

Thành viên gắn bó

Thành viên chính thức

Thành viên thường trực

Thành viên chính thức

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

Thành viên chính thức

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

Thành viên chính thức

Huyền thoại GPE

Thành viên chính thức

Thời gian đếm ngược.