Xin công thức về tìm giá trị giống nhau trong 2 ô liền kề và giá trị còn lại (1 người xem)

  • Thread starter Thread starter bicutit
  • Ngày gửi Ngày gửi
Liên hệ QC

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

bicutit

Search Sexy Womans from your city for night
Tham gia
26/11/10
Bài viết
58
Được thích
2
Giới tính
Nam
Nghề nghiệp
Search
Chào các bác,
Em có 2 ô là Dang Hoang Binh và Dang Van Tu, em mong muốn có ô dữ liệu trùng là chữ "Dang", ô dữ liệu còn lại 1 là "Hoang Binh" và ô dữ liệu còn lại 2 là "Van Tu",
Cụ thể trong link sau, nhờ các bác giúp đỡ cho em xin lệnh từ C2 đến E3,
Em xin cảm ơn,
1649865426117.png
 
em xin đính chính lại là chỉ lọc dữ liệu trùng những từ đầu tiên đến khi không còn nữa thì thôi, phần sau dữ nguyên.
Ví dụ:
Cột A: Dang Hoang Binh An Nam Khanh
Cột B: Dang Hoang Nam Khanh Nam Thanh
thì kết quả trả về chỉ là Dang Hoang ở cột C, data 1A là Binh An Nam Khanh, data 1B là Nam Khanh Nam Thanh dù trùng ký tự thứ 3 là Nam
 
Bài này cũng hay các cao thủ vào giúp Bạn @bicutit
 
Hàm SUBSTITUTE(,,,1) là xong. Có gì đâu cao thấp. @@
 
Thử dùng VBA xem sao
Vào insert/ shape, vẽ 1 hình chữ nhật( hình bất kỳ) , chuột phải, "Assign Macro", copy cái này vào nhé
Sau đó click vào nút để chạy.
PHP:
Sub Rectangle1_Click()
Dim lr&, i&, s1, s2, cell As Range, s1a As String
lr = Cells(Rows.Count, "A").End(xlUp).Row
    For Each cell In Range("A2:A" & lr)
        s1 = Split(cell, " "): s2 = Split(cell.Offset(0, 1), " ")
            Do Until s1(i) <> s2(i)
                s1a = s1a & " " & s1(i)
                i = i + 1
            Loop
        cell.Offset(0, 2).Value = s1a
        cell.Offset(0, 3).Value = Mid(cell, Len(s1a) + 1, 255)
        cell.Offset(0, 4).Value = Mid(cell.Offset(0, 1), Len(s1a) + 1, 255)
        s1a = "": i = 0
    Next
End Sub
 

File đính kèm

Web KT

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

Back
Top Bottom