Giúp đỡ công thức tìm kiếm

msvantinh · 10/12/09

Hi Các cao thủ , Em có dữ liệu như file đính kèm . Cần làm công thức để nó lọc riêng những thằng có địa chỉ Hà Nội , và HCM , sắp xếp Hà Nội , rồi tới HCM để tiện việc phân nguồn
Các bác giúp nhé
xin chân thành cảm ơn

Xin lỗi cả nhà ,em không đưa file lên được

Dị Chế - Tiên Lữ - Hưng Yên, Hưng Yên,
Huyện Khoái Châu - TP Hưng Yên, Hưng Yên,
105/34A Nguyễn Thần Hiến, Q4, TP. HCM,
Định Công-Hà Nội, Hà nội,
Trang Bang-Tay Ninh, TP. HCM,
Nghi khánh-- Nghi Lộc - Nghệ An, Hà nội,
Thuong Tin , Hà nội,
Đống Đa, Hà nội,
40/7 Hẻm Đống Đa , Đường Điện Biên Phủ,Phường 25,Quận Bình Thạnh.Tp.HCM, TP. HCM,
Q. Phú Nhuận, Tp.HCM, TP. HCM,
TPHCM, TP. HCM,
C7/19I bình Hưng Bình Chánh, TP. HCM,
Định Công, Hoàng Mai, Hà nội,
Thanh xuân -, Đà Nẵng,
Bắc Hải, Tân Bình, TP. HCM,
A7 Lo C8 Do thi moi Dai Kim - Q.Hoang Mai - Ha noi, Hà nội,
188 Bến Vân Đồn - F5 - Q4, TP. HCM,
113 Hồ Tùng Mậu ,Quận 1. HCM, TP. HCM,
7/61/6/11 thanh thaii q10 f14, TP. HCM,
ha noi, Hà nội,
140 nguyễn văn Thủ q1, TP. HCM,
12/81/ LInh Lang/ Ba Dinh / HN, Hà nội,
HA NOI, TP. HCM,
D20/1/1, TP. HCM,
200 Ho Van Hue, f9, q.pn., TP. HCM,
152 Lạc long quân, P.3, Quận 11., TP. HCM,
218/11 banh van tran, TP. HCM,
quan 1, TP. HCM,
67/2a ngô gia tự , p2 ,q10, thành phố HCM, TP. HCM,
67/2a ngô gia tự , p2 ,q10, thành phố HCM, TP. HCM,
546 Le Duan, TP. HCM,
199/40/51, TP. HCM,
862 Bình Trị Đông,Quận 6, TP. HCM,
Vũ Hữu, Thanh Xuân, Hà Nội, Hà nội,

ChanhTQ@ · 11/12/09

Cái ni chắc công thức sẽ khó;
Nếu bằng VBA thì sẵn lòng.
(Nếu không đưa được file thì hãy còn chức năng [Table ]. . .[/Table] mà; Rút kinh nghiệm nha!

MinhCong · 11/12/09

cái này dùng công thức để tìm ra cũng được. Nhưng để sắp xếp lại thì cần phải có cái sort tiếng việt của Thầy Phạm Duy Long. Để tiện Tôi lập công thức lọc ra làm 2 cột, 1 cột cho HN, 1 cột cho HCM. Bạn xem file để áp công thức vào bài nhé. Nếu lầm ko được post bài lên hoặc gởi qua mail Tôi sẽ post giúp.

huuthang_bd · 11/12/09

msvantinh đã viết:
Hi Các cao thủ , Em có dữ liệu như file đính kèm . Cần làm công thức để nó lọc riêng những thằng có địa chỉ Hà Nội , và HCM , sắp xếp Hà Nội , rồi tới HCM để tiện việc phân nguồn
Các bác giúp nhé
xin chân thành cảm ơn

Xem trong file nhé. Tôi dùng công thức. Tuy nhiên, trích lọc dữ liệu bằng công thức thường dùng công thức mảng. Nếu dữ liệu nhiều thì nên dùng Macro.

msvantinh · 11/12/09

Cảm ơn các anh nhiều . DỮ liệu của em khá lớn , có thể hướng dẫn dùng macoro . Hơn 200.000 dữ liệu tổng hợp kiểu em vừa post.

msvantinh · 11/12/09

MinhCong đã viết:
cái này dùng công thức để tìm ra cũng được. Nhưng để sắp xếp lại thì cần phải có cái sort tiếng việt của Thầy Phạm Duy Long. Để tiện Tôi lập công thức lọc ra làm 2 cột, 1 cột cho HN, 1 cột cho HCM. Bạn xem file để áp công thức vào bài nhé. Nếu lầm ko được post bài lên hoặc gởi qua mail Tôi sẽ post giúp.

Em thấy cách của anh khá hay và đúng là em đang cần tách riêng dữ liệu của từng tỉnh như anh đang làm . Nhưng em vẫn không hiểu công thức của anh lắm . Anh có thể hướng dẫn thêm . Cảm ơn anh thật nhiều

msvantinh · 11/12/09

ChanhTQ@ đã viết:
|A|
|Dị Chế - Tiên Lữ - Hưng Yên, Hưng Yên,|
|Huyện Khoái Châu - TP Hưng Yên, Hưng Yên, |
|105/34A Nguyễn Thần Hiến, Q4, TP. HCM, |
|Định Công-Hà Nội, Hà nội, |
|Trang Bang-Tay Ninh, TP. HCM, |
|Nghi khánh-- Nghi Lộc - Nghệ An, Hà nội, |
|Thuong Tin , Hà nội, |
|Đống Đa, Hà nội, |
|40/7 Hẻm Đống Đa , Đường Điện Biên Phủ,Phường 25,Quận Bình Thạnh.Tp.HCM, TP. HCM, |
|Q. Phú Nhuận, Tp.HCM, TP. HCM, |
|TPHCM, TP. HCM, |
|C7/19I bình Hưng Bình Chánh, TP. HCM, |
|Định Công, Hoàng Mai, Hà nội,|
|Thanh xuân -, Đà Nẵng, |
|Bắc Hải, Tân Bình, TP. HCM, |
|A7 Lo C8 Do thi moi Dai Kim - Q.Hoang Mai - Ha noi, Hà nội, |
|188 Bến Vân Đồn - F5 - Q4, TP. HCM, |
|113 Hồ Tùng Mậu ,Quận 1. HCM, TP. HCM,|
|7/61/6/11 thanh thaii q10 f14, TP. HCM, |
|ha noi, Hà nội, |
|140 nguyễn văn Thủ q1, TP. HCM, |
|12/81/ LInh Lang/ Ba Dinh / HN, Hà nội, |
|HA NOI, TP. HCM, |
|D20/1/1, TP. HCM, |
|200 Ho Van Hue, f9, q.pn., TP. HCM, |
|152 Lạc long quân, P.3, Quận 11., TP. HCM, |
|218/11 banh van tran, TP. HCM, |
|quan 1, TP. HCM, |
|67/2a ngô gia tự , p2 ,q10, thành phố HCM, TP. HCM, |
|67/2a ngô gia tự , p2 ,q10, thành phố HCM, TP. HCM, |
|546 Le Duan, TP. HCM,|
|199/40/51, TP. HCM, |
|862 Bình Trị Đông,Quận 6, TP. HCM, |
|Vũ Hữu, Thanh Xuân, Hà Nội, Hà nội, |

Cái ni chắc công thức sẽ khó;
Nếu bằng VBA thì sẵn lòng.
(Nếu không đưa được file thì hãy còn chức năng [Table ]. . .[/Table] mà; Rút kinh nghiệm nha!

Vậy anh giúp em bằng lập trình VBA đi , trước đây em cũng đã từng học qua , nhưng không sử dụng nên giờ bó tay rồi . Yêu cầu của em là dữ liệu của em gồm nhiều dòng và cột , và muốn tách riêng những thông tin của từng người theo từng tỉnh ( Hà Nội , TPHCM ). Để trích lọc nguồn .
Cảm ơn anh thật nhiều

msvantinh · 11/12/09

Để em gửi file đầy đủ cho các anh tiện nghiên cứu .

huuthang_bd · 11/12/09

msvantinh đã viết:
Cảm ơn các anh nhiều . DỮ liệu của em khá lớn , có thể hướng dẫn dùng macoro . Hơn 200.000 dữ liệu tổng hợp kiểu em vừa post.

Đây là Macro tách ra Hà Nội và TP.HCM. Hà Nội trước, HCM sau.

PHP:

Sub Loc()
Sheets("KQ").[A:A].ClearContents
ActiveSheet.AutoFilterMode = False
With Range(Sheets("DL").[A1], Sheets("DL").[A65536].End(xlUp))
.AutoFilter Field:=1, Criteria1:="=*Hà n" & ChrW(7897) & "i*"
.specialcells(xlCellTypeVisible).Copy Sheets("KQ").[A1]
Application.CutCopyMode = False
.AutoFilter Field:=1, Criteria1:="=*TP. HCM*"
.Offset(1).specialcells(xlCellTypeVisible).Copy Sheets("KQ").[A65536].End(xlUp).Offset(1)
Application.CutCopyMode = False
End With
ActiveSheet.AutoFilterMode = False
End Sub

Code này dùng cho mã Unico. Nếu dữ liệu có mã khác thì sửa chữ "Hà Nội" trong code lại.

Một mình bạn mà viết 4 bài liên tiếp. Lần sau nên gộp lại để khỏi mất công của người khác.

SA_DQ · 11/12/09

Hãy xem thêm trong file đính kèm

msvantinh đã viết:
Để em gửi file đầy đủ cho các anh tiện nghiên cứu .

PHP:

Option Explicit
Dim eRw As Long
Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, [L2]) Is Nothing Then
   eRw = MsgBox("Ban Can Xoa KQ Cu", 3, "GPE")
   If eRw = 6 Then Sheets("loc").[B2].CurrentRegion.Offset(1).ClearContents
   AdvFilter
 End If
End Sub

PHP:

Sub AdvFilter()
 Dim eRw As Long
 eRw = [B2].CurrentRegion.Rows.Count
 [A1].Resize(eRw, 8).AdvancedFilter Action:=2, CriteriaRange:=[J1].Resize(2), _
   CopyToRange:=[J8].Resize(, 8)
 [J9].CurrentRegion.Offset(1).Copy Destination:=Sheets("Loc").[a65500].End(xlUp).Offset(1)
   
End Sub

Chú í: Có thể mở rọng cho các tỉnh thành khác

ndu96081631 · 11/12/09

msvantinh đã viết:
Để em gửi file đầy đủ cho các anh tiện nghiên cứu .

Thử code này xem:

PHP:

Sub Loc()
  Sheets("KQ").[A:A].ClearContents
  With Sheets("DL").[A1].CurrentRegion
    .AutoFilter 2, "=*Hà n" & ChrW(7897) & "i*", 2, "=*TP. HCM*"
    .specialcells(12).Copy Sheets("KQ").[A1]
    .AutoFilter
  End With
End Sub

Tôi sửa lại dử liệu của bạn đôi chút (thêm tiêu đề cột và xóa bớt 1 cột rổng)

msvantinh · 11/12/09

ndu96081631 đã viết:
Thử code này xem:

PHP:

Sub Loc() Sheets("KQ").[A:A].ClearContents With Sheets("DL").[A1].CurrentRegion .AutoFilter 2, "=*Hà n" & ChrW(7897) & "i*", 2, "=*TP. HCM*" .specialcells(12).Copy Sheets("KQ").[A1] .AutoFilter End With End Sub

Tôi sửa lại dử liệu của bạn đôi chút (thêm tiêu đề cột và xóa bớt 1 cột rổng)

Anh ơi , hình như công thức không chạy thì phải.

ndu96081631 · 11/12/09

msvantinh đã viết:
Anh ơi , hình như công thức không chạy thì phải.

Có công thức gì trong này đâu ta? Tôi viết cho bạn là code VBA cơ mà ---> Bạn bấm nút (trong file) là sẽ có ngay kết quả tại sheet KQ thôi
Lưu ý: Không biết bạn đã từng chạy macro chưa nhưng cũng xin nhắc lại:
- Đóng toàn bộ Excel và mở 1 file trắng
- Vào menu Tools\Macro\Security rồi check vào muc Medium, OK
- Thoát Excel rồi mở file của tôi lên, 1 cảnh báo xuất hiện, bạn bấm vào nút Enable Macros (ở giữa 3 nút)
- Bấm nút Lọc trên sheet để chạy code
Thử lại lần nữa xem

tam8678 · 11/12/09

ndu96081631 đã viết:
Có công thức gì trong này đâu ta? Tôi viết cho bạn là code VBA cơ mà ---> Bạn bấm nút (trong file) là sẽ có ngay kết quả tại sheet KQ thôi
Lưu ý: Không biết bạn đã từng chạy macro chưa nhưng cũng xin nhắc lại:
- Đóng toàn bộ Excel và mở 1 file trắng
- Vào menu Tools\Macro\Security rồi check vào muc Medium, OK
- Thoát Excel rồi mở file của tôi lên, 1 cảnh báo xuất hiện, bạn bấm vào nút Enable Macros (ở giữa 3 nút)
- Bấm nút Lọc trên sheet để chạy code
Thử lại lần nữa xem

---
Chắc bạn ấy thấy lạ, file của chú có tới 2 nút Lọc (mỗi sheet có 1 nút đó mà)

ndu96081631 · 11/12/09

tam8678 đã viết:
---
Chắc bạn ấy thấy lạ, file của chú có tới 2 nút Lọc (mỗi sheet có 1 nút đó mà)

Tức là TÙY THÍCH ---> Đứng ở đâu cũng LỌC được mà anh ---> sợ rằng tác giả không biết xài nên phải cẩn thận vậy... thế mà vẫn hỏi lại đấy anh à!

msvantinh · 12/12/09

ndu96081631 đã viết:
Tức là TÙY THÍCH ---> Đứng ở đâu cũng LỌC được mà anh ---> sợ rằng tác giả không biết xài nên phải cẩn thận vậy... thế mà vẫn hỏi lại đấy anh à!

Cảm ơn các anh . Em bấm vào 2 cái nút lọc của anh mà nó không chạy code nên hỏi lại . sau khi anh hướng dẫn vẫn chưa sử dụng được . Vì đang sử dụng Office 2007 , nó hơi khác với 2003 nên đang phải mò
Cảm ơn nhiều đã giúp đỡ

tam8678 · 12/12/09

msvantinh đã viết:
Cảm ơn các anh . Em bấm vào 2 cái nút lọc của anh mà nó không chạy code nên hỏi lại . sau khi anh hướng dẫn vẫn chưa sử dụng được . Vì đang sử dụng Office 2007 , nó hơi khác với 2003 nên đang phải mò
Cảm ơn nhiều đã giúp đỡ

---
Tôi thấy chú NDU hướng dẫn tận tụy lắm rồi, bạn làm đúng tuần tự thì chắc chắn phải được và tôi tin bạn làm được thôi (đơn giản quá mà). Tôi sử dụng 2003 nên không biết nó khác 2007 chổ nào, rất mong anh em trên GPE cho tôi biết chổ khác này? ( Để biết thêm). Cám ơn

msvantinh · 12/12/09

tam8678 đã viết:
---
Tôi thấy chú NDU hướng dẫn tận tụy lắm rồi, bạn làm đúng tuần tự thì chắc chắn phải được và tôi tin bạn làm được thôi (đơn giản quá mà). Tôi sử dụng 2003 nên không biết nó khác 2007 chổ nào, rất mong anh em trên GPE cho tôi biết chổ khác này? ( Để biết thêm). Cám ơn

Đúng là với office 2003 thì em chạy được . Nhưng với 2007 thì tìm mãi không thấy cái tool đâu cả . Tìm mãi mới thấy macro trong Vew nhưng không chạy code ra chứ . XIn các cao thủ giúp đỡ thêm . Chân thành cảm ơn

hoangminhtien · 12/12/09

Bạn vào nút Office button (trên cùng phía tay trái), chọn Excel options. Bạn chọn Trust center, chọn tiếp Trust center setting… chọn Macro settings sau đó chọn Enable all macro… rồi nhấn OK là được

Giúp đỡ công thức tìm kiếm

Thành viên mới

0901452không62

Thành viên gắn bó

Chuyên gia GPE

File đính kèm

Thành viên mới

Thành viên mới

Thành viên mới

Thành viên mới

File đính kèm

Chuyên gia GPE

File đính kèm

/(hông là gì!

File đính kèm

Huyền thoại GPE

File đính kèm

Thành viên mới

Huyền thoại GPE

Đời Xá Chi

Huyền thoại GPE

Thành viên mới

Đời Xá Chi

Thành viên mới

Thành viên gắn bó

Đếm ngược thời gian