Araştırmalarım Sonucu Kendim Buldum. Aşağıdaki gibi Yapılırsa Düzeliyor.
64bit PtrSafe tanimlamasi yapilmali. 32 veya 64 bit referanslarini asagidaki gibi asabilirsiniz.
#If VBA7 And Win64 Then
Private Declare PtrSafe Function apiShowWindow Lib "user32" Alias "ShowWindow" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
#Else
Private Declare Function apiShowWindow Lib "user32" Alias "ShowWindow" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
#End If
Kolay gelsin....
Cevapla
Son Düzenleme: 16/09/2018, 12:05, Düzenleyen: hkurt.