Nhờ các bạn dò tìm XY theo 2 điều kiện XA, HUYEN?

[nilt02]

Mình đang cần cập nhập tọa độ XY cho sheet CannhapXY, số liệu tọa độ có ở sheet XY
Vì số liệu rất nhiều, khoảng hơn 10.000 xã nên rất dễ trùng nhau nếu chỉ vlookup theo XA. do vậy cần cả 2 điều kiện tìm theo XA, HUYEN.
File đính kèm bên dưới.
Cảm ơn các bạn rất nhiều

 

[SA_DQ]

Dữ liệu của bạn giả lập chưa hoàn chỉnh

Option Explicit
Sub CapNhat()
 Dim Sh As Worksheet, Rng As Range, sRng As Range, Cls As Range
 Dim MyAdd As String
 
 Sheet1.Select:                  Columns("E:F").ClearContents
 [E1] = "GPE_XX":                [F1] = "GPE_YY"
 Set Sh = Sheets("XY"):          Set Rng = Sh.Range(Sh.[c1], Sh.[c65500].End(xlUp))
 For Each Cls In Range([C2], [c65500].End(xlUp))
   Set sRng = Rng.Find(Cls.Value, , xlFormulas, xlWhole)
   If sRng Is Nothing Then
      Cls.Interior.ColorIndex = 34 + Cls.Row Mod 8
   Else
      MyAdd = sRng.Address
      Do
         If Cls.Offset(, 1).Value = sRng.Offset(, 1).Value Then
            Cls.Offset(, 2).Resize(, 2).Value = sRng.Offset(, 2).Resize(, 2).Value
         End If
         Set sRng = Rng.FindNext(sRng)
      Loop While Not sRng Is Nothing And sRng.Address <> MyAdd
   End If
 Next Cls
End Sub

 

[nilt02]

Cảm ơn bạn.
Cái này vẫn chưa được bạn ah, cái row đầu của mình là Cốc Mỳ - Bát xát - thuộc Lào Cai, nhưng trong file bạn chỉnh sửa thấy nó ở Tỉnh Cà Mau ?
, -w

 

[sealand]

Bạn thử cách của mình xem, vì chỉ điền 1 lần thôi mà:

1/Nối xã và huyện thành chuỗi cả 2 bảng.
2/Dung Unikey bỏ dấu tiếng việt đi
3/Bỏ khoảng trắng đi
4/Dùng hàm Vlookup để điền

Bạn kiểm tra xem nha, có 1 số nơi không điền được và mình dùng Find tìm cũng không thấy

 

[SA_DQ]

Cái này vẫn chưa được bạn ah, cái row đầu của mình là Cốc Mỳ - Bát xát - thuộc Lào Cai, nhưng trong file bạn chỉnh sửa thấy nó ở Tỉnh Cà Mau ?

Nói rằng dữ liệu giả lập của bạn chưa hoàn chỉnh là quá nhẹ đó! Đáng bị mắn nữa là đằng khác.

Mình lập 1 macro tìm dữ liệu xã bên 'XY' từ bên 'CapNhat' thì không có 1 mống nào đó nha;

Khi đó mình fải chép từ cập nhật qua 'XY' xáo trộn đi chút đĩnh để kiểm tra tính đúng đắn của macro mà thôi.
Lí ra bạn nên xem lại dữ liệu của mình rồi hẵn fát biểu mới fải đạo. (Hay bạn kiểm xem file của mình cho kết quả đúng không, đi!)
Thật ra mình chưa đọc đươc font chữ đó & rất lười dịch ra. Nhưng mình tin rằng macro mình đúng về thuật toán.
Chào bạn!

 

[nilt02]

Hi`..thank các bác, cách của bác sealand rất đơn giản
cảm ơn bác SA_DQ đã chỉ giáo, em cũng ko biết tại sao dữ liệu lạ vậy, dùng vlookup ko tìm đc cái nào ^^, chắc do mã TCVN3 có vấn đề?
Thank you very much!

 

[SA_DQ]

Bạn có thể đến đây tham khảo http://www.giaiphapexcel.com/forum/showthread.php?36643-Tìm-giá-trị-dân-số-theo-tỉnh-huyện-xã/page2
(#14 & #15)