Help ! Tách số ra khỏi chuỗi ký tự (1 người xem)

[lovestorn1981]

Chào các bạn, mình đang có 1 vấn đề về việc tách số ra khỏi chuỗi ký tự nhưng không biết làm thế nào, mong các bạn giúp đỡ

Cám ơn các bạn rất nhiều.

 

[hosibien]

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

Chào các bạn, mình đang có 1 vấn đề về việc tách số ra khỏi chuỗi ký tự nhưng không biết làm thế nào, mong các bạn giúp đỡ

Cám ơn các bạn rất nhiều.

Có phải như file kèm theo sau không

 

[lovestorn1981]

file của bạn chỉ đạt được 1 phần ý của mình thôi, dòng okcgiang5514_cc1 --> 5514 chứ không phải ra kết quả là 55141, mà sao công thức của bạn mình copy sang 1 file khác cũng công thức đó lại không chạy được. bạn xem lại giúp mình

 

[Quang_Hải]

Hay là xài VBA đi cho nhanh

 

[nmhung49]

Bạn có thể dùng VBScript

Sub ktra()
Dim i As Long
With Sheets("sheet1").Range("a1")
        vung = .CurrentRegion.Value
With CreateObject("Vbscript.Regexp")
    .Global = True
    .IgnoreCase = True
    .Pattern = "\D"
     For i = 1 To UBound(vung)
        vung(i, 1) = .Replace(vung(i, 1), "")
     Next
End With
    .Offset(, 1).Resize(UBound(vung)).Value = vung
End With
End Sub

 

[nini_123]

Mình cũng như bạn này, ai biết chỉ gấp dùm. Ai biết chỉ gấp dùm, cám ơn rất nhiều!

 

[Quang_Hải]

Mình cũng như bạn này, ai biết chỉ gấp dùm. Ai biết chỉ gấp dùm, cám ơn rất nhiều!

Sao không thử công thức và code phía trên

 

[lovestorn1981]

Các bác cho hỏi với yêu cầu như trên mình có thể dung công thức được không?

 

[Quang_Hải]

Muốn công thức thì có công thức nhưng đừng kêu giải thích nha, dài quá xá bạn ơi...

 

[concogia]

Các bác cho hỏi với yêu cầu như trên mình có thể dung công thức được không?

Nếu cấu trúc dữ liệu đúng "i- xì- boon" như trong bài của bạn thì có thể dùng 1 name ( cho gọn công thức) xử nó cũng được
Nếu còn có các kiểu khác thì......phải sửa nữa
Thân