Kết quả 1 đến 5 của 5

Chủ đề: Hàm trích xuất xâu ký tự từ xâu đã có

  1. #1
    hoanggiang212 Guest

    Hàm trích xuất xâu ký tự từ xâu đã có

    Em có dữ liệu như sau
    Tại cột A có dữ liệu trộn lẫn địa chỉ là Thôn + Xã
    A1: TDP4 + NAM LÝ

    A2: TÂN HÓA ; MINH HÓA

    A3: NGUYỆT ÁNG - TÂN NINH

    A4: THÔN 7 + LỘC NINH
    Có hàm nào giúp em đưa:
    1. Thôn vào cột B, từ B1 cho đến B4:
    2. Xã vào cột C, từ C1 đến C4


    Trong đó thôn và xã được cách nhau bởi dấu +, - hoặc ;
    Có nghĩa Cột B cứ trích xâu từ bên trái cho đến các dấu trên thì dừng lại
    Cột C trích từ bên phải xâu, nếu gặp các ký tự trên thì dừng lại
    Cảm ơn anh chị

  2. #2
    kenshin Guest
    Trích dẫn Gửi bởi netvietcomputer
    Em có dữ liệu như sau
    Tại cột A có dữ liệu trộn lẫn địa chỉ là Thôn + Xã
    A1: TDP4 + NAM LÝ

    A2: TÂN HÓA ; MINH HÓA

    A3: NGUYỆT ÁNG - TÂN NINH

    A4: THÔN 7 + LỘC NINH
    Có hàm nào giúp em đưa:
    1. Thôn vào cột B, từ B1 cho đến B4:
    2. Xã vào cột C, từ C1 đến C4
    Tại B1 nhập công thức:

    Mã:
    =IFERROR(IFERROR(LEFT(A1,LEN(TRIM(A1))-FIND("+",A1)-2),LEFT(A1,LEN(TRIM(A1))-FIND(";",A1)-1)),LEFT(A1,LEN(TRIM(A1))-FIND("-",A1)))
    Tại C1 nhập công thức:

    Mã:
    =IFERROR(IFERROR(RIGHT(A1,LEN(TRIM(A1))-FIND("+",A1)),RIGHT(A1,LEN(TRIM(A1))-FIND(";",A1)-1)),RIGHT(A1,LEN(TRIM(A1))-FIND("-",A1)))

  3. #3
    niemtin259 Guest
    Trích dẫn Gửi bởi netvietcomputer
    Em có dữ liệu như sau
    Tại cột A có dữ liệu trộn lẫn địa chỉ là Thôn + Xã
    A1: TDP4 + NAM LÝ

    A2: TÂN HÓA ; MINH HÓA

    A3: NGUYỆT ÁNG - TÂN NINH

    A4: THÔN 7 + LỘC NINH
    Có hàm nào giúp em đưa:
    1. Thôn vào cột B, từ B1 cho đến B4:
    2. Xã vào cột C, từ C1 đến C4
    Xin chia sẻ 1 cách không dùng hàm:

    Mã nguồn PHP:
    Sub abc() Application.ScreenUpdating = FalseWith Sheets(1).Range("A1:A100") .Replace "+", "." .Replace ";", "." .Replace "-", "."End With Columns("A:A").Select Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _ Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _ :=".", FieldInfo:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True Application.ScreenUpdating = TrueEnd Sub  

  4. #4
    dangvanthao Guest
    [QUOTE="chuot0106"]Tại B1 nhập công thức:

    Mã:
    [B1]=TRIM(LEFT(A1,FIND(";",SUBSTITUTE(SUBSTITUTE(A1,"-",";"),"+",";"))-1))
    Mã:
    [C1]=TRIM(MID(A1,FIND(";",SUBSTITUTE(SUBSTITUTE(A1,"-",";"),"+",";"))+1,LEN(A1)))

  5. #5
    hoathachthao Guest
    Đã ok, Cảm ơn các ac nhiều [IMG]images/smilies/a44.gif[/IMG][IMG]images/smilies/a44.gif[/IMG][IMG]images/smilies/a44.gif[/IMG][IMG]images/smilies/a44.gif[/IMG][IMG]images/smilies/a44.gif[/IMG]

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •