XIN CHỈ GIÚP CÁCH TÁCH CHUỖI KÝ TỰ TRONG EXEL Ạ
cảm ơn nhiều ạ.
Xin các anh chị trong diễn đàn chỉ giúp em cách tách chuỗi ký tự để sắp xếp lại theo thứ tự trong excel ạ. Em cảm ơn nhiều ạ.
Một cách dùng UDF:
Với ô A6 chứa chuỗi, tại B6 nhập|:
=tach(A6)
Cách dùng: ALt-F11. Insert/Module. Dán code này vô. Lưu file dạng .xlsm
code:
Option Explicit
Function tach(ByVal cell As Range)
Dim k&, sp, s, arr(), stt
sp = Split(cell, "}")
ReDim arr(1 To UBound(sp) + 1, 1 To 2)
For Each s In sp
If s <> "" Then
k = k + 1: arr(k, 1) = k
End If
Next
k = 0
For Each s In sp
If s <> "" Then
stt = Split(s, "{")(1)
arr(stt, 2) = Split(s, "{")(0)
End If
Next
For k = 1 To UBound(arr)
tach = tach & " " & arr(k, 2)
Next
End Function
www.giaiphapexcel.com/diendan/threads/xin-ch%E1%BB%88-gi%C3%9Ap-c%C3%81ch-t%C3%81ch-chu%E1%BB%96i-k%C3%9D-t%E1%BB%B0-trong-exel-%E1%BA%A0.165266/
Khóa học Power PI – Ứng dung trong Nhân sự
TỔNG QUAN KHÓA HỌC: POWER BI CHO NGÀNH NHÂN SỰ Khóa học Power BI cho Nhân sự được thiết kế dành riêng cho các...
Xem khóa học