VBA type 缺少标识符
时间: 2023-10-14 11:22:18 浏览: 91
VBA中的Type定义需要在其前面加上标识符,即类型名称。下面是一个示例:
```
Type Person
Name As String
Age As Integer
End Type
```
在上面的示例中,`Person`是Type定义的标识符,`Name`和`Age`是其成员。请确保在Type定义中添加标识符。
相关问题
VBA type的数值类型
在VBA中,有多种类型的数值类型可用。以下是一些常用的数值类型:
1. Byte:表示0到255之间的整数值。
2. Integer:表示-32768到32767之间的整数值。
3. Long:表示-2,147,483,648到2,147,483,647之间的整数值。
4. Single:表示-3.402823E38到3.402823E38之间的单精度浮点数。
5. Double:表示-1.79769313486232E308到1.79769313486232E308之间的双精度浮点数。
6. Decimal:表示-79228162514264337593543950335到79228162514264337593543950335之间的十进制数值。
7. Currency:表示-922,337,203,685,477.5808到922,337,203,685,477.5807之间的货币值。
8. Boolean:表示True或False的布尔值。
9. Date:表示从100年1月1日到9999年12月31日之间的日期值。
这些数值类型可以根据需要在VBA中使用。
VBA 将type定义成参数
可以将 Type 定义成函数或子过程的参数,用法与其他数据类型一样。
举个例子:
```
Type Person
Name As String
Age As Integer
End Type
Sub PrintPerson(p As Person)
Debug.Print "Name: " & p.Name
Debug.Print "Age: " & p.Age
End Sub
```
在上面的代码中,定义了一个 Person 类型,包含姓名和年龄两个字段。然后定义了一个 PrintPerson 子过程,参数为类型为 Person 的变量 p。在子过程中,可以通过 p.Name 和 p.Age 来访问传入的 Person 变量的属性,实现打印 Person 信息的功能。
调用该子过程的方式如下:
```
Sub Test()
Dim person1 As Person
person1.Name = "Tom"
person1.Age = 30
PrintPerson person1
End Sub
```
在 Test 子过程中,先定义了一个 Person 类型的变量 person1,并给它的 Name 和 Age 赋值。然后将 person1 作为参数传给 PrintPerson 子过程,输出 person1 的信息。
这样就可以方便地使用 Type 定义的结构体类型了。
相关推荐
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![xlsm](https://img-home.csdnimg.cn/images/20210720083646.png)
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)