Declare PtrSafe Compatibility in Excel

Question

I am using this statement in VBA

Private Declare PtrSafe Function GetTimeZoneInformationAny Lib "kernel32" Alias _
  "GetTimeZoneInformation" (buffer As Any) As Long

This works fine with:

• Win 64-bit, Excel 2010 64-bit
• Win 64-bit, Excel 1010 32-bit

However my client reported a compile error on the word PtrSafe. He is using Excel 2010.

I am not sure why this happens. any ideas?

Answer 1

ok I have re-written this like:

#If VBA7 Then
Private Declare PtrSafe Function GetTimeZoneInformationAny Lib "kernel32" Alias "GetTimeZoneInformation" (buffer As Any) As Long
#Else
Private Declare Function GetTimeZoneInformationAny Lib "kernel32" Alias "GetTimeZoneInformation" (buffer As Any) As Long
#End If

This gave a compile error on the second line in Excel 2010 64-bit and the line remained colored red but when I compile again the error doesn't show up anymore. Is this how Excel behaves?