Saberexcel - o site das Macros Microsoft Excel VBA
Função personalizada retorna números ignorandos textos
Saberexcel - Funções Personalizadas
Essa função Retorna_Numeros, tem por finalidade retornar números
contidos em uma determinada célula, ignorando o texto existente.
Uso da função na Folha de Planilha:
'=Retorna_Numeros(A1)
Function Retorna_Numeros(Cell As Range) As Long
Dim LenStr As Long
For LenStr = 1 To Len(Cell)
Select Case Asc(Mid(Cell, LenStr, 1))
Case 48 To 57
Retorna_Numeros = Retorna_Numeros & Mid(Cell, LenStr, 1)
End Select
Next
End Function
Aprenda tudo sobre o Aplicativo Microsoft Excel VBA com Saberexcel 
Baixe o exemplo de planiha ms excel da Função Retorna_Numeros()
Excel formulas fp retorna somente numeros ignorando textos (23.58 kB)
