小编Los*_*gle的帖子

我想检查用户输入。如果我有一个myRange包含“2..4”的单元格，它会IsNumeric以真值通过测试，这就是我寻找其他选项的原因。

如果我运行一个包含

MsgBox (TypeName(myRange.Cells(i, j).Value))

我收到一条消息，说 2..4 是一个，String但是对于以下每一项我的代码都无法编译：

' expects Object or Typename
If TypeOf myRange.Cells(i, j).Value is String Then

' expects Then or GoTo
If TypeOf myRange.Cells(i, j).Value is GetType(String) Then

' expects Then or GoTo
Dim word As String
word = "Hello World"
If TypeOf myRange.Cells(i, j).Value is GetType(word) Then