Hỏi về công thức tìm kiếm (1 người xem)

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

nguyenminhvms

Thành viên mới
Tham gia
2/4/13
Bài viết
29
Được thích
1
Xin chào các bạn. Mình đang có một chút vấn để nhỏ muốn nhờ các bạn
Hiện tại mình có một list sđt và ngày tháng năm sinh của khách hàng như bên .
Có nhiều khách hàng trùng ngày tháng năm sinh
Mình muốn dùng hàm gì đó để tìm kiếm ngày tháng năm sinh.
Ví dụ:
có 10 khách hàng có ngày 26.03.1992
Dùng hàm gì đó tìm kiếm ra được 10 khách hàng có đuôi 26.3.1992
 

File đính kèm

Lần chỉnh sửa cuối:
có thể tìm vậy
C2=IF(RIGHT(A2;2)="11";A2;"")
hoặc nhìn cho đẹp thì vậy
C2=INDEX($A$2:$A$145;SMALL(IF(RIGHT($A$2:$A$145;2)="11";ROW($A$2:$A$145)-1);ROW()-1))
kết thúc bằng ctrl shift enter

ủa sao yêu cầu trên bài với trong file ko giống nhau hả?
 
Vấn đề của mình là mình có 1000 số điện thoại ở một cột.

Giờ mình muốn tìm 3 số cuối trong 1000 số điện thoại đó giống nhau.

Ví dụ: trong 1000 số điện thoaị đó có 100 số có đuôi 123456 giống nhau.

Giờ mình làm thế nào để lọc 1000 số có đuôi 123456 đó ra riêng giúp mình với

Bạn tham khảo cách này xem có được không nhé.
 

File đính kèm

Bạn làm như sau:
1/ Bước 1: Chuyển dữ liệu sô sang chuỗi - dùng cột phụ
=> Tại C2 gõ ="a"&A2
2/ Bước 2: Auto filter cột C2
=> Chọn Auto Filter => Custom => Ends with => gõ 11
3/ Bước 3: Nhấn Ok và nhận kết quả

có thể tìm vậy
C2=IF(RIGHT(A2;2)="11";A2;"")
hoặc nhìn cho đẹp thì vậy
C2=INDEX($A$2:$A$145;SMALL(IF(RIGHT($A$2:$A$145;2)="11";ROW($A$2:$A$145)-1);ROW()-1))
kết thúc bằng ctrl shift enter

ủa sao yêu cầu trên bài với trong file ko giống nhau hả?
Hic dữ liệu 1000 dòng mà công thức mảng thì "oải" lắm bạn ah
 
có thể tìm vậy
C2=IF(RIGHT(A2;2)="11";A2;"")
hoặc nhìn cho đẹp thì vậy
C2=INDEX($A$2:$A$145;SMALL(IF(RIGHT($A$2:$A$145;2)="11";ROW($A$2:$A$145)-1);ROW()-1))
kết thúc bằng ctrl shift enter

ủa sao yêu cầu trên bài với trong file ko giống nhau hả?

bác xem hộ em cái video này. Em muốn làm kiểu tìm kiếm giống trong này.
bác giúp em chút. Mà bác ở đâu thế
http://www.youtube.com/watch?v=xilJUBZmbw0
 
Nghi ngờ quá. Bọn tui không mua số đẹp đâu nha. Sorry trước nếu bắt giò lộn.+-+-+-+
 
anh ơi đúng rồi đó làm thế nào đó anh
Mở file, ấn Alt+F11 sẽ thấy trong Module có cái này
PHP:
Public Sub SDT()
Dim Sarr(), Darr(), I As Long, K As Long, DK As String, L As Long
DK = [E1].Value: L = Len([E1])
Sarr = Range([A2], [A65000].End(xlUp)).Resize(, 2).Value
ReDim Darr(1 To UBound(Sarr, 1), 1 To 2)
For I = 1 To UBound(Sarr, 1)
    If Right(Sarr(I, 1), L) = DK Then
        K = K + 1
        Darr(K, 1) = Sarr(I, 1)
        Darr(K, 2) = Sarr(I, 2)
    End If
Next I
[E3:F65000].ClearContents
If K Then [E3].Resize(K, 2).Value = Darr
End Sub
Và trong Sheet1 có cái này:
PHP:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$E$1" Then SDT
End Sub

Còn hỏi làm thế nào thì hổng biết trả lời.
Mà sao bạn post bài lung tung nhiều chỗ quá vậy?
http://www.giaiphapexcel.com/forum/...i-giỏi-về-hàm-giúp-em-với&p=488680#post488680
http://www.giaiphapexcel.com/forum/...lệnh-tìm-kiếm-trong-Excel&p=488655#post488655
 
Lần chỉnh sửa cuối:
mở file, ấn alt+f11 sẽ thấy trong module có cái này
PHP:
public sub sdt()
dim sarr(), darr(), i as long, k as long, dk as string, l as long
dk = [e1].value: L = len([e1])
sarr = range([a2], [a65000].end(xlup)).resize(, 2).value
redim darr(1 to ubound(sarr, 1), 1 to 2)
for i = 1 to ubound(sarr, 1)
    if right(sarr(i, 1), l) = dk then
        k = k + 1
        darr(k, 1) = sarr(i, 1)
        darr(k, 2) = sarr(i, 2)
    end if
next i
[e3:f65000].clearcontents
if k then [e3].resize(k, 2).value = darr
end sub
và trong sheet1 có cái này:
PHP:
private sub worksheet_change(byval target as range)
if target.address = "$e$1" then sdt
end sub

còn hỏi làm thế nào thì hổng biết trả lời.
Mà sao bạn post bài lung tung nhiều chỗ quá vậy?
http://www.giaiphapexcel.com/forum/showthread.php?79184-ai-gi%e1%bb%8fi-v%e1%bb%81-h%c3%a0m-gi%c3%bap-em-v%e1%bb%9bi&p=488680#post488680
http://www.giaiphapexcel.com/forum/...lệnh-tìm-kiếm-trong-excel&p=488655#post488655

tại em mới vào xl cả nhà nhé sau rút kinh nghiệm
 
mở file, ấn alt+f11 sẽ thấy trong module có cái này
PHP:
public sub sdt()
dim sarr(), darr(), i as long, k as long, dk as string, l as long
dk = [e1].value: L = len([e1])
sarr = range([a2], [a65000].end(xlup)).resize(, 2).value
redim darr(1 to ubound(sarr, 1), 1 to 2)
for i = 1 to ubound(sarr, 1)
    if right(sarr(i, 1), l) = dk then
        k = k + 1
        darr(k, 1) = sarr(i, 1)
        darr(k, 2) = sarr(i, 2)
    end if
next i
[e3:f65000].clearcontents
if k then [e3].resize(k, 2).value = darr
end sub
và trong sheet1 có cái này:
PHP:
private sub worksheet_change(byval target as range)
if target.address = "$e$1" then sdt
end sub

còn hỏi làm thế nào thì hổng biết trả lời.
Mà sao bạn post bài lung tung nhiều chỗ quá vậy?
http://www.giaiphapexcel.com/forum/showthread.php?79184-ai-gi%e1%bb%8fi-v%e1%bb%81-h%c3%a0m-gi%c3%bap-em-v%e1%bb%9bi&p=488680#post488680
http://www.giaiphapexcel.com/forum/...lệnh-tìm-kiếm-trong-excel&p=488655#post488655

anh có biết cách làm như vậy không . Em đang cần làm như vậy . Chỉ cần nhập vào chỗ màu vàng đó nó ra tất cả các đuôi giống như thế
 
anh có biết cách làm như vậy không . Em đang cần làm như vậy . Chỉ cần nhập vào chỗ màu vàng đó nó ra tất cả các đuôi giống như thế
Trời ơi! Tôi đã làm rồi đó.
Khi mở file lên bạn nhớ Enable Macros rồi nhập vài số đuôi muốn tìm vào ô E1 là code sẽ lọc ra cho bạn thôi.
Làm thêm một ô tìm ngày sinh luôn cho bạn nè, nhập ngày, hoặc ngày tháng, hoặc ngày tháng năm, hay cái gì đó muốn tìm trong cột ngày sinh thì nhập vào ô F1
 

File đính kèm

Trời ơi! Tôi đã làm rồi đó.
Khi mở file lên bạn nhớ Enable Macros rồi nhập vài số đuôi muốn tìm vào ô E1 là code sẽ lọc ra cho bạn thôi.
Làm thêm một ô tìm ngày sinh luôn cho bạn nè, nhập ngày, hoặc ngày tháng, hoặc ngày tháng năm, hay cái gì đó muốn tìm trong cột ngày sinh thì nhập vào ô F1

CHO EM HỎI NGU PHÁT NỮA Enable Macros LÀ CÁI GÌ THẾ :p
 
CHO EM HỎI NGU PHÁT NỮA Enable Macros LÀ CÁI GÌ THẾ :p
Mở Excel 2003:
1/ Tools - Macro - Security...
2/ Chọn mức medium - OK
3/ Thoát Excel
4/ Mở file ... đó đó lên.
5/ Có một hộp thoại giống như hình dưới, kích chọn Enable Macros - Cái nút giữa.
Enable Macro.JPG
----------------
Khi làm được thì cũng cho hay nghe. Để biết code mình viết chạy có được không.
Híc! Hết vốn!
 
Lần chỉnh sửa cuối:
Mở Excel 2003:
1/ Tools - Macro - Security...
2/ Chọn mức medium - OK
3/ Thoát Excel
4/ Mở file ... đó đó lên.
5/ Có một hộp thoại giống như hình dưới, kích chọn Enable Macros - Cái nút giữa.
View attachment 99709
----------------
Khi làm được thì cũng cho hay nghe. Để biết code mình viết chạy có được không.
Híc! Hết vốn!

cảm ơn bác. Em tìm ra rồi. bác cho em hỏi chút bác tên gì thế
 

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

Back
Top Bottom