Question

EXCEL VBA中，如何判断数据类型？

EXCEL VBA中，如何判断数据类型？
根据变量的数据类型不同，处理不同的语句。
比如：
sub 判断数据类型()
For each i in selection
If i的数据类型是Single
Cells(i.row,i.column+1)="数字"
Elseif i的数据类型是String
Cells(i.row,i.column_1)="字符串"
End If
End Sub
以上语句中，中文的那些地方该怎么写呢？
拜托大家！

Answer 1

方法和详细的操作步骤如下：

1、第一步，同时按“
 win + R”键，在“运行”的对话框中输入“ excel”，然后按Enter键打开新的excel文档，见下图，转到下面的步骤。

2、第二步，执行完上面的操作之后，依次单击“开发工具”-->“
 Visual Basic”工具栏，见下图，转到下面的步骤。

3、第三步，执行完上面的操作之后，在左侧工程窗口中双击“
 sheet1”以打开“ sheet1”代码编辑窗口，见下图，转到下面的步骤。

4、第四步，执行完上面的操作之后，分别选择“Worksheet”和“
 SelectionChange”，下面将自动生成相应的过程块代码，见下图，转到下面的步骤。

5、第五步，执行完上面的操作之后，在此过程中编写生成代码，见下图红框标识的部分，转到下面的步骤。

6、第六步，执行完上面的操作之后，返回到excel窗口并测试代码是否可以正确运行，可以看到运行成功，见下图。这样，就解决了这个问题了。

Answer 2

用TypeName()函数可以判断。
比如
TypeName(i)="Single" 就是单精度浮点数
TypeName(i)="String" 就是字符串