هل توجد طريقة لسحب معادلة فى عمود بالشرط الموضح بالموضوع

[محمد يوسف محمد1]

السلام عليكم ورحمة الله

 

بالشيت المرفق عدلت معادلة فى الخلية S14 المظللة باللون الاصفر فى شيت الدور الثانى

والمطلوب :

طريقة لسحب المعادلة لأسفل للخلايا S16 و S18 و S20 ........... وهكذا حتى نصل لاخر خلية زوجية فى هذا العمود

بحيث لانؤثر على المعادلات الموجودة بالخلايا الفردية S15 و S17 ................ وهكذا حتى أخر خلية فردية

 

 ولكم منى كل تحية وتقدير

 

 

 

سحب المعادلات.rar

[رجب جاويش]

السلام عليكم

أستاذى الفاضل / محمد يوسف

تفضل ما تريد

يمكنك ذلك من خلال الكود التالى

Sub ragab()
Range("S14").Copy
Application.ScreenUpdating = False
For I = 16 To 1012 Step 2
Range("S" & I).PasteSpecial xlPasteFormulas
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

سحب المعادلات.rar

[إبراهيم ابوليله]

السلام عليكم ورحمة الله وبركاته

اخى واستاذنا رجب

كود متقن وكثر من رائع

لاياتى به الا استاذ كبير مثلك

بارك الله فيك

تقبل تحياتى

[الصـقر]

استاذنا الكبير

 رجب جاويش

ملك الاكسيل بارك الله فيك كود اكثر من رائع

زادك الله من علمه ونفع بك المؤمنين

تلميذك / حسام عيسى

[رجب جاويش]

أخى الحبيب / إبراهيم أبو ليله

جزاك الله كل خير أخى الحبيب على هذه الكلمات الطيبة

[رجب جاويش]

أخى الفاضل / حسام عيسى

جزاك الله كل خير أخى الفاضل على هذه الكلمات الطيبة

[محمود_الشريف]

أخى فى الله

الأستاذ القدير // رجب جاويش

بارك الله فيكم وزادكم الله من فضله ومن علمه

تقبل منى وافر الاحترام والتقدير

[محمد يوسف محمد1]

الحبيب الغالى
الاستاذ / رجب أكثر الله من أمثالكم
لو حبينا نطبق نسخ على الخلية S15 كيف يكون الكود
لانى حاولت ولكن المعادلات تكون كلها بالارقام الزوجية

بمعنى معادلة الخلية S15

[=IF('دور ثان'!R14="";"";'دور ثان'!R14)]

ولما بننسخ فى الخلايا اسفلها تكتب نفس المعادلة فى الخلية S17 ولكن  R16

و R18 فى الخلية S19

والمطلوب تكون فى المعادلة R15 فى الخلية S17

و R16 فى الخلية S19 وهكذا

ومرفق المحاولة الفاشلة التى قمت بتنفيدها

سحب المعادلات 1.rar

 

 

[رجب جاويش]

السلام عليكم

أستاذى الفاضل / محمد يوسف

عذرا لتأخرى عليك فى الرد بسبب انقطاع النت عندى لفترة طويلة

 

تفضل ما تريد فى الملف المرفق

 

سحب المعادلات 3.rar

[علي المصري]

أكواد مميزة

بارك الله فيك وجزاك الله خيرا

[محمد يوسف محمد1]

الأخ الحبيب والاستاذ الفاضل / رجب جاويش

أدام الله عزك وسدد خطاكم وبارك لكم

لكم كل تحية وتقدير على تقديم يد العون لى ولكل أعضاء المنتدى

وأسأل الله ان يعطيكم سعادة الدارين