PRIVATE DECLARE FONCTION yazan bölümlerin tümüne iki ayrı bit işlem için if döngüsü kullanarak Vba kodlarınızı düzeltiniz sadece 1 tane dosya ile 32 veya 64 bit olarak sorunsuz çalışacaktır. saygılar
#If VBA7 And Win64 Then '64 bit için
Private Declare PtrSafe Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long
#Else '32 bit için
Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long
#End If