Xin giúp đỡ, tìm số còn thiếu trong dãy 10 số 0123456789 (1 người xem)

[leanhhai1205]

xin các bác giúp đỡ tìm các số còn thiếu trong cột A điền vào cột B của dải 10 số từ 0123456789
Ví dụ cột A có số 01 thì cột B sẽ tự điền số 23456789.
Cám ơn các bác !

Bài đã được tự động gộp: 28/6/20

em đã làm được rồi các bác ạ

 

[Hoàng Tuấn 868]

xin các bác giúp đỡ tìm các số còn thiếu trong cột A điền vào cột B của dải 10 số từ 0123456789
Ví dụ cột A có số 01 thì cột B sẽ tự điền số 23456789.
Cám ơn các bác !

Bài đã được tự động gộp: 28/6/20

em đã làm được rồi các bác ạ

Bạn làm thế nào cho anh em tham khảo được không. Xin cảm ơn.

 

[ndu96081631]

xin các bác giúp đỡ tìm các số còn thiếu trong cột A điền vào cột B của dải 10 số từ 0123456789
Ví dụ cột A có số 01 thì cột B sẽ tự điền số 23456789.
Cám ơn các bác !

Bài đã được tự động gộp: 28/6/20

em đã làm được rồi các bác ạ

Hy vọng là đúng:

Function RemDigits(ByVal NumText As String) As String
  Const DIGITS = "0123456789"
  With CreateObject("VBScript.RegExp")
    .Global = True
    .Pattern = "[" & NumText & "]"
    RemDigits = .Replace(DIGITS, "")
  End With
End Function

 

[VetMini]

Bạn làm thế nào cho anh em tham khảo được không. Xin cảm ơn.

Gặp tôi thì tôi hỏi: bài toán này dùng làm gì vậy?

 

[hunglam123]

Hy vọng là đúng:

Function RemDigits(ByVal NumText As String) As String
  Const DIGITS = "0123456789"
  With CreateObject("VBScript.RegExp")
    .Global = True
    .Pattern = "[" & NumText & "]"
    RemDigits = .Replace(DIGITS, "")
  End With
End Function

SỮa lại code 1 tí nữa anh ơi. Nếu ô đó trống trống thì phải trả về 0123456789

 

[amyadiot]

Các thầy cô và anh chị cho em hỏi, nếu bài này nếu chỉ dùng 1 công thức, không dùng VBA thì có cách nào làm được không ạ?
Em hiểu là có thể dùng {=IF(ISNA(MATCH("*" & {0,1,2,3,4,5,6,7,8,9} & "*", A1,0),{0,1,2,3,4,5,6,7,8,9},""))} (input string tại ô A1) để có chuỗi số còn thiếu nhưng có cách nào để nối các phần tử của chuỗi trả về không ạ?
Em xin chân thành cảm ơn ạ.

 

[Phuocam]

Các thầy cô và anh chị cho em hỏi, nếu bài này nếu chỉ dùng 1 công thức, không dùng VBA thì có cách nào làm được không ạ?
Em hiểu là có thể dùng {=IF(ISNA(MATCH("*" & {0,1,2,3,4,5,6,7,8,9} & "*", A1,0),{0,1,2,3,4,5,6,7,8,9},""))} (input string tại ô A1) để có chuỗi số còn thiếu nhưng có cách nào để nối các phần tử của chuỗi trả về không ạ?
Em xin chân thành cảm ơn ạ.

Thử công thức dài này:

=IF(ISERR(SEARCH(0,A1)),0,"")&SUBSTITUTE(SUMPRODUCT(ISERR(SEARCH({1,2,3,4,5,6,7,8,9},A1))*{1,2,3,4,5,6,7,8,9}*10^(10-{1,2,3,4,5,6,7,8,9})),0,"")