Vba：如何使用 istext 检查单元格是否为文本

您可以使用 VBA 中的IsText方法来检查给定单元格是否包含文本。

如果给定单元格的值被识别为文本，则此函数将返回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范围内的每个单元格是否为文本。

如果单元格是文本，则“Cell is Text”将在范围B1:B9中的相应单元格中返回。

如果单元格不是文本，则将返回“单元格不是文本”。

以下示例展示了如何在实践中使用此语法。

示例：如何在 VBA 中使用 IsText

假设我们在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 中执行其他常见任务：

如何在VBA中将字符串转换为int
如何在VBA中将字符串转换为双精度
如何在VBA中检查一个字符串是否包含另一个字符串