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

     
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

Hỗ trợ trực tuyến


đường dây nóng

04.35141.375


Hỗ trợ kỹ thuật

1088

*


*
*
*

Tin xem nhiều nhất


Đang trực tuyến




Xem thêm: Hôm Qua Anh Còn Nơi Đó - Hôm Qua Em Còn Nơi Đó Hôm Nay Tan Về Nơi Đâu

*