tách số

[Thuhanh1611]

Cho mình hỏi công thức để tách ra được số riêng chữ theo hình

 

[nlbx]

siêu tầm:
Public Function hackNum(ra As Range) As String
Dim xxx, yyy
yyy = Split(ra.Text, " ")
For Each xxx In yyy
If xxx Like "*[0123456789]*" Then
hackNum = xxx
Exit Function
End If
Next xxx
End Function

 

[Phuocam]

nhầm

 

[HieuCD]

Cho mình hỏi công thức để tách ra được số riêng chữ theo hình

G4 =TRIM(LEFT(SUBSTITUTE(MID(C4,INDEX(MIN(IFERROR(SEARCH({0,1,2,3,4,5,6,7,8,9},C4),200)),),200)," ",REPT(" ",20)),20))
F4 =TRIM(SUBSTITUTE(C4,G4,""))
copy 2 ô xuống

 

[Thuhanh1611]

có công thức nào khác ko bạn? công thức này khó hiểu quá.

 

[ndu96081631]

có công thức nào khác ko bạn? công thức này khó hiểu quá.

Thật ra có cách vô cùng dễ hiểu là ngay từ đầu bạn nhập liệu cho đàng hoàng thì thậm chí chẳng cần bất cứ công thức nào cả

 

[nlbx]

Dự là sẽ phải tách số ra khỏi đơn vị nựa