Vba: як за допомогою istext перевірити, чи є клітинка текстом

Ви можете використовувати метод IsText у VBA, щоб перевірити, чи дана клітинка містить текст.

Ця функція поверне значення True , якщо значення даної комірки розпізнається як текст.

В іншому випадку функція поверне значення False .

Ось поширений спосіб використання цієї функції на практиці:

 SubCheckText ()
    
    Dim i As Integer

    For i = 1 To 9
    
        If IsText(Range(" A " & i)) = True Then
            Range(" B " & i) = " Cell is Text "
        Else
            Range(" B " & i) = " Cell is Not Text "
        End If
    Next i
    
End Sub

Цей конкретний макрос перевірить, чи кожна клітинка в діапазоні A1:A9 є текстом.

Якщо клітинка є текстовою, тоді у відповідній клітинці в діапазоні B1:B9 буде повернено «Cell is Text».

Якщо клітинка не є текстом, замість цього буде повернено «Комірка не є текстом».

У наступному прикладі показано, як використовувати цей синтаксис на практиці.

Приклад: як використовувати IsText у VBA

Припустимо, у нас є наступний стовпець значень в Excel:

Припустімо, ми хочемо перевірити, чи кожна клітинка в стовпці A є текстом.

Для цього ми можемо створити такий макрос:

 SubCheckText ()
    
    Dim i As Integer

    For i = 1 To 9
    
        If IsText(Range(" A " & i)) = True Then
            Range(" B " & i) = " Cell is Text "
        Else
            Range(" B " & i) = " Cell is Not Text "
        End If
    Next i
    
End Sub

Коли ми запускаємо цей макрос, ми отримуємо такий результат:

Стовпець B відображає вихідні дані, які повідомляють нам, чи розпізнається кожна відповідна клітинка в стовпці A як текст.

Зауважте, що клітинки, які містять як текст, так і числа, розпізнаються як текст.

Щоб комірка була розпізнана як число, вона повинна містити лише числа.

Примітка . Ви можете знайти повну документацію для функції VBA IsText тут .

Додаткові ресурси

У наступних посібниках пояснюється, як виконувати інші типові завдання у VBA:

Як перетворити рядок на int у VBA
Як перетворити рядок на подвійне у VBA
Як перевірити, чи містить рядок інший рядок у VBA