(29/10/2019, 14:01)berduş yazdı: modülde kullandığınız aşağıdaki 2 yordam 64 bitlik bilgisayarlarda hataya sebep oluyor 64 bitliklerde PtrSafe kodunu eklemek gerekiyor
yukardaki 2 kodu silip aşağıdaki gibi düzenlerseniz bence daha iyi olur böylece hem 64 hem de 32 bitlik bilgisayarlarda çalışırPrivate Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, _
ByVal nCmdShow As Long) As Long
Private Declare Function IsWindowVisible Lib "user32" (ByVal hwnd As Long) As Long
#If VBA7 And Win64 Then '64 bit için
Private Declare PtrSafe Function ShowWindow Lib "user32" (ByVal hwnd As Long, _
ByVal nCmdShow As Long) As Long
Private Declare PtrSafe Function IsWindowVisible Lib "user32" (ByVal hwnd As Long) As Long
#Else '32 bit için
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, _
ByVal nCmdShow As Long) As Long
Private Declare Function IsWindowVisible Lib "user32" (ByVal hwnd As Long) As Long
#End If
Çok teşekkür ederim.
Emeğinize sağlık.