amir501 قام بنشر يناير 13, 2011 مشاركة قام بنشر يناير 13, 2011 السلام عليكم اخوااني لدي عشرة صفحات فيها اكواد للجمع والطرح....الخ هل يوجد كود يقوم بالغاء جميع الاكود في الصفحات ولا يقى سوى النتائج جزاكم الله كل خير رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يناير 13, 2011 مشاركة قام بنشر يناير 13, 2011 تقصد معادلات ؟ الكود التالى Dim myrng As Range Dim cl As Range Set myrng = ActiveSheet.Cells.CurrentRegion For Each cl In myrng If cl.HasFormula Then cl = cl.Value End If Next cl امسح المعادلات و إبقاء القيمkemas.zip رابط هذا التعليق شارك More sharing options...
amir501 قام بنشر يناير 13, 2011 الكاتب مشاركة قام بنشر يناير 13, 2011 بسم الله الرحمن الرحيم اخي واستاذنا كيماس كم هو عظيم ردك السريع. لك مني كل الشكر والامتنان ولاخواننا الكر ام هذا الكود هو لتحويل المعادلات الى قيم اريد ان تكرمت واخواننا نفس هذا الكود ولكن لتحويل عمل الكود الى قيم اوحذف الكود من الصفحة لانه في كل صفحة يوجد كود يقوم بعمليات جمع وطرح... لك ولاخواني كل الشكر والامتنان رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يناير 13, 2011 مشاركة قام بنشر يناير 13, 2011 عليك معرفة مكان هذه الأكواد فى مشروع فيجوال بيسك لا أثر لوجودها فى الصفحة إلا من خلال نتائجها يمكنك الذهاب للماكرو الذى ينفذ عمليات الطرح و الجمع بضغط alt + f11 رابط هذا التعليق شارك More sharing options...
الشيباني1 قام بنشر يناير 14, 2011 مشاركة قام بنشر يناير 14, 2011 استاذنا العزيز تحية طيبه حل رائع اتساءل عن امكانية وضع كود آخر يعيد المعادلات عند الحاجة مع الامتنان رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يناير 14, 2011 مشاركة قام بنشر يناير 14, 2011 لعمل ذلك يجب إرجاع كل الأكواد التى حذفت " أقصد المعادلات " رابط هذا التعليق شارك More sharing options...
amir501 قام بنشر يناير 14, 2011 الكاتب مشاركة قام بنشر يناير 14, 2011 الاستاذ الاخ كيماس اشكرك كل الشكر لما تقدمه من مساعدة ارجو التكرم بالنظر في المرفق الشرح داخله تقبل تحياتي وشكري New Microsoft Excel Worksheet.rar رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يناير 14, 2011 مشاركة قام بنشر يناير 14, 2011 أخى أمير راجع هذا الموضوع مؤقتا حتى أجد الوقت لذلك إن شاء الله http://www.officena.net/ib/index.php?showtopic=34833 رابط هذا التعليق شارك More sharing options...
amir501 قام بنشر يناير 16, 2011 الكاتب مشاركة قام بنشر يناير 16, 2011 المساعدة يا اخوان جزاكم الله كل خير رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.