محمودبك قام بنشر أغسطس 26, 2015 قام بنشر أغسطس 26, 2015 السلام عليكم اهنئكم على ترقية المنتدى برجاء تفسير تغير المسميات من دهاز لاخر وتعطل الكود من جهاز لاخر Set WS = Sheets("ÝÇÊæÑÉ"): Set SH = Sheets("ÇÓÊÏÚÇÁ ÝÇÊæÑÉ")BillNo = SH.Range("A2").ValueIf IsEmpty(SH.Range("A2")) Then MsgBox "ÃÏÎá ÑÞã ÇáÝÇÊæÑÉ ÇáãØáæÈ ÇÓÊÏÚÇÆåÇ": Exit SubApplic
بن علية حاجي قام بنشر أغسطس 26, 2015 قام بنشر أغسطس 26, 2015 وعليكم السلام ورحمة الله أخي الكريم، من العادة أن الكود لا يتعطل من جهاز لآخر إلا إن وُجدت بعض المشاكل في الأوفيس الذي نُقل إليه الكود (عدم استقرار بعض النسخ مثل نسخة 2007، خاصية أمان الماكرو...)... بالنسبة لتغيّر المسميات من جهاز لآخر فهذا يرجع -ربما- للغة البرمجة في الجهاز، ويمكن تبديل اللغة بعد فتح VBA في خاصية Tools ثم Options وتختار التنسيق Format الذي يناسبك (وخاصة فيما يخص اللغة العربية) وأحسنها هو تنسيق (Courier New (Occidental وهو المستعمل عموما... والله أعلم بن علية
إبراهيم ابوليله قام بنشر أغسطس 26, 2015 قام بنشر أغسطس 26, 2015 اخى بن علية ليك وحشه منور المنتدى تقبل تحياتى
محمودبك قام بنشر أغسطس 26, 2015 الكاتب قام بنشر أغسطس 26, 2015 الاستاذ/ بن علية المحترم الف شكر وجزاك الله خيرا تحياتى
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.