VB:启用宏故障

打开一个很老的exle文件，启用宏提示各种错误，将解决方法和解决顺序记录下来

1.编译错误：若要在64位系统上使用，则必须更新此项目中的代码。请检查并更新Declare语句，然后用PtrSafe属性标记它们。

出错的原文是这样写的

Private Declare Sub CoFreeUnusedLibraries Lib "OLE32" ()

提示已经说的很清楚了，在64位excle上使用Declare后边必须加上PtrSafe。但是为了既能在32位又能在64位excle上运行，需要这样写

#If Win64 Then
Private Declare PtrSafe Sub CoFreeUnusedLibraries Lib "OLE32" ()	
#Else
Private Declare Sub CoFreeUnusedLibraries Lib "OLE32" ()
#End If