الملف لا يعمل بعد تثبيت ويندوز جديد و اوفيس جديد مرفق صورة للمشكلة

[يوسف عطا]

[حسونة حسين]

الاوفيس الذي قمت بتنصيبه ٦٤ بت

قم بحذفه وتنصيب اوفيس ٣٢ بت ليتوافق مع ملفك 

[أ / محمد صالح]

أو يمكنك تعديل الكود ليتناسب مع 64bit

# if vba7 then
declare ptrsafe function....
# else
declare function...
# end if

لاحظ وضع ptrsafe قبل function

بالتوفيق 

[يوسف عطا]

هل المفترض انى اكتب ال 5 اسطر دول فى بداية كل كود فى الملف ؟؟ أم أين ؟؟

[أ / محمد صالح]

بدلا من الكود الخاص بنسخ 32بت فقط

ويكون السطر مكتوب باللون الأحمر

تضع هذا السطر بعد elde وتضع نفس السطر بعد غضافة ptrsafe قبل function بعد if vba7