Home / Tổng hợp / tách số ra khỏi chuỗi

Tách số ra khỏi chuỗi

admin 11/05/2022

tin tức hỗ trợ tư vấn tri thức Tin VP bảo mật Mạng Máy bộ phần mềm

Bạn đang xem: Tách số ra khỏi chuỗi

Ví dụ bạn có một cột dữ liệu trong các số đó có các ô chứa dạng số và dạng kí tự và bạn có nhu cầu tách nó như hình dưới

Để làm được bài toán này các bạn cần tạo thành một hàm phương thức như sau .

Mở file Excel tất cả chứa nội dung bạn cần bóc , bấm tổ hợp phím ALT+F11 để open số Microsoft Visual Basic .

Bấm Insert > Module và bạn coppy nội dung mặt 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) & pIsNumber) Or (Not (VBA.IsNumeric(xStr)) and Not (pIsNumber))) Then

SplitText = SplitText + xStr

end If

Next

End Function

Quay trở về Excel .

Nếu ao ước lấy rất nhiều kí tự chưa hẳn ở dạng số bạn gõ hàm phương pháp như sau

=SplitText(A2,FALSE)

Nếu ý muốn lấy số thì theo công thức

=SplitText(A2,TRUE)

Họ và tên *
Email của người tiêu dùng *
lời nhắn *

Các tin khác

Excel : Đổi chữ cái trước tiên thành viết hoa giữ nguyên những phần còn sót lại Excel : Tìm giá bán trị bự nhất với khá nhiều điều khiếu nại Excel : Chèn số trang vào một ô cùng một loạt đa số ô trong những số đó có cất cả lỗi Excel không tự động hóa tính toán sau khi thay đổi số liệu Excel : Xóa phần lớn số 0 làm việc đầu ô Excel : lặp lại số liên tục Excel : kiếm tìm kiếm các giá trị trả về theo hàng ngang Excel : Gỡ quăng quật những kí tự quan trọng đặc biệt không phải vần âm Xóa toàn thể công thức chỉ giữ lại giá trị trong tất cả các Sheet

Xem thêm: Giải Thích Câu Tục Ngữ: Tốt ... Hơn Lành Áo, Giải Thích Câu Tục Ngữ: Tốt Danh Hơn Lành Áo