Hyperlinks.Add Anchor:=.Range("AO" & i + 5), Address:="", _
SubAddress:=.Name & "!AN" & x
هل يمكن وضع رقم الشيت بدلا من اسمه
أو عنوان الخلية مثلا
sheets(1).range("a1")
وذلك لجعلهم متغيرين مع تغير الحالة
دا في المجمل ولكن ما تفسيرك ان برنامج يتصمم على 2016 ومع كثرة المعادلات والأكواد لا يتم تنفيذ أكواد الترحيل في حين أن 2010 تم تكملة باقي التصميم ولا توجد به مشاكل في الترحيل
السلام عليكم ورحمة الله وبركاته
قمت بتصميم برنامج مشتريات ومخازن وموردين على اكسل 2016 واستخدمت به الواجهات ( USERFORM ) وطبعا كنت كل شاشة أعملها أجرب تشغيلها فكانت تعمل دون مشاكل وبعد قطع شوط كبير في البرنامج أجرب بعض شاشات الادخال وجدتها لاتعمل ويعطى الخطأ بالصورة المرفقة وعند الضغط على ( Debug ) الخط الأصفر يظهر على أول سطر يوجد به ترحيل وعند الضغط على ( End ) يخرج من جميع الشاشات وفي كلاهما بعد ثلاث ثواني تظهر لي رسالة أت الاكسل يحتاج الى اعادة الشغيل
بحثت عن سبب الخطأ لم أعرفه
تم نقل البرنامج الى جهاز آخر فاشتغل دون مشاكل ولكن كانت نسخة الاوفس 2010 ظننت أن الخطأ من الويندوز فتم تغيير نسخة الويندوز لكنه لم يعمل على اوفس 2016 وعند تسطيب اوفس 2010 اشتغل دون مشاكل
فما هو السبب الذي يجعل برنامج يعمل دون مشاكل على اوفيس 2010 ولا يعمل على 2016 ؟ وماذا ان خرج اوفيس 2010 من الدعم ؟