Connecting & Sharing
CaoCuong.Net Facebook 2019-04-28T02:55:28Z Với mình excel là một ứng dụng rất thú vị, được làm việc hằng ngày với excel là niềm vui lớn của bản thân mình, tiếp tục chuỗi chia s...

Tách Số Ra Khỏi Chuỗi Trong Excel

In ra - Lưu thành PDF - Gửi qua email


Với mình excel là một ứng dụng rất thú vị, được làm việc hằng ngày với excel là niềm vui lớn của bản thân mình, tiếp tục chuỗi chia sẻ các thủ thuật excel, hôm nay mình sẽ chia sẻ với các bạn cách tách số ra một chuỗi trong excel bằng vba excel.

Các bạn biết vba excel là gì rồi chứ, chưa biết thì tìm hiểu thêm nhé, bây giờ chúng ta sẽ sử dụng nó để tách một số, dãy số ra khỏi một chuỗi trong excel.

Các bạn quan sát chúng ta có một chuỗi như sau, trong đó có các số xen kẽ, có thể nằm giữa chuỗi, nằm đầu hoặc cuối của một chuỗi, nhiệm vụ của chúng ta là tách chúng ra khỏi chuỗi đó.


Nhấn phím tắt Alt + F11 để mở chương trình ghi vba, sau đó vào Insert - Module


Copy đoạn code bên dưới và dán vào khung soạn thảo
Function ExtractNumber(rCell As Range)
Dim lCount As Long
Dim sText As String
Dim lNum As String
sText = rCell
For lCount = Len(sText) To 1 Step -1
If IsNumeric(Mid(sText, lCount, 1)) Then
lNum = Mid(sText, lCount, 1) & lNum
End If
Next lCount
ExtractNumber = CLng(lNum)
End Function
Như hình


Sau đó tắt cửa sổ vba đi quay trở lại với màn hình excel lúc nãy, nhập vào ô B2 công thức sau:

=EXTRACTNUMBER(A2)

Nhấn Enter 


Kết quả số đã được tách ra khỏi chuỗi


Copy xông thức xuống các ô còn lại


Hãy thử với một chuỗi có chưa hai dãy số xem kết quả như thế nào, kết quả sẽ ghép các số có trong chuỗi lại với nhau


Chú ý nếu bạn gửi file này qua mấy khác thì công thức sẽ mất, hãy lưu lại file dưới dạng có macro hoặc copy công thức và dán value trước khi gửi đi.
CaoCuong

 

Admin: Cao Cường

CaoCuong.Net - Chuyên trang chia sẻ về các thủ thuật excel và kiến thức tin học văn phòng. Tại đây bạn có thể tự học kiến thức cũng như gửi các thắc mắc của mình về những gì liên quan đến excel và tin học văn phòng.

5 CaoCuong.Net: Tách Số Ra Khỏi Chuỗi Trong Excel Với mình excel là một ứng dụng rất thú vị, được làm việc hằng ngày với excel là niềm vui lớn của bản thân mình, tiếp tục chuỗi chia s...

Bài mới nhất: