tách các dữ diệu trong 1 cột vào các cột theo đối tượng và mã sử dụng

[vohoangtung]

em đang làm kiểm kê đất đai. Mong anh chị trong diễn đàn giúp mình thực hiện với.

 

[dhn46]

Tại H3 bạn sử dụng công thức này:

=IFERROR(IF($E3<>"",--MID($E3,FIND(H$2,$E3,FIND(LOOKUP(2,1/($H$1:H$1<>""),$H$1:H$1),$E3))+4,FIND(";",$E3,FIND(H$2,$E3,FIND(LOOKUP(2,1/($H$1:H$1<>""),$H$1:H$1),$E3)))-FIND(H$2,$E3,FIND(LOOKUP(2,1/($H$1:H$1<>""),$H$1:H$1),$E3))-5),""),"")

 

[huuthang_bd]

Tại H3 bạn sử dụng công thức này:

=IFERROR(IF($E3<>"",--MID($E3,FIND(H$2,$E3,FIND(LOOKUP(2,1/($H$1:H$1<>""),$H$1:H$1),$E3))+4,FIND(";",$E3,FIND(H$2,$E3,FIND(LOOKUP(2,1/($H$1:H$1<>""),$H$1:H$1),$E3)))-FIND(H$2,$E3,FIND(LOOKUP(2,1/($H$1:H$1<>""),$H$1:H$1),$E3))-5),""),"")

Công thức này chưa đúng. Cụ thể là những ô màu vàng trong file đính kèm.

Bạn chủ topic thử 1 trong 2 cách sau xem:
Cách 1: Dùng công thức sau cho ô H3:

=LEFT(SUBSTITUTE(TRIM(MID(SUBSTITUTE(LEFT(SUBSTITUTE(MID($E3,IFERROR(SEARCH(LOOKUP("z",'Sheet1 (2)'!$H$1:H$1),$E3),999),999),"+",REPT(" ",999)),999),H$2&"(",REPT(" ",999)),999,999)),")",REPT(" ",99)),99)

Cách 1: Dùng hàm tự tạo sau:

Function LayThongTin(ThanhPhan As String, DoiTuong As String, LoaiDat As String) As String
If ThanhPhan = "" Or DoiTuong = "" Or LoaiDat = "" Then Exit Function
With CreateObject("VBScript.RegExp")
    .Pattern = ".*" & DoiTuong & ":[^\+]*" & LoaiDat & "\((\d+)\).*"
    If .Test(ThanhPhan) Then LayThongTin = .Replace(ThanhPhan, "$1")
End With
End Function

với công thức tại ô H3:

=LayThongTin($E3,LOOKUP("z",$H$1:H$1),H$2)

 

[vohoangtung]

Cách của anh thì em tách được đúng các dòng có diện tích thành phần nhưng với thửa đất có 1 loại đất 1 chủ sử dụng thì chưa nhận được, những ô em bôi màu vàng, không biết có thể lồng hàm if vào được không, xin giúp em với

 

[huuthang_bd]

Cách của anh thì em tách được đúng các dòng có diện tích thành phần nhưng với thửa đất có 1 loại đất 1 chủ sử dụng thì chưa nhận được, những ô em bôi màu vàng, không biết có thể lồng hàm if vào được không, xin giúp em với

Trong câu hỏi ban đầu bạn có đề cập đến trường hợp này đâu mà nhận được với chả không.

 

[vohoangtung]

Còn 2 trường hợp nữa 1 đối tượng nhiều thành phần và 1 loại đất 2 đối tượng xin nhờ bác huuthang_bd hỗ trợ giúp em với. Anh có thể viết đoạn mã nữa copy vào cùng modules, em liên kết bằng lệnh if và lệnh and. Thanks

 

[vohoangtung]

sao em không gửi được file lên nhỉ

 

[vohoangtung]

Không ai giúp đỡ được em sao, huhuhu