1

Тема: Является ли строковое значение числом

Определение того, является ли строка числом:

Sub tt()
    s = "7890"
    If Len(s) Then
        If IsNumeric(s) Then
            MsgBox (s + " - это число")
        Else
            MsgBox (s + " - это не число")
        End If
    End If
    
    s = "-"
    If Len(s) Then
        If IsNumeric(s) Then
            MsgBox (s + " - это число")
        Else
            MsgBox (s + " - это не число")
        End If
    End If
End Sub
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.