Cách lọc số ra khỏi chủ trong Excel

Để làm được việc này bạn cần tạo ra một hàm cách thức như sau .

Mở file Excel có chứa nội dung bạn cần tách , bấm tổ hợp phím Insert > Module và bạn sao chép nội dung bên dưới

Public Function SplitText[pWorkRng As Range, pIsNumber As Boolean] As String

Dim xLen As Long

Dim xStr As String

xLen = VBA.Len[pWorkRng.Value]

For i = 1 To xLen

xStr = VBA.Mid[pWorkRng.Value, i, 1]

If [[VBA.IsNumeric[xStr] And pIsNumber] Or [Not [VBA.IsNumeric[xStr]] And Not [pIsNumber]]] Then

SplitText = SplitText + xStr

End If

Next

End Function

Quay trở lại Excel .

Nếu muốn lấy những kí tự không phải ở dạng số bạn gõ hàm công thức như sau

=SplitText[A2,TRUE]