نوشته شده توسط
Milad_ATM
این مورد فکر میکنم برای آفیس 32بیت قابل انجام هست
برای رفع مشکل در آفیس 64 بیتی باید درکدهای مربوط به Win-API باید درجلو کلمه Declare کلمه کلیدی PtrSafe اضافه شود.
کد مربوطه درقسمت ماژول رو بصورت زیر تغییر بده !
#If 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
موفق باشی