vba代码阅读

#If Vba7 Then
　　#如果是运行在64位office上
　　Declare PtrSafe Sub...
#Else
　　#如果是运行在32位office上
　　Declare Sub...
#EndIf

在Visual Basic中，在定义通用过程时，如果形参前面有关键字ByVal，则该参数用传值方式传送，否则即以引用（即按地址）方式传递。

vba的Type定义自定义类型