Wie VBA-Code kompatibel für Office 2010 - 64-Bit-Version und ältere Office-Versionen

Question

Ich habe ein Problem mit unter Funktionsaufruf beobachtet, wenn wir auf Office 2010-64 Bit-Version migriert.

Private Declare Sub CopyMem Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long) 

Nach Informationen über http://msdn.microsoft.com/en-us/library/ee691831.aspx Link. Ich habe oben genannten Anruf wie unten geändert und es hat gut funktioniert auf Office 2010 64-Bit-Version.

Private Declare PtrSafe Sub CopyMem Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long) 

Das Problem ist, ich brauche gleichen Anruf zu tätigen als auch zu arbeiten, auf ältere Office-Versionen und es wirft Fehler auf älteren Versionen kompiliert.

Hat jemand eine Idee, wie Sie diesen Anruf für Office 2010 und ältere Office-Versionen arbeiten.

Answer 1

Wie der MSDN-Artikel sagt, verwenden bedingte Kompilierung: es funktioniert gut für mich in Excel 97 bis Excel 2010 32-Bit & 64-Bit.

#If VBA7 Then 
Private Declare PtrSafe Sub CopyMem Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long) 
#Else 
Private Declare Sub CopyMem Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long) 
#End if