أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
مهند محسن ali mohamed ali-- لا تميز خلال هذه الفترة YasserKhalil طلب التعديل وتصحيح اليوزر فورم اكسيل اسئله واجابات


اعلان هنا
ألعاب فلاش أون لاين
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا


أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





زيادة سنة في مجموعة صفوف عن طريق زر

السلام عليكم ورحمة الله وبركاتة ارغب في مساعدتي في هذا العمل ولكم وافر الامتنان لدي في هذا الجدول بداية ونهاية للاشتراك ..



10-10-2019 11:28 صباحا
علي الرويلي
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 04-02-2018
رقم العضوية : 4188
المشاركات : 46
الجنس : ذكر
تاريخ الميلاد : 1-1-1985
يتابعهم : 6
يتابعونه : 0
قوة السمعة : 67
الاعجاب : 8
 offline 

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

ارغب في مساعدتي في هذا العمل ولكم وافر الامتنان
لدي في هذا الجدول بداية ونهاية للاشتراك وارغب في زيادة المدة عن طريق الزر الموجود
حيث ارغب اذا اخترت أي خلية باللون الأصفر ازيد المدة او انقصها عن طريق الزر المدرج
يعني مثلا لو اخترت E10  باللون الاصفر وضغطت على زر الزيادة تزيد سنة
او لو اخترت E14  باللون الاصفر وضغطت على زر الزيادة تزيد سنة وهذا

المطلوب موجود في الملف المرفق

شاكر ومقدر لكم تعاونكم

 
 
  زيادة او نقصان سنة في عدة صفوف عن طريق زر.xlsx   تحميل xlsx مرات التحميل :(4)
الحجم :(19.874) KB





13-10-2019 05:29 صباحا
مشاهدة مشاركة منفردة [1]
محمود ابو الدهب
menu_open
مشرف على لغات برمجة والاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 1288
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 4-7-1990
الدعوات : 59
يتابعهم : 6
يتابعونه : 223
قوة السمعة : 4281
الاعجاب : 561
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر
يمكن عمل ذالك عن طريق امرين 
1-  غير الخلية للزر واجعلها مثلا h2
2- ضع بالزر ان الحد الاقصي 1 والادنى 0 
3- ضع الكود التالى بمديول جديد

Sub a()
If Range("h1").Value = 1 And ActiveCell.Value < 50 Then
    ActiveCell.Value = ActiveCell.Value + 1
ElseIf Range("h1").Value = 0 And ActiveCell.Value <= 50 And ActiveCell.Value >= 0 Then
    ActiveCell.Value = ActiveCell.Value - 1
End If
End Sub


4- ثم فعل المكر للزر واربطه بهذا الكود 
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب

ان شاء الله يكون ما تريد

تقبل تحياتى وتقديرى

 
 
 
  زيادة او نقصان سنة في عدة صفوف عن طريق زر.xlsm   تحميل xlsm مرات التحميل :(2)
الحجم :(19.63) KB


أثارت هذه المشاركة إعجاب: YasserKhalil، علي الرويلي، ali mohamed ali،


توقيع :محمود ابو الدهب
لى عظيم الشرف بالانضمام لهذا الصرح العظيم
وكم أتمنى من الله
ان يعيننى ويعلمنى من علمة الواسع فهو ولي ذالك وهو على كل شي قدير

تحياتى وتقدير للجميع  محمود ابوالدهب

13-10-2019 06:08 صباحا
مشاهدة مشاركة منفردة [2]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8257
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 432
قوة السمعة : 24051
الاعجاب : 2567
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر
بارك الله فيك أخي الحبيب محمود وجزيت خيراً على نشاطك الرائع

أثارت هذه المشاركة إعجاب: علي الرويلي، محمود ابو الدهب،



13-10-2019 01:35 مساء
مشاهدة مشاركة منفردة [3]
علي الرويلي
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 04-02-2018
رقم العضوية : 4188
المشاركات : 46
الجنس : ذكر
تاريخ الميلاد : 1-1-1985
يتابعهم : 6
يتابعونه : 0
قوة السمعة : 67
الاعجاب : 8
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر
بارك الله فيك وجزاك الله الجنة اخي الكريم محمود ابو الدهب
شكرا لك على مرورك واجتهادك معي
تقريبا هذا هو الحل المطلوب لاكن ينقصة بعض الرتوش
حيث انني ارغب في تحديد نطاق الزيادة والنقصان بنطاق معين
من الخلية E2 الى الخلية E100 مثلا للاسفادة من الملف هذا في ملف اخر
مع التنوية ان الملف الاخر يحتوي على 1000 سطر

استفسار
ماذا يعني السطر هذا اي الرقم =1 و < 50


If Range("h1").Value = 1 And ActiveCell.Value Then


 




13-10-2019 06:17 مساء
مشاهدة مشاركة منفردة [4]
محمود ابو الدهب
menu_open
مشرف على لغات برمجة والاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 1288
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 4-7-1990
الدعوات : 59
يتابعهم : 6
يتابعونه : 223
قوة السمعة : 4281
الاعجاب : 561
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر
لو حابب كما تقول اذا غير المزر الى SpinButton1

وفي امر SpinUp اجعل الخلية المحدده الا وهى ActiveCell.Value تزيد بمقدار 1 اى +1 
وضعها في قاعدة if  اذا احببت ان تجعل لها حد اقصي كما وضعت انا  ان الحد الاقصي 50 
اى اذا كانت مقدار الخلية 50 لا تزيد فيها واذا كانت اقل قم بالزياده فيها


وفي امر SpinDown نفس الامر السابق ولكن بالنقصان 

n2mha_بدون عنوان

واليك الكود بالنهاية بعد وضع SpinButton1 وقد قمت بوضع الشرح بداخل الكود لكل سطر

Private Sub SpinButton1_SpinDown()
'الاعلان عن متغير من نوع نطاق وذلك للبحث في خلايا بالشيت
Dim target As Range

'حلقة تكرارية داخل الخلايا في العمود رقم 5 لتحديد هل الخلية المحدده داخل هذا النطاق ام لا ليتعامل معها
'وايضا ختار اخر صف به بيانات اتوماتيكيا
For Each target In Range("e2:e" & Cells(Rows.Count, 5).End(xlUp).Row)
'دالة شريطية لتحديد هل الحلقة التكرارية وقفت بالفعل على الخلية المختارة ام لا
'واذا كانت الخلية المختاره داخل النطاق في اعمود رقم خمس يبحث بشرط اخر هل قيمتها اكبر من الصفر ام لا
    If target = ActiveCell And ActiveCell.Value > 0 Then
'اذا تحققت الشروط يقلل مقدار الخلية بواحد
        ActiveCell.Value = ActiveCell.Value - 1
'انهاء الحلقة التكرارية
        Exit For
'انهاء الجملة الشرطية
    End If
'البحث في الحلقة التكراية بالخلية التى تليها
Next target
End Sub

Private Sub SpinButton1_SpinUp()
'فنس الشرح الذى بالاعلى ولكن في زر الزيادة وليس النقاصان
Dim target As Range

For Each target In Range("e2:e" & Cells(Rows.Count, 5).End(xlUp).Row)
    If target = ActiveCell And ActiveCell.Value < 50 Then
        ActiveCell.Value = ActiveCell.Value + 1
        Exit For
    End If
Next target
End Sub


واليك الملف المرفق بالطريقتين

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب

تقبل تحياتى وتقديرى
 
 
 
  زيادة او نقصان سنة في عدة صفوف عن طريق زر.xlsm   تحميل xlsm مرات التحميل :(5)
الحجم :(26.571) KB


أثارت هذه المشاركة إعجاب: ali mohamed ali، YasserKhalil، علي الرويلي،


توقيع :محمود ابو الدهب
لى عظيم الشرف بالانضمام لهذا الصرح العظيم
وكم أتمنى من الله
ان يعيننى ويعلمنى من علمة الواسع فهو ولي ذالك وهو على كل شي قدير

تحياتى وتقدير للجميع  محمود ابوالدهب

13-10-2019 08:01 مساء
مشاهدة مشاركة منفردة [5]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8257
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 432
قوة السمعة : 24051
الاعجاب : 2567
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر
شغل عالي يا أبو الحداحيد
تسلم يا غالي ومشكور على المجهود الرائع

أثارت هذه المشاركة إعجاب: محمود ابو الدهب، علي الرويلي،



13-10-2019 08:18 مساء
مشاهدة مشاركة منفردة [6]
محمود ابو الدهب
menu_open
مشرف على لغات برمجة والاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 1288
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 4-7-1990
الدعوات : 59
يتابعهم : 6
يتابعونه : 223
قوة السمعة : 4281
الاعجاب : 561
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر
هذا فيض من بحر علمكم استاذى واخي العزيز ياسر خليل

أثارت هذه المشاركة إعجاب: YasserKhalil، علي الرويلي،


توقيع :محمود ابو الدهب
لى عظيم الشرف بالانضمام لهذا الصرح العظيم
وكم أتمنى من الله
ان يعيننى ويعلمنى من علمة الواسع فهو ولي ذالك وهو على كل شي قدير

تحياتى وتقدير للجميع  محمود ابوالدهب

13-10-2019 08:30 مساء
مشاهدة مشاركة منفردة [7]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8257
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 432
قوة السمعة : 24051
الاعجاب : 2567
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر
إنت أستاذ كبير ومتمكن أخي وحبيبي محمود ومنكم نتعلم الكثير والكثير
تقبل وافر تقديري واحترامي

أثارت هذه المشاركة إعجاب: محمود ابو الدهب، علي الرويلي،



14-10-2019 01:07 مساء
مشاهدة مشاركة منفردة [8]
علي الرويلي
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 04-02-2018
رقم العضوية : 4188
المشاركات : 46
الجنس : ذكر
تاريخ الميلاد : 1-1-1985
يتابعهم : 6
يتابعونه : 0
قوة السمعة : 67
الاعجاب : 8
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر
شكرا جزيلا استاذنا العزيز ابو الذهب فعلا حل من ذهب

اشكرك شكرا جزيلا على كل ثانية اخذتها من وقتك الله يرقك الجنة انت ومن تحب 
والشكر موصول لمن اتاح هذا المنتدى وجعلة في متناول الجميع 

لدي ملاحظة ليست لها علاقة بهذا العمل 
انا من السعودية واعمل في قطاع حكومي وشبكة الانترنت محصورة على عملنا فقط 
اي جميع المواقع الاخرى محجوبة لدي باستثناء بعض المواقع الحكومية 
الحاجة اللي لفتت انتباهي هي ان اكاديمية الصقر ليست من ضمن المواقع المحجوبة 

أثارت هذه المشاركة إعجاب: YasserKhalil، محمود ابو الدهب،



14-10-2019 03:00 مساء
مشاهدة مشاركة منفردة [9]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8257
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 432
قوة السمعة : 24051
الاعجاب : 2567
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر
ممكن نكون شغالين مع الحكومة زي مخبرين smile
تقبل تحياتي أخي الكريم علي

أثارت هذه المشاركة إعجاب: مالك ماريه، محمود ابو الدهب، علي الرويلي،



14-10-2019 09:23 مساء
مشاهدة مشاركة منفردة [10]
محمود ابو الدهب
menu_open
مشرف على لغات برمجة والاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 1288
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 4-7-1990
الدعوات : 59
يتابعهم : 6
يتابعونه : 223
قوة السمعة : 4281
الاعجاب : 561
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر
laugh

أثارت هذه المشاركة إعجاب: YasserKhalil، علي الرويلي،


توقيع :محمود ابو الدهب
لى عظيم الشرف بالانضمام لهذا الصرح العظيم
وكم أتمنى من الله
ان يعيننى ويعلمنى من علمة الواسع فهو ولي ذالك وهو على كل شي قدير

تحياتى وتقدير للجميع  محمود ابوالدهب

14-10-2019 09:28 مساء
مشاهدة مشاركة منفردة [11]
محمود ابو الدهب
menu_open
مشرف على لغات برمجة والاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 1288
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 4-7-1990
الدعوات : 59
يتابعهم : 6
يتابعونه : 223
قوة السمعة : 4281
الاعجاب : 561
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر

الحمد لله اخى على تمام طلبك والحمد لله على قدرتك على اطلاعك على مواضيع المنتدى من اى مكان

رغم ان ده خطا من السيرفر في المواقع الحكومية والسيرفرات يجب غلق اى  مواقع خارجية وذلك تجنبا لاى اختراق لاى بيانات حساسة بالدولة في اى اختصاص كالتأمينات عندنا بمصر لا استطيع الدخول لاى موقع خارجي مهما كان هذا الموقع وذلك حفظا على سرية البيانات وحفظا لاى اختراق لها بالمستقبل واظن من الافضل ان تقدم طلب للجهة المختصة للنظر بالامر.

ونحن في خدمه الجميع على قدر استطاعتنا في اى وقت


تحياتى وتقديرى
 

أثارت هذه المشاركة إعجاب: YasserKhalil، علي الرويلي،


توقيع :محمود ابو الدهب
لى عظيم الشرف بالانضمام لهذا الصرح العظيم
وكم أتمنى من الله
ان يعيننى ويعلمنى من علمة الواسع فهو ولي ذالك وهو على كل شي قدير

تحياتى وتقدير للجميع  محمود ابوالدهب

15-10-2019 06:05 صباحا
مشاهدة مشاركة منفردة [12]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8257
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 432
قوة السمعة : 24051
الاعجاب : 2567
 offline 
look/images/icons/i1.gif زيادة سنة في مجموعة صفوف عن طريق زر
يا حودة ...... كدا المنتدى مش هيفتح عنده لو قدم طلب .. بقا دا اسمه كلام يا أبو الحداحيد
متسمعش كلامه يا علي smile

أثارت هذه المشاركة إعجاب: علي الرويلي، محمود ابو الدهب،





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
تصدير مجموعة أوراق عمل إلى مصنف واحد باستخدام المصفوفات Export Specific Sheets To One Workbook YasserKhalil
13 314 YasserKhalil

الكلمات الدلالية
زيادة ، مجموعة ، صفوف ، طريق ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 03:16 صباحا

أعلن هنا
أعلن هنا
أعلن هنا