VBA检查单元格列中的字母并在相应的单元格中显示一个单词

Question

 Option Explicit

 Sub PartNumberIdentifier()

在此处定义变量

 Dim cell As Range
 Dim celltxt As String

我的excel工作表中有一个名为firstDigit的范围，该范围在一列中显示256行。我想检查该列是否包含字母

 For Each cell In Range("firstDigit")
 If cell >= "A" And cell <= "Z" Then
 ActiveSheet.Range("D4:D259") = "Ours"
 Else
 ActiveSheet.Range("D4:D259") = "NO"

执行时，无论firstDigit中对应的列是否为字母，代码都始终在D4：D259中完全写入Ours。

 End If
 Next
 End Sub

Answer 1

尝试...

List