مساعدة فى تحويل المعادلات إلى أكواد

[m.shokry]

السلام عليكم

أريد المساعدة فى تحويل المعادلات إلى أكواد فى الملف المرفق+جعل المعادلات غير مرئية مع ظهور النتيجة فقط عند تشغيل الكود

حيث يوجد معادلات معقدة وكبيرة الحجم فى الصف رقم 11 (باللون الأصفر) من كل صفحة وسيتم نسخ المعادلات من الصف رقم 11 حتى الصف رقم 25000 .. وشكرا

2022.xlsm

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

يوجد في منتدانا الرائع مشاركات كثيرة في هذا المجال 

هذه بعضها 

https://www.officena.net/ib/search/?q=تحويل المعادلات كود&updated_after=any&sortby=relevancy&search_and_or=and

إن شاء الله تجد ما تريده فيها 

[m.shokry]

بحثت كثيرا لم اجد ما يفى بالغرض او لم افهم طريقة التنفيذ

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

لن تجد ما يحقق غرضك مائة بالمائة 

ولكن يمكنك تطويع الفكرة لما يناسب ملفك 

لتحويل المعادلة الى كود يمكنك استعمال هذا الإجراء 

ويمكنك تغيير النطاق E3 كما تشاء

 

With Range("e3")
.Formula = "put your formula here"
.Value = .Value
End With

التوفيق