업그레이드 후 Excel 버전

Question

을 엑셀 2010 32 비트에서 64 비트로 업그레이드 한 후 excel-VBA 개체를 인식 할 수 없습니다. 새 버전에서 만드는 모든 개체는 다른 컴퓨터에서 인식 할 수 없으므로 2010 년 32 비트를 Excel에서 삽입하려고했습니다. 이 :

If VBA7 = True Then 
' 32 Bit API 
Private Declare PtrSafe Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As LongPtr 
Private Declare PtrSafe Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As LongPtr, lpExitCode As Long) As Long 
Else ' 64 bit API 
    Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long 
    Private Declare Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As Long, lpExitCode As Long) As Long 
End If 

그리고 작동하지 않습니다.

PLZ 도움말 :

Answer 1

조건부 컴파일을 수정 아니에요. 다음과 같이 표시되어야합니다.

#If VBA7 Then 
    ' 64 Bit API 
    Private Declare PtrSafe Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As LongPtr 
    Private Declare PtrSafe Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As LongPtr, lpExitCode As Long) As Long 
#Else ' 32 bit API 
    Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long 
    Private Declare Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As Long, lpExitCode As Long) As Long 
#End If