Tìm kiếm trong Excel (1 người xem)

[nangbuon]

Mọi người cho em hỏi với

Bình thường muốn tìm kiếm một câu hoặc một từ nào đó trong file Excel thì dùng Ctrl + F , nhưng em muốn hỏi là có cách nào để khi cần tìm kiếm một từ nào đó trong file excel, nếu từ đó nằm ở ô A3 thì ô A3 đó sẽ đổi thành màu đỏ để cho dễ nhìn và nếu tiếp tục ấn NEXT để tìm tiếp thì ô khác có dữ liệu đúng như thế sẽ là màu đỏ ko? ./ CÓ nghĩa là khi ô nào có chứa từ đó thì màu đỏ sẽ trượt đến để dễ nhìn

 

[anhtuan1066]

Thử file này xem có đúng ý bạn ko?
ANH TUẤN

 

[tedaynui]

Thử file này xem có đúng ý bạn ko?
ANH TUẤN

Đúng là sáng kiến nhưng lại chưa có tác dụng với các ô số Anh Tuấn à.

Thân!

 

[hong_tt]

Anh tham khao

ANh xem bài của Anh VODA nhé

 

[ngvanho]

Tìm Và Bôi đỏ Số Cho Dể Nhìn

Thử file này xem có đúng ý bạn ko?
ANH TUẤN

NẾU TÌM CHÍNH XÁC THÌ SỬA LẠI CT TRONG ĐỊNH DẠNG DK CỦA TOÀN BỘ SỐ LIỆU LÀ
= A6 = $F$1

 

[mymichau]

Với file SearchVoda2, có cách nào giới hạn được vùng dò tìm không. VD vùng dò tìm là cột 1 ( cột A ).

Xin Anhtuan1066 giải thích nội dung hoạt động của hàm INDIRECT("P"&CELL("row")) của anh.

 

[anhtuan1066]

Xin Anhtuan1066 giải thích nội dung hoạt động của hàm INDIRECT("P"&CELL("row")) của anh.

Hô... hô... cái đó là thừa.. ko có tác dụng gì trong file này cả.. chẳng qua tôi mượn dử liệu trong 1 file khác đễ làm mà...
Giờ cải tiến lại file trên, tìm dc số và chử luôn... Gõ đến đâu tìm đến đó.. ha.. ha..
Xem file mới nhé
ANH TUẤN

 

[hong_tt]

đánh dấu hết cả Dòng (Reccord)

Vậy để đánh dấu hết cả dòng thì phải sửa ở đâu anh
ở đây em thấy khi tìm thấy chỉ đánh dấu ô

 

[baby1982]

Xin AnhTuan chỉ cho cách chỉnh sửa:
1. Làm sao có thể mang cái hộp tìm kiếm qua file Excel của mình (file khác đó mà).
2. Đổi màu khi tìm kiếm (màu đỏ nhìn chói quá "chời").
3. Tìm kiếm giống như "Match Case" không anh? Và "Match Entire Cell Contents", "Format", "Choose Format From Cell...", "Within", "Search", "Look in". Nói chung có tất cả các chức năng trong tìm kiếm.

 

[tedaynui]

Xin AnhTuan chỉ cho cách chỉnh sửa:
1. Làm sao có thể mang cái hộp tìm kiếm qua file Excel của mình (file khác đó mà).
2. Đổi màu khi tìm kiếm (màu đỏ nhìn chói quá "chời").

Bạn dùng chức năng sẵn có của Excel Conditional Formatting

TDN

 

[baby1982]

Mình không muốn định dạng có đk. Mình chỉ muốn tìm kiếm.

Giả sử mình đã có dữ liệu hàng ngàn dòng & hàng trăm cột. Mình có một bảng dữ liệu (có thể trên Email, cũng có thể là Fax...) của cty khác gởi, và mình muốn so sánh.

Và tất nhiên mình muốn tìm những thứ (items, cũng có thể là 1 ô số liệu nào đó như number hoặc tên, địa chỉ...) giống hoặc gần giống với bảng DL của cty đó.

Nếu anhtuan1066 có thể cải thiện y chang chức năng tìm kiếm & thay thế của Excel cộng với việc tìm đến đâu nó đổi thành màu theo ý mình đến đó (Khi nhấn "Find Next) hoặc đổi màu tất cả (Khi nhấn "Find All") thì hay biết mấy. Khi đó, ta ko cần phải click vào từng dòng sau khi "Find All" để xem, nhức nách lắm.

Thanks.

 

[anhtuan1066]

Mình không muốn định dạng có đk. Mình chỉ muốn tìm kiếm.

Bạn có thể nói tôi biết ý tưởng của bạn về việc tìm kiếm này ko? Tìm với mục đích gì? Áp dụng thế nào trong file cụ thể của bạn? Tất nhiên bạn phải nghĩ ra món gì đó thì mới dẩn đến ý tưởng tìm kiếm này... Vậy bạn có thể đưa toàn bộ file lên đây và ghi rõ ý tưỡng vào file.. rất có thể tôi sẽ tìm ra 1 cách khác hửu hiệu hơn đấy!
ANH TUẤN

 

[baby1982]

Ah, cũng không có gì khó hiểu đâu AT ạ. Thật ra là E chỉ muốn có một hộp tìm kiếm giống y chang và nhiều hơn nữa của Excel.

- Ý của E là: Khi tìm kiếm, E nhấn vào nút "Find All" thì nếu có những mục nào thỏa mãn thì nó sẽ liệt kê tiếp ở bên dưới khung tìm kiếm. Và dĩ nhiên cơ bản là Excel không Highlight (theo 1 màu nào đó giống như màu đỏ trong VD của AT đó) tất cả những mục thỏa mãn điều kiện khi e nhấn vào nút "Find All". E muốn có mục này.

Hơn nữa, khi E nhấn vào nút "Find Next" thì nó sẽ Highlight 1 mục đầu tiên thỏa mãn điều kiện. Và E nhấn tiếp vào "Find Next" nữa, nó lại Highlight mục kế tiếp, ...vân vân. Nhưng nó chỉ cần Highlight mục hiện hành khi E nhấn "Find Next" thôi nhé (nghĩa là món tìm trước đó tắt đi không highlight nữa, mà highlight mục hiện hành).

AT hiểu ý E chứ ạhh? Cho nên E gửi file lên đây cũng đâu có ý nghĩa, may ra E gởi hình thì có lý, chứ nếu gởi File lên thì coi như E đã làm được rồi. nhưng hình ảnh thì AT biết hết rồi ạhh. Mà AT có thể làm xuất hiện cái hộp "Find" giống như trong Excel không ạhh?

 

[anhtuan1066]

Ý tôi là vầy nè... Đầu tiên bạn phải vướng cái gì đó trong file nên mới nghĩ ra vụ "find" này, đúng ko? Nên tôi muốn hỏi rõ cái "vướng" ấy là gì? Có khi sẽ có giãi pháp khác chứ ko cần "find" như thế!
Đồng ý là tìm kiếm, nhưng tìm đễ làm cái gì? Chẳng lẽ chỉ đơn giãn là nhìn chơi thôi sao?
Thường thì người ta tìm trong dử liệu là đễ trích ra cái gì đó theo yêu cầu... Còn trường hợp của bạn thì sao? Có thể nói rõ hơn ko?

 

[baby1982]

Thật ra điều cốt yếu là để E so sánh.

Khi E nhận được 1 tài liệu trên Excel do người khác gởi, E sẽ so sánh số liệu trong tài liệu đó với tài liệu trong máy của E.

Thật ra E cũng chưa có ý nghĩ to lớn gì lắm. Có lẽ tương lai E mới nghĩ ra. Và tất nhiên, E chỉ đang muốn so sánh thủ công thôi AT ạh, mặc dù cách này chưa chuyên nghiệp, nhưng trong trường hợp nào đó, thì có lẽ cũng cần vậy lắm AT ha. Cám ơn anh.

 

[anhtuan1066]

Bạn muốn so sánh thì có nhiều cách lắm... Tôi ko nghĩ cách find mà bạn vừa nghĩ ra lại tối ưu nhất đâu... Vi dụ người ta có thể làm thế này đây: "Lọc ra 1 danh sách riêng với những em chỉ có trong danh sách 1 mà ko có trong dach sách 2.. hoặc ngược lại"... Như thế có phải là trực quan hơn ko?
Về vấn đề tìm kiếm phải mang mục đích gì đó chứ ko thể chỉ đễ nhìn... Bạn có thể gữi lên đây 2 file: 1 file gốc và 1 file mà bạn nói là do người ta mới vừa gữi.. rồi nêu yêu cầu muốn cái gì... Tất nhiên muốn tìm cái gì thì trích cái đó ra... Nói chung là theo yêu cầu của Sếp hoặc của phòng ban nào đó, đúng ko?
Mến
ANH TUẤN

 

[baby1982]

Vậy AT đọc kỹ và xem xét giùm E nhé, E thật đau đầu khi giải quyết nó. Cám ơn anh.

 

[tigertiger]

Vậy AT đọc kỹ và xem xét giùm E nhé, E thật đau đầu khi giải quyết nó. Cám ơn anh.

oh, dữ liệu bạn sắp xếp theo dạng ô vùng thế sẽ rất khó xử lý. bạn có thể chuyển đổi về dạng bảng (hàng và cột) thống nhất thì sẽ dễ xử lý hơn,

bạn cho ý kiến nhé

 

[SA_DQ]

Câu 1

Vậy AT đọc kỹ và xem xét giùm E nhé, E thật đau đầu khi giải quyết nó. Cám ơn anh.

Option Explicit

Sub TimChep()
 Dim CanTim, Lrow As Long, iJ As Long
 Dim Rng As Range
 
 Sheets("Goc").Select
 CanTim = Range("D1")
 Lrow = Cells(65432, 1).End(xlUp).Row
 For iJ = 1 To Lrow
    If InStr(Cells(iJ, 1), CanTim) > 0 Then
        Set Rng = Range(Cells(iJ, 1), Cells(iJ + 2, 2))
        Rng.Copy Destination:=Sheets("so sanh").Range("A" & _
            Sheets("So Sanh").Cells(65432, 1).End(xlUp).Row + 1)
 
    End If
 Next iJ
End Sub

Bạn ghi đoạn mã cần tìm vô ô D1;
Macro sẽ tìm trên cột 'A', nếu có chứa đoạn mã cần tìm thì chép các ô yêu cầu sang sheets("So Sanh") (Mình đề nghị bạn dùng tên nên viết liền - tạo 1 thói quen tốt mà thôi!)
Gởi bạn trước C1 & chờ í kiến của bạn!

Chúc Vui!

 

[anhtuan1066]

Tôi có thể tách ra cho bạn dử liệu trên thành từng cột 1 thật dễ dàng... Tuy nhiên, bạn cho tôi biết dựa vào tiêu chí nào đễ nói rằng 2 record là "giống nhau" ?
Tôi nghĩ đến 1 tiêu chí đầu tiên, đó là địa chỉ! Nhưng cũng sẽ có trường hợp 1 cty có 2 địa chỉ... bạn nghĩ sao?
Bạn hảy xem tôi tách ra tại sheet Convert... giờ bạn muốn thế nào nữa?
ANH TUẤN

 

[baby1982]

anhtuan1066: Cám ơn anh. Cách trích lọc của A đối với E bây giờ đã là hoàn hảo lắm rồi. Tuy nhiên, khi E chép công thức của A sang Sheet chính (GOC) thì E vẫn chưa hiểu vì sao tại cột C thì công thức có vẻ như bị lỗi tham chiếu. Xin A hướng dẫn cụ thể về công thức INDERECT trong VD của A. Cám ơn anh.

SA_DQ: Cám ơn về Macro của A. Tìm kiếm tốt lắm. Nhưng xin A viết thêm cho E cái macro khác đối với mẫu nằm trong Sheet "Convert" mà E đính kèm Bảng DL sau đây. (Đối với những số liệu tương đối thì xin A chỉ E cách thay đổi nó luôn ha, VD như A đã tô đỏ những số liệu như: "Goc", "D1", "so sanh", "A"). Giả sử E chỉ muốn khi lọc thì chỉ lấy số liệu theo hàng ngang như thế nào...

To tigertiger: "Không có việc gì khó, Chỉ sợ ... không nhiều".

 

[ThuNghi]

C1=INDIRECT("B"&(ROW()-2)*3+COLUMN()+3)

(Row()-2)*3 =(1-2)*3=-3, col()+3=3+3=6
=>(ROW()-2)*3+COLUMN()+3=3
Mục đích là lấy cách nhau 3 dòng. Cụ thể như anhtuan1066 giải thích, ct này cao siêu quá.

 

[Tiger62]

Bạn dùng chức năng Conditional Formatting của Excel Format toàn bộ vùng cần tìm với giá trị(ký tự/số) tại một ô cố định(a1) với cách chọn Cell Value Is/between/=$a$1/=$a$1 và chọn mầu theo ý thích.

 

[baby1982]

(Row()-2)*3 =(1-2)*3=-3, col()+3=3+3=6
=>(ROW()-2)*3+COLUMN()+3=3
Mục đích là lấy cách nhau 3 dòng. Cụ thể như anhtuan1066 giải thích, ct này cao siêu quá.

Nhưng nếu em đổi CT này thành: INDIRECT("A"&(ROW()-2)*3+COLUMN()+3) thì nó lấy từ hàng thứ 3 trở đi. Trong khi đó E muốn lấy số liệu tại A1, A4, A7, A10... thì không được. Nhưng trong CT của AT tại sheet "Convert" lại làm được. Chị đã cho rằng nó cao siêu rồi, mà chị giải thích kiểu này chắc... chết. Nghiên cứu CT này hoài mà chẳng rút ra được kinh nghiệm gì có ích, E chỉ hiểu sơ sơ thôi. E mong được giải thích cụ thể hơn kia.

 

[ThuNghi]

Nhưng nếu em đổi CT này thành: INDIRECT("A"&(ROW()-2)*3+COLUMN()+3) thì nó lấy từ hàng thứ 3 trở đi. Trong khi đó E muốn lấy số liệu tại A1, A4, A7, A10... thì không được. Nhưng trong CT của AT tại sheet "Convert" lại làm được. Chị đã cho rằng nó cao siêu rồi, mà chị giải thích kiểu này chắc... chết. Nghiên cứu CT này hoài mà chẳng rút ra được kinh nghiệm gì có ích, E chỉ hiểu sơ sơ thôi. E mong được giải thích cụ thể hơn kia.

Quan trọng nhất của ct này là hàm row() and column() của ô hiện tại bạn muốn gán ct.
Ví dụ bạn muốn lấy giá trị của ô nào, A, B, C...
Tại ô hiện tại bạn nhập thử row() cho KQ?? và column() cho KQ?? ROW()-2)*3+COLUMN()+3 chẳng qua là cho giá trị cách nhau 3 đơn vị. Bạn thử tại ô bất kỳ nhập ROW()-2)*3+COLUMN()+3 và copy xuống xem thế nào.
PS: ThuNghi là Mr nhé.

 

[anhtuan1066]

Chào bạn... Vì công thức thay đỗi theo sự thay đỗi của dòng và cột, nên khi mang sang nơi khác tất nhiên là nó sẽ sai... Bạn phải sửa lại cho phù hợp... Cụ thể trong file bạn sẽ sửa như sau:

C1 =INDIRECT("A"&(ROW()-1)*3+COLUMN()-2)
D1 =INDIRECT("B"&(ROW()-1)*3+COLUMN()-2)
E1 =INDIRECT("B"&(ROW()-1)*3+COLUMN()-2)

Kéo file 3 cell này xuống dưới
Mến
ANH TUẤN

 

[anhtuan1066]

Đễ tôi hướng dẩn bạn 1 cách mà tôi bắt tay vào thực hiện:
Đầu tiên tôi đễ ý thấy nếu muốn tách ra thì cell đầu tiên của tôi phải có kết quả giống như A1, cell tiếp theo giống B2 và cell tiếp nữa giống B3... Thế là tôi tạo 1 sheet mới, ghi vào 3 cell dòng đầu tiên chử A1, rồi B2 rồi B3...
Tiếp tục nhận xét thì dòng thứ 2 phải giống với A4, B5, B6... Tôi lại ghi vào 3 cell dòng thứ 2 của sheet mới này chử: A4, B5 , B6... vân vân...
Ghi 1 hồi tôi dc các số liệu sau đây:
A1... B2... B3
A4... B5... B6
A7... B8... B9
.................
Mục đích của việc làm này là xem xét sự thay đỗi nhằm tìm ra dc quy luật!... Vậy phải kết hợp với ROW và COLUMN như thế nào đó sao cho cell đầu tiên phải ra dc kết quả là "GOC!A1"... cell tiếp theo phải ra kết quả là "GOC!B1"... vân vân...
Bây giờ lồng thêm hàm INDIRECT vào là ra hết toàn bộ
Tất nhiên việc kết hợp với ROW và COLUMN chỉ cho kết quả đúng tại cell ta đang thực hiện công thức... nếu mang công thức sang nơi khác thì ROW và COLUMN đã khác, nên kết quả sai là điều đương nhiên... Vì thế mà phải sửa lại cho phù hợp theo từng vị trí cụ thể của cell hiện hành
Cái này nói thì dài dòng và thật khó giãi thích sao cho cặn kẽ... Nhưng tôi nghĩ đây chỉ là tính toán thôi.. các bạn suy nghĩ 1 tí là ra ngay thôi mà...
hi... hi...
ANH TUẤN

 

[SA_DQ]

SA_DQ: Tìm kiếm tốt lắm. Nhưng xin A viết thêm cho E cái macro khác đối với mẫu nằm trong Sheet "Convert" mà E đính kèm Bảng DL sau đây. (Đối với những số liệu tương đối thì xin A chỉ E cách thay đổi nó luôn ha, VD như A đã tô đỏ những số liệu như: "Goc", "D1", "so sanh", [/FONT]"A"). Giả sử E chỉ muốn khi lọc thì chỉ lấy số liệu theo hàng ngang như thế nào...

Option Explicit

Sub TimChep()
 Dim CanTim, Lrow As Long, iJ As Long
 Dim Rng As Range
  
 Sheets("Goc").Select
 CanTim = Range("D1")
 Lrow = Cells(65432, 1).End(xlUp).Row
 For iJ = 1 To Lrow
    If InStr(Cells(iJ, 1), CanTim) > 0 Then
        Dim Iz As Byte
        Set Rng = Cells(iJ, 1)
        Rng.Copy Destination:=Sheets("Convert").Range("A" & _
            Sheets("Convert").Cells(65432, 1).End(xlUp).Row + 1)
            For Iz = 1 To 2
                Set Rng = Cells(iJ + Iz, 2)
                Rng.Copy Destination:=Sheets("Convert").Range(Chr(65 + Iz) & _
                    Sheets("Convert").Cells(65432, 1 + Iz).End(xlUp).Row + 1)

            Next Iz
9        '   Exit For
    End If
 Next iJ
End Sub

Chỉ dẫn: Macro sẽ tìm tại cột 'A' những ô có chứa chuỗi ghi trong 'D1'
Tìm thấy là chép (kể cả trùng tên)
Nếu chỉ muốn chép 1 dòng thì bỏ dấu nháy tại dòng lệnh có só 9

 

[baby1982]

- ôi, Làm Sao để Tách Mấy Cái Thằng Này Theo Hàm Indirect đây Anh Tuấn ơi.
- Now, Em Còn Muốn Có Thêm Cột Fax, Email Và Website Sau Khi Trích Ra. Nếu Record Nào Không Có Thêm 1 Trong 3 Thứ đó Thì để Trống.
- Em đã Nghĩ đến Việc Nếu Record Nào Không Có Cell "fax, Email Hay Website" Thì Mình Thêm Mấy Cái Cell đó Vào. Nhưng Em Khôg Biết Cách. Chắc Có Lẽ Giờ đây Phải đụng đến Macro Rồi Phải Hông Atuấn?
-giả Sử Như Macro Sẽ Tìm Dưới Cell "điện Thoại" Có Cell "fax" Hay Không?! Nếu Không, Nó Sẽ Thêm 1 Dòng Dưới Cell "điện Thoại". Sau đó, Từ Cell "điện Thoại" Nó Tìm Cách 2 Dòng Dưới Nó Có Cell "website" Hay Ko?! Nếu Ko Thì Thêm Vào... Tương Tự Với Cell "email".
-làm Như Vậy để Thống Nhất Tất Cả Các Record, Và áp Dụng C.thức Của Atuấn Khi đó Thật Dễ Dàng. Không Biết E Phát Biểu Như Vậy Atuấn Và Các Cao Thủ Nghĩ Sao??? đúng Hay Chưa Thuyết Phục.
-sa_qd: Có Lẽ Phải Nhờ đến Thầy Sa_qd Nhiều đó.
Xin Cám ơn.

 

[baby1982]

Chỉ dẫn: Macro sẽ tìm tại cột 'A' những ô có chứa chuỗi ghi trong 'D1'
Tìm thấy là chép (kể cả trùng tên)
Nếu chỉ muốn chép 1 dòng thì bỏ dấu nháy tại dòng lệnh có só 9

Anh SA_DQ ơi, giờ đây E muốn tìm kiếm rộng hơn, tuy chưa hay lắm nhưng E không thể bỏ sót. Đó là, khi Chuỗi tìm kiếm của E trong Cell D1 nhiều (dài) hơn trong Col A của BDL thì thay đổi Macro sao đây A?

VD: E nhập vào D1 là "Cty TNHH có 300 thành viên trong đó trừ ra 200 chín mươi chín thành viên đã lên cơn đau tim không thể tiếp tục quản lý được nưã thì doanh nghiệp này chỉ còn 1 thành viên tên mItSuky" nhưng trong BDL chỉ có tên MITSUKY hoặc là MItsuKy Mít ướt, vân vân, thì nó sẽ lọc ra giúp E luôn. A giúp E để nó đừng phân biệt chữ hoa chữ thường nha A.

Xin xem lại file đã gởi phía trên.

 

[ThuNghi]

Ý bạn là muốn tạo ra 1 sh có tên cty, dc, dt, fax... cái nào có thì lấy, không thì rỗng?
Khuyên bạn nên nhập như vậy vẫn đầy đủ các trường cái nào không có thì bỏ trống.
Gợi ý bạn cách làm, theo file của bạn nhé. Không cần indirect.
- Tạo thêm cột phụ: if = địa chỉ thì lấy 2, = ĐT lấy 3, Fax..4, web: 5, email: 6, còn không có thì 1
- Thêm 1 cột nữa đếm báo nhiêu tên cty
- Kết hợp lại => ta có mã Cty, vd: 1-1, 1-2,...,1-6,2-1,...n-6
Từ sh cần lấy chỉ cần dùng vlookup theo 1-1, 1-2,...,1-6,2-1,...n-6 là OK thôi.
Giải pháp dùng nhiều cột phụ cho dễ hiểu. Từ từ sẽ rút gọn sau. Cao siêu sẽ không còn cột phụ nhưng bạn không hiểu luôn.

 

[baby1982]

OK. Rất tốt. Bây giờ thì em đã hiểu rõ hàm INDIRECT trong VD của AT rồi. Và bây giờ E có thể đặt công thức đó tại bất kỳ nơi nào trong bảng tính. Chỉ cần thay đổi thông số một ít thôi là sẽ hiểu ngay mà. Quan trọng thật sự nằm ở cụm ROW()+-n và COLUMN()+-n thôi.

TN ơi, làm sao E có thể nhập các trường (field) cho đầy đủ được chớ, trong khi DLiệu đó là E lấy từ nguồn khác (của cty). Có khi mỗi record lên đến hàng chục ngàn. Thông cảm cho E nha.

Nhưng làm việc mang tính chuyên nghiệp thì ai mà chẳng thích. Ít ra là cách hiện tại chuyên nghiệp hơn trước đây mình đã làm chứ (chứ chưa hẳn là cách làm đó là vua). Chỉ cần nghiên cứu 1 tý xíu + với sự hỗ trợ của các thầy cô nơi đây là quá đủ rồi ha. Hơn nữa công thức đã có người làm sẵn cho mình như thế, lẽ nào mình lại bỏ qua (+ với 1 ít động viên của mình dành cho họ để gọi là đền đáp cho công sức họ phải nghiên cứu nữa, hehe).

E đây thực sự hông muốn làm theo cách VLOOKUP hơi thủ công đâu TN ạhh. Nếu có điều kiện tham khảo những cách thức tính toán chuyên nghiệp như thế này thì E khó lòng mà bỏ qua lắm.

Hông biết question ở trên các cao thủ thấy sao rồi ta?!!! Chắc có lẽ giờ này họ đang nghiên cứu, còn mình thì chỉ ngâm cứu thôi. hehehe......

Cám ơn TN.

 

[SA_DQ]

Anh ơi, giờ đây E muốn tìm kiếm rộng hơn, tuy chưa hay lắm nhưng E không thể bỏ sót. Đó là, khi Chuỗi tìm kiếm của E trong Cell D1 nhiều (dài) hơn trong Col A của BDL thì thay đổi Macro sao đây A?

VD: E nhập vào D1 là "Cty TNHH có 300 thành viên trong đó trừ ra 200 chín mươi chín thành viên đã lên cơn đau tim không thể tiếp tục quản lý được nưã thì doanh nghiệp này chỉ còn 1 thành viên tên mItSuky" nhưng trong BDL chỉ có tên MITSUKY thì nó sẽ lọc ra giúp E luôn. A giúp E để nó đừng phân biệt chữ hoa chữ thường nha A. Xin xem lại file đã gởi phía trên.

Không thể tìm chuỗi MItsuKy . . . vân vân được
Chỉ tìm được & Copy khi cột A có từ mItSuky & chỉ nguyên từ đó mà thôi;
Làm sao mà tìm 'Hà thành' trong chuỗi "Hà nội, thủ đô nước CHXHCN Việt nam"?!! hay ngược lại!

Option Explicit

Sub SearchAndCopy()
 Dim CanTim, Lrow As Long, iJ As Long
 Dim Rng As Range
   
 Sheets("Goc").Select
 CanTim = UCase$(Range("D1"))
 Lrow = Cells(65432, 1).End(xlUp).Row
 For iJ = 1 To Lrow
    If InStr(CanTim, UCase$(Cells(iJ, 1))) > 0 Then
        Dim Iz As Byte, Rng0 As Range
        
        Set Rng = Cells(iJ, 1)
        Set Rng0 = Sheets("Copy").Range("A" & _
            Sheets("Copy").Cells(65432, 1).End(xlUp).Row + 1)
            
        Rng.Copy Destination:=Rng0
            For Iz = 1 To 4
                Set Rng = Cells(iJ + Iz, 2)
                Rng.Copy Destination:=Rng0.Offset(, Iz + 1)

            Next Iz
9'          Exit For
    End If
 Next iJ
End Sub

 

[baby1982]

Không thể tìm chuỗi MItsuKy . . . vân vân được
Chỉ tìm được & Copy khi cột A có từ mItSuky & chỉ nguyên từ đó mà thôi;
Làm sao mà tìm 'Hà thành' trong chuỗi "Hà nội, thủ đô nước CHXHCN Việt nam"?!! hay ngược lại!

2. Còn việc tìm kiếm từ "Hà Thành" trong chuỗi "Hà nội, thủ đô nước CHXHCN Việt nam"?!! hay ngược lại... thì thật sự ý của E không phải như vậy rồi. Vì rõ ràng là trong chuỗi tìm kiếm của E và các Cell trong CSDL đều có từ mitsuky (Và tất nhiên, nếu tìm không thấy thì nó sẽ bỏ qua). Không giống như giả thuyết của A đã nêu đâu. A lấy việc minh họa này so sánh với VD của E sao...

Vậy, xin cho E hỏi 1 lần cuối cùng đối với Macro này A nhé:
1. E gõ vào chuỗi tìm kiếm trong D1 thì chỉ có thể gõ ngắn hơn hoặc bằng với từ mà em muốn tìm thôi, phải không A?
2. Cái code sau A gởi sao E thấy nó không có địa chỉ Destination của sheet nào vậy A?

Cám ơn Anh.

 

[SA_DQ]

Vậy, xin cho E hỏi 1 lần cuối cùng đối với Macro này A nhé:
1. E gõ vào chuỗi tìm kiếm trong D1 thì chỉ có thể gõ ngắn hơn hoặc bằng với từ mà em muốn tìm thôi, phải không A?
2. Cái code sau A gởi sao E thấy nó không có địa chỉ [/COLOR]Destination của sheet nào vậy A?

* Vđ 1
Nếu trong cột A có từ 'Sao mai' & chỉ nguyên nó thôi
Thì nhập vô D1 chuỗi nào dài có thể, chỉ cần chứa chử 'sao Mai' thì bản thân nó & 4 ô dưới nó ở cột bên cạnh đều chép sang sheet khác;
Cụ thể; Nếu A9 chứa nội dung 'baby1982'
Giờ bạn nhập vô D1 đoạn sau:
'Ở đâu có thể tìm ra chuỗi BaBy1982 được không ta? Tìm xong thì uống cà phê nghen!'
Sau đó cho chạy macro thứ 3;
Khi tìm thấy tại ô A9, macro sẽ đem dữ liệu A9, B10:B13 sang chép vô
hàng cuối theo thứ tự cột A-D;
* VĐ 2 Mình đã thấy bạn yêu cầu chép đến 5 ô dữ liệu nên khai bào biến Rng0 làm ô đích chép đến đấy thôi



Thấy không, trình độ của mình cũng tăng lên nhờ những câu hỏi của bạn í nha!

 

[btlinh]

Mọi người cho em hỏi với

Bình thường muốn tìm kiếm một câu hoặc một từ nào đó trong file Excel thì dùng Ctrl + F , nhưng em muốn hỏi là có cách nào để khi cần tìm kiếm một từ nào đó trong file excel, nếu từ đó nằm ở ô A3 thì ô A3 đó sẽ đổi thành màu đỏ để cho dễ nhìn và nếu tiếp tục ấn NEXT để tìm tiếp thì ô khác có dữ liệu đúng như thế sẽ là màu đỏ ko? ./ CÓ nghĩa là khi ô nào có chứa từ đó thì màu đỏ sẽ trượt đến để dễ nhìn

Mình cũng có câu hỏi gần giống bạn. Tức là tìm 1 số nào đó cho trước, kết quả sẽ đưa ra đường dẫn đến 1 file nào đó trong nhiều file (kể cả số trùng).
Các bạn giúp mình với.
Cảm ơn nhiều.

 

[Ly_Hung]

Em cũng đang gặp phải vấn đề về tìm kiếm, cụ thể là khi lập danh sách nhân hộ khẩu của 1 khu dân cư, sau khi lập xong các sheet KHAU_VQ và HO_VQ, có 2 vấn đề phải xử lý:
1- tạo một sheet tìm kiếm để khi gõ tên vào đó sẽ cho đầy đủ các thông tin về hộ, khẩu. Em đã thử dùng cách lập công thức của anh AT 1066 chỉ nhưng không có kết quả.
2- khi lấy danh sách từ 18 hay 14 tuổi trở lên, danh sách 14 hay 17 tuổi, nếu dùng Auto Filter để lọc thì chỉ được 1 lần, sau này có biến động lại phải lọc lại.
Mong được sự giúp đỡ của các anh chị. Xin trân trọng cảm ơn.

 

[SA_DQ]

Vấn đề I của bạn đây, xin mời xem file

1- tạo một sheet tìm kiếm để khi gõ tên vào đó sẽ cho đầy đủ các thông tin về hộ, khẩu. Em đã thử dùng cách lập công thức của anh AT 1066 chỉ nhưng không có kết quả.
2- khi lấy danh sách từ 18 hay 14 tuổi trở lên, danh sách 14 hay 17 tuổi, nếu dùng Auto Filter để lọc thì chỉ được 1 lần, sau này có biến động lại phải lọc lại.

Mình đến giờ lên đường rồi; Hẹn khi khác . . . .

 

[Ly_Hung]

Cảm ơn anh SA_DQ rất nhiều, nhưng em chưa hiểu là lỗi ở đâu, anh có thể chỉ cho em cách làm được không. Em muốn tìm theo tên thì phải làm thế nào ạ?

 

[Ly_Hung]

Bạn dùng chức năng sẵn có của Excel Conditional Formatting

TDN

Em làm thử nhưng chỉ thấy đổi được màu của ô thôi, anh chỉ rõ hơn chút đi.

 

[saobang1902]

Mình có vấn đề này đang bị vướng các bạn chỉ giúp mình nhé!
Mình muốn đếm các mã hàng thỏa mãn trong khoảng giá trị của một cột. Mình có gửi trong flie đính kèm các bạn xem giúp nhé.
Cảm ơn rất nhiều

 

[vantrinh_KD]

anh có thể chỉ cho em thêm cách nhập mã code và cách xuất ra file excel được không ?

 

[nguyentinhhn]

Dùng hàm countifs bạn nhé.

 

[ngacctv]

Thử file này xem có đúng ý bạn ko?
ANH TUẤN ơi, em có dwonload về nhưng không hiểu ra sao cả. E chỉ thấy có file excel hiện ra thôi. Giờ em muốn dùng vào file excel của em thì làm sao hả anh? Giúp em với nha.

 

[lammtv]

Hô... hô... cái đó là thừa.. ko có tác dụng gì trong file này cả.. chẳng qua tôi mượn dử liệu trong 1 file khác đễ làm mà...
Giờ cải tiến lại file trên, tìm dc số và chử luôn... Gõ đến đâu tìm đến đó.. ha.. ha..
Xem file mới nhé
ANH TUẤN

Anh cho em hỏi cái này nếu mình để trống ô F1 thì nó tô đỏ hết tất cả bảng tính luôn, giờ em muốn nếu để trống thì nó ko tô gì hết thì làm sao anh?

 

[prokcalvin]

anh tuấn chỉ dùm cách để đưa khung search sang một file khác với

em cảm ơn trước

 

[thienlaind]

Chào cả nhà!

Cho mình hỏi có ai biết cách tìm sheet trong excel không thì chỉ giúp mình với (một file có khoảng 70 sheet và các sheet đã được đổi tên theo nội dung của sheet và bây giờ mình muốn tìm một trong số các sheet đó nhưng không biết cách tìm.Mọi người làm ơn chỉ giúp mình với). Thanks!

 

[phamhoangquan1051990]

vậy làm sao để tạo nút lệnh đó vậy anh.

 

[mr_trong_90]

anh tuấn hướng dẫn em cụ thể cách tạo ô seach như trong 2 file ở trang đầu của anh với. Em làm hoài mà chưa được.

 

[ngominhthuan]

chương trình tìm kiếm của anh rất hay.
cảm ơn a tuấn nhé

 

[vudung75]

Tuấn ơi bạn có thể hướng dẫn cách làm cái file search của bạn không. mình tìm mãi k thấy code. lên không ứng dụng được lên các file có sãn của mình. Mà copy qua file mẫu của bạn thì bất tiện quá, với lại với khối lượng dữ liệu lớn hơn thì nó k nhận hết được. Cám ơn bạn nhiều

 

[tappinlu]

Gửi AnhTuan.
Mình có 1 bảng tính, m hàng và n cột.
Khi mình Ctrl+F một tên nào đó, mình muốn nó hiện màu các ô có tên đó thì làm sao?
Cảm ơn nhiều.
Thanh.

 

[Manofwar77]

Vẫn chưa thấy bác nào giúp cho làm thế nào làm ra cái hộp tìm kiếm để thêm vào bảng cần tìm.

 

[thaocavang]

Các bạn muốn xem lệnh trong File a Tuan thi vào Conditional Format
Chọn Manage Rules, chọn trong ô chọn lạ This Sheet, sẽ thây đoạn mã lệnh của a Tuấn

 

[lucgiakg]

Chào các bạn !
Mình có 01 vấn đề trong việc tìm kiếm dữ liệu mong các bạn hướng dẫn giúp mình với nhé:
- Ví dụ mình có 01 vùng dữ liệu đễ tìm kiếm. Sau đó mình sẽ so sánh dữ liệu trên 01 cell khác với vùng dữ liệu đã có sẵn. Khi tìm kiếm có kết quả trùng với dữ liệu trên cell cần tìm thì mình muốn lấy kết quả nằm ở cell sát bên phải cell đã tìm được của vùng dữ liệu có sẵn đó trên cùng 01 hàng. Vậy có công thức nào làm được điều đó không mong các bạn hướng dẫn dùm. Xin cảm ơn trước !!

 

[lucgiakg]

Chào các bạn !
Để làm rõ hơn vấn đề trên, mình xin làm 01 ví dụ cụ thể để các bạn dễ hình dung và có hướng giải quyết giúp mình nhé:
Ví dụ: mình có 1 hàng dữ liệu mẫu thế này
1,5 2,6 3,1 4,5 6 8,5
Dữ liệu so sánh là: 3,1.
Vậy khi dò tìm trong bảng dữ liệu trên kết quả cần tìm sẽ là: 4,5.
Xin cám ơn các bạn !!

 

[9mare]

Chào anh, chị,
Cho em hỏi, khi cần tìm kiếm một từ/số nào đó trong file excel bằng lệnh ctrl+f, nếu từ đó nằm ở ô A3, thay vì đổi ô A3 thành màu đỏ như bạn nangbuon hỏi thì có cách nào lấy giá trị của ô A3 đó ra 1 ô khác mà mình muốn ko? và các giá trị sẽ hiển thị lần lượt từ trái sang phải?

 

[duyk44]

có gì hay gửi cho mọi người bạn nhé.mà bạn có phần mềm tìm kiến ko?

 

[nppthenguyen]

sư phụ sao tao được ô tiềm kiếm vây? chỉ dùm với

 

[truongnhat1984]

Chao cac anh chi!
Minh chua tung hoc excel bao gio, minh chi hoc duoc wa ban be va tren mang. Hien nay minh dang gap kho khan muon cac anh chi giup do.
Minh co cac cot A1 chua ngay thang nam, minh dung ham =month(today())=A1 để chon thang hien tai, nhung khi minh chen them mot dong moi va nhap ngay thang nam vao thi o cong thuc khong hien thi duoc gia trị dung sai, mong ccc anh chi giup do
Xin goi qua dia chi nguyennhat1984@yahoo.com.vn

[warning1]Bạn nhớ gõ tiếng Việt có dấu nhé.[/warning1]

 

[nhat chi mai]

Chao cac anh chi!
Minh chua tung hoc excel bao gio, minh chi hoc duoc wa ban be va tren mang. Hien nay minh dang gap kho khan muon cac anh chi giup do.
Minh co cac cot A1 chua ngay thang nam, minh dung ham =month(today())=A1 để chon thang hien tai, nhung khi minh chen them mot dong moi va nhap ngay thang nam vao thi o cong thuc khong hien thi duoc gia trị dung sai, mong ccc anh chi giup do
Xin goi qua dia chi nguyennhat1984@yahoo.com.vn

Anh có thể gửi file lên không? xem bị lỗi chỗ nào... nếu định dạng ngày tháng năm theo kiểu dd/mm/yyyy thì mình vẫn sử dụng được.

 

[taybacxa]

Dùng hàm Search

Bài này rất hay, tuy nhiên nếu giờ muốn sau khi tìm xong mà lọc ra hẳn một vùng riêng tự động thì làm thế nào nhỉ?

 

[donghotreotuong]

Anh Tuấn Anh anh chỉ em cách làm cái nút tìm kiếm đó đi thank anh!

 

[hieuxd]

Các bạn muốn xem lệnh trong File a Tuan thi vào Conditional Format
Chọn Manage Rules, chọn trong ô chọn lạ This Sheet, sẽ thây đoạn mã lệnh của a Tuấn

sư phụ sao tao được ô tiềm kiếm vây? chỉ dùm với

Tuấn ơi bạn có thể hướng dẫn cách làm cái file search của bạn không. mình tìm mãi k thấy code. lên không ứng dụng được lên các file có sãn của mình. Mà copy qua file mẫu của bạn thì bất tiện quá, với lại với khối lượng dữ liệu lớn hơn thì nó k nhận hết được. Cám ơn bạn nhiều

Bài của sư phụ là bài #2
Sư phụ chỉ dùm cách để có thể tìm kiếm được ở File khác
Em ngồi nghĩ mãi tóc rụng hết mất thôi
Nhiều người tóc rụng chắc các hãng Dầu gội lại tồn kho nhiều

 

[onecry]

sr đào top em cũng đang cần cách tìm kiếm giới hạn vùng tìm trong 1 cột và giá trị tiềm được có màu cho dể nhìn, vì tính chất công việc phải tìm theo cách thủ công này rất nhiều, mà cửa sổ tìm kiếm lại chiếm hết 1 phần trên destop nhiều lúc chạy lung tung nữa, mong được anh Tuấn giúp!

 

[kent_kool]

ANHTUAN1066 có thể làm giúp mình một ô tìm kiếm như file "tìm kiếm" ở trên không? Để dùng trong công việc tìm kiếm của mình được dễ hơn

 

[nhox_lov_kute]

cho mình hỏi làm cái box tìm kiếm đó ntn z

 

[Hong.Van]

cho mình hỏi làm cái box tìm kiếm đó ntn z

Kg biết bạn hỏi ai? hỏi bài nào?

 

[pham huy]

Làm thế nào để tạo được cái tìm kiếm như của anh thế anhtuan1066

 

[quoctkcb2011]

A Tuấn ơ trỉ em cách làm ô tìm kiếm với!cảm ơn a nhiều nhé

 

[manguro]

Hô... hô... cái đó là thừa.. ko có tác dụng gì trong file này cả.. chẳng qua tôi mượn dử liệu trong 1 file khác đễ làm mà...
Giờ cải tiến lại file trên, tìm dc số và chử luôn... Gõ đến đâu tìm đến đó.. ha.. ha..
Xem file mới nhé
ANH TUẤN

File của AnhTuấn hay quá, mà em không biết làm thế nào để nó tìm kiếm vào file của mình. thanks

 

[nnt32002]

Xin anhtuan1066 vui lòng hướng dẫn cách làm Timkiem_1.xls để mình có thể tự làm áp dụng ở các file khác. Xin cảm ơn.

 

[nghiapv084]

Nhờ các anh cho em xin code tìm kiếm trong file Excell , hiện giờ em đang rất cần file tìm kiếm nầy nhưng yếu quá nên không giải quyết được , mong các anh hổ trợ giúp ạ
Trong file excell tìm kiếm nầy chỉ cần nhập vào mã số biên bản bên sheet tìm kiếm thì sẽ tìm bên sheet data các giá trị như MST , hay số xe và list hóa đơn theo số biên bản . còn các thông tin khác có thể viết hàm cũng được .
Em xin cảm ơn.

 

[nghiapv084]

Nhờ các anh cho em xin code tìm kiếm trong file Excell , hiện giờ em đang rất cần file tìm kiếm nầy nhưng yếu quá nên không giải quyết được , mong các anh hổ trợ giúp ạ
Trong file excell tìm kiếm nầy chỉ cần nhập vào mã số biên bản bên sheet tìm kiếm thì sẽ tìm bên sheet data các giá trị như MST , hay số xe và list hóa đơn theo số biên bản . còn các thông tin khác có thể viết hàm cũng được .
Em xin cảm ơn.

 

[cskh.fiona]

anh chỉ em cách làm được như vậy được không
mail: tdt1125@gmail.com

 

[hong0912]

Anh ơi, anh có thể chỉ em cách làm được không? Công thức như thế nào để có thể làm được như thế vậy anh?
Anh vui lòng chỉ em nha,
Cảm ơn anh.