إنتقال للمحتوى

ابحث فى الموقع مع جوجل

بحث مخصص

تأكد من صحة الحديث قبل نشره



بحث عن:

المصحف المعلم

شبكة محترفى أوراكل

<




صورة

اين يتم وضع الاكواد في اكسل 2007 عربي


افضل اجابه محمد أبو البراء , 10 أبريل 2014 - 06:50 م

(يا سلام لما صعيدي بيتعلم _وانا منهم طبعا _ )

( ابتسامة رقيقة )

هذا موضوع اخر ابتسمت عليه

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

استغربت جدا جدا على هذه العقلية

شعرت وكان في راسي حجر

بل الججر ممكن يلين وهذه الدماغ لم تلين

ولكن لعل التشبيه الاول افضل

وعذراً لاخواني الصعايدة وانا منهم طبعا (اسيوطي)

وطبعا لا انسى الشكر

للاستاذ  الكريم // أحمد فضيلة

 الاستاذ والاخ الحبيب // ضاحي الغريب

والاستاذ  والاخ الحبيب// حمادة عمر

اذهب للمشاركه الكامله


  • قم بتسجيل الدخول للرد
11 رد (ردود) على هذا الموضوع

#1 محمد أبو البراء

محمد أبو البراء
  • EMembers-1
  • 1,070 مشاركة
  • Gender:Male
  • Location:مصر _ اسيوط
  • Interests:الحمد لله على نعمة الإسلام

تاريخ المشاركة 28 مايو 2013 - 03:33 م

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

وكما موضح في العنوان اين اضع الكود

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

بارك الله فيكم..


صورة

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

هذا بلا بصر، أو ذاك في شلل......... وآخر هده الطاعون والجدري
ومرضعٌ خِفَّ منها الثديُ ..........وانفجعت
بموت طفلتها يا قسوة الخبر
ومسلمٌ لم يجد سترًا .........وانظر لآخر شد البطن بالحجري
ماتوا من الجوع والأمراض........... تنهشهم ونحن نقذف بالأرزاق في الحفرِ
كم من مآسٍ تذيبُ الصخر......... وبعضنا قلبهُ أقسى من الحجر
نخاف من نقمة الباري........ فكم من قريةٍ قبلنا بالكبر والبطرِ
وانظر لبعض ديارٍ فاخرت وطغت .......واليوم كم عبرةٍ فيها لمعتبرِ
( 1 )
-------------------------

( 1 ) :القصيدة للأديب: ناصر بن مسفر الزهراني

#2 احمد فضيله

احمد فضيله

    مراقب عام

  • مراقب عام
  • 3,053 مشاركة
  • Gender:Male
  • Location:EGYPT

تاريخ المشاركة 28 مايو 2013 - 04:13 م

الاخ الفاضل الاستاذ / محمد

اضغط alt + f 11

سيتم فتح محرر الفيجوال بيزيك

 

كما يمكنك متابعة الرابط التالي و هو شرح من الاخ الحبيب الاستاذ / عبد الله المجرب

 

http://www.officena....ic=39323&page=1

 

و ستجد ايضا الكثير و الكثير من الشروحات بالمنتدى


{ إِنَّهُ مَن يَتَّقِ وَيِصْبِرْ فَإِنَّ اللّهَ لاَ يُضِيعُ أَجْرَ الْمُحْسِنِينَ } يوسف90

#3 حمادة عمر

حمادة عمر

    مشرف

  • مشرف
  • 5,501 مشاركة
  • Gender:Male
  • Location:المنوفية - جمهورية مصر العربية
  • Interests:اعشق الاكسيل والتعامل مع الهارد وير وكل ما يتعلق بالكمبيوتر
    والشطرنج

تاريخ المشاركة 29 مايو 2013 - 12:07 ص

جزاك الله خيرا

استاذنا الغالي / احمد فضيله ( ابو يوسف )


اللهم صلي علي سيدنا ((( محمد saws.gif ))) وعلي آله وصحبه اجمعين

 

اسألكم الدعاء بظهر الغيب لوالدي ( رحمه الله )


************************************************************************************

UFK8d.gif

************************************************************************************
uFowm.jpg
************************************************************************************


كود اضافة ازرار باسماء الشيتات في الصفحة الرئيسية وزر للرئيسية في كل شيت


لا تنشرها جزاك الله خيراً ... ولا تجعل الملف يقف عندك .. انشره .. ادخل وستعرف !!

علي الاكسيل ........... علي الباوربوينت


فورم بسيط لاضافة شيت اوعدة شيتات دفعة واحدة ...


العب مع الفورم ... حركة لطيفة وخفيفة .. واظهر قوة ملاحظتك !!


هدية الجمعة : سورة ( الكهف ) في فورم ... معلومات .. قراءة .. فضائل


طريقة عمل ( فورم ) فاتورة ووضع اكوادها وترحيل بياناتها واستدعائها وطباعتها !! خطوة خطوة


( لعبة مسابقات اوفيسنا ) علي الاكسيل - لعبة بسيطة من تصميمي .. تصلح لالعاب المسابقات


طريقة عمل شاشة افتتاحية باسم مستخدم ورقم سري !! خطوة خطوة


طريقة عمل شاشة ( فورم ) ادخال وترحيل واستعلام وتعديل وحذف !! خطوة خطوة


طريقة عمل او استخراج كشف حساب بالاكواد بطريقة بسيطة !! خطوة خطوة

طريقة عمل فورم بحث واظهار النتائج في ليست بوكس وتعديل النتائج !! خطوة خطوة


استفتاء : ما افضل اصدار الاكسيل في ( اوفيس 2003 - 2007 - 2010 - 2013)

هو ليس موضوع معادلات او اكواد ... ولكنه استفتاء فقط ... ولكني اعشق هذا الموضوع


( لعبة الصورة المستخبية ) علي الاكسيل - لعبة بسيطة .. تصلح لالعاب المسابقات للاطفال


قائمة منسدلة متعددة الألوان - اختار لون الخلفية و الحروف لكل عنصر في القائمة للعلامة القدير / Jaafar Tribak


قوائم بشكل جديد في الاكسيل .... تصلح للاستخدام في برنامجك .. بطريقة بسيطة وسهله


************************************

****************************

****************

AYPxv.jpg


#4 حمادة عمر

حمادة عمر

    مشرف

  • مشرف
  • 5,501 مشاركة
  • Gender:Male
  • Location:المنوفية - جمهورية مصر العربية
  • Interests:اعشق الاكسيل والتعامل مع الهارد وير وكل ما يتعلق بالكمبيوتر
    والشطرنج

تاريخ المشاركة 29 مايو 2013 - 12:07 ص

جزاك الله خيرا

استاذنا الغالي / احمد فضيله ( ابو يوسف )


اللهم صلي علي سيدنا ((( محمد saws.gif ))) وعلي آله وصحبه اجمعين

 

اسألكم الدعاء بظهر الغيب لوالدي ( رحمه الله )


************************************************************************************

UFK8d.gif

************************************************************************************
uFowm.jpg
************************************************************************************


كود اضافة ازرار باسماء الشيتات في الصفحة الرئيسية وزر للرئيسية في كل شيت


لا تنشرها جزاك الله خيراً ... ولا تجعل الملف يقف عندك .. انشره .. ادخل وستعرف !!

علي الاكسيل ........... علي الباوربوينت


فورم بسيط لاضافة شيت اوعدة شيتات دفعة واحدة ...


العب مع الفورم ... حركة لطيفة وخفيفة .. واظهر قوة ملاحظتك !!


هدية الجمعة : سورة ( الكهف ) في فورم ... معلومات .. قراءة .. فضائل


طريقة عمل ( فورم ) فاتورة ووضع اكوادها وترحيل بياناتها واستدعائها وطباعتها !! خطوة خطوة


( لعبة مسابقات اوفيسنا ) علي الاكسيل - لعبة بسيطة من تصميمي .. تصلح لالعاب المسابقات


طريقة عمل شاشة افتتاحية باسم مستخدم ورقم سري !! خطوة خطوة


طريقة عمل شاشة ( فورم ) ادخال وترحيل واستعلام وتعديل وحذف !! خطوة خطوة


طريقة عمل او استخراج كشف حساب بالاكواد بطريقة بسيطة !! خطوة خطوة

طريقة عمل فورم بحث واظهار النتائج في ليست بوكس وتعديل النتائج !! خطوة خطوة


استفتاء : ما افضل اصدار الاكسيل في ( اوفيس 2003 - 2007 - 2010 - 2013)

هو ليس موضوع معادلات او اكواد ... ولكنه استفتاء فقط ... ولكني اعشق هذا الموضوع


( لعبة الصورة المستخبية ) علي الاكسيل - لعبة بسيطة .. تصلح لالعاب المسابقات للاطفال


قائمة منسدلة متعددة الألوان - اختار لون الخلفية و الحروف لكل عنصر في القائمة للعلامة القدير / Jaafar Tribak


قوائم بشكل جديد في الاكسيل .... تصلح للاستخدام في برنامجك .. بطريقة بسيطة وسهله


************************************

****************************

****************

AYPxv.jpg


#5 محمد أبو البراء

محمد أبو البراء
  • EMembers-1
  • 1,070 مشاركة
  • Gender:Male
  • Location:مصر _ اسيوط
  • Interests:الحمد لله على نعمة الإسلام

تاريخ المشاركة 03 يونيو 2013 - 01:49 ص

الاخ الفاضل الاستاذ / محمد

اضغط alt + f 11

سيتم فتح محرر الفيجوال بيزيك

 

كما يمكنك متابعة الرابط التالي و هو شرح من الاخ الحبيب الاستاذ / عبد الله المجرب

 

http://www.officena....ic=39323&page=1

 

و ستجد ايضا الكثير و الكثير من الشروحات بالمنتدى

السلام عليكم

أخي الفاضل الاستاذ / أحمد فضيلة

شكراً علي الرد ..

وبعتذر على تاخر شكري لك

والسبب في ذلك محاولة مني لانزال الدروس وتعلم شي

ولكن وبصراحة لم افهم شى او لم اجد ما اريد

وباختصار ما اريده هو وضع الكود لعمل معادلات بسيطة أولاً

وليس مقصودي الآن هو الاحتراف

فان امكن طريقة مختصرة مثلا

لو اردت  جمع خليتين كيف ادخل الكود وكيف احفظه

وما هو الفرق بين الكود والمعادلة؟


صورة

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

هذا بلا بصر، أو ذاك في شلل......... وآخر هده الطاعون والجدري
ومرضعٌ خِفَّ منها الثديُ ..........وانفجعت
بموت طفلتها يا قسوة الخبر
ومسلمٌ لم يجد سترًا .........وانظر لآخر شد البطن بالحجري
ماتوا من الجوع والأمراض........... تنهشهم ونحن نقذف بالأرزاق في الحفرِ
كم من مآسٍ تذيبُ الصخر......... وبعضنا قلبهُ أقسى من الحجر
نخاف من نقمة الباري........ فكم من قريةٍ قبلنا بالكبر والبطرِ
وانظر لبعض ديارٍ فاخرت وطغت .......واليوم كم عبرةٍ فيها لمعتبرِ
( 1 )
-------------------------

( 1 ) :القصيدة للأديب: ناصر بن مسفر الزهراني

#6 ضاحي الغريب

ضاحي الغريب
  • مشرف
  • 1,394 مشاركة
  • Gender:Male
  • Location:Egypt *&* KSA
  • Interests:((( إن لم تكن لك حسنة جارية فاعمل على ألا تكون لك سيئة جارية !!)))

تاريخ المشاركة 03 يونيو 2013 - 03:17 ص

أخي الحبيب // محمد

بعد اذن أخي الحبيب الأستاذ/ أحمد فضيلة

لعملية الجمع بالكود او بكود المعادلة 

مثال بسيط كالتالي

20130603030126.png

 

وسوف اقوم  بجمع البيانات في العمود (( C )) بكود المعادلة والجمع في عمود ((D )) بالكود

ولاحظ الفرق بين الكودين

1-  الجمع بكود المعادلة 

Sub Sum_Formula()
Range("c2:c4").Formula = "=sum(a2,b2)"
End Sub

20130603032012.png

 

2- الجمع بالكود

Sub Sum_Code()
Dim myrng As Range, myc As Range
Dim i As Integer
Set myrng = Sheets(1).Range("d2:d4")
myrng.ClearContents
For Each myc In myrng
myc = Application.WorksheetFunction.Sum(Range("a" & myc.Row, Range("b" & myc.Row)))
Next myc
End Sub

20130603032109.png

 

 

لاحظ الفرق 

في الكود الأول وهو بالمعادلة 

في النطاق من "C2:C4" قم بوضع المعادلة التالية حاصل جمع العمودين A&B  

=sum(a2,b2)

لكن بالكود

الوضع مختلف حيث حددنا المتغيرات

ونطاق البيانات

والنتيجة في النطاق (D2:D4)

واتمني اكون قد وفقت في توصيل المعلومة لك

التطبيق بالمرفقات

حاول تطبيق المثال بتغير النطاق 

والله ولي التوفيق

ملفات مرفقة

  • ملف مرفق  الجمع.rar   9.35كيلو   20 عدد مرات التحميل

evbr.png

ycee.png

ckwz.png

7sz4.png


#7 محمد أبو البراء

محمد أبو البراء
  • EMembers-1
  • 1,070 مشاركة
  • Gender:Male
  • Location:مصر _ اسيوط
  • Interests:الحمد لله على نعمة الإسلام

تاريخ المشاركة 03 يونيو 2013 - 10:13 ص

أخي الحبيب // محمد

بعد اذن أخي الحبيب الأستاذ/ أحمد فضيلة

لعملية الجمع بالكود او بكود المعادلة 

مثال بسيط كالتالي

20130603030126.png

 

وسوف اقوم  بجمع البيانات في العمود (( C )) بكود المعادلة والجمع في عمود ((D )) بالكود

ولاحظ الفرق بين الكودين

1-  الجمع بكود المعادلة 

Sub Sum_Formula()
Range("c2:c4").Formula = "=sum(a2,b2)"
End Sub

20130603032012.png

 

2- الجمع بالكود

Sub Sum_Code()
Dim myrng As Range, myc As Range
Dim i As Integer
Set myrng = Sheets(1).Range("d2:d4")
myrng.ClearContents
For Each myc In myrng
myc = Application.WorksheetFunction.Sum(Range("a" & myc.Row, Range("b" & myc.Row)))
Next myc
End Sub

20130603032109.png

 

 

لاحظ الفرق 

في الكود الأول وهو بالمعادلة 

في النطاق من "C2:C4" قم بوضع المعادلة التالية حاصل جمع العمودين A&B  

=sum(a2,b2)

لكن بالكود

الوضع مختلف حيث حددنا المتغيرات

ونطاق البيانات

والنتيجة في النطاق (D2:D4)

واتمني اكون قد وفقت في توصيل المعلومة لك

التطبيق بالمرفقات

حاول تطبيق المثال بتغير النطاق 

والله ولي التوفيق

بارك الله فيك أخي ضاحي الغريب

وشكراً على المساعدة

وشكراً على هذا الشرح المميز المدعوم بالصور

ولكن مشكلتي ليس في فائدة الكود ولكن المشكلة واضحة في العنوان

اين اضع الكود وخطوات وضعه.

بارك الله فيك


صورة

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

هذا بلا بصر، أو ذاك في شلل......... وآخر هده الطاعون والجدري
ومرضعٌ خِفَّ منها الثديُ ..........وانفجعت
بموت طفلتها يا قسوة الخبر
ومسلمٌ لم يجد سترًا .........وانظر لآخر شد البطن بالحجري
ماتوا من الجوع والأمراض........... تنهشهم ونحن نقذف بالأرزاق في الحفرِ
كم من مآسٍ تذيبُ الصخر......... وبعضنا قلبهُ أقسى من الحجر
نخاف من نقمة الباري........ فكم من قريةٍ قبلنا بالكبر والبطرِ
وانظر لبعض ديارٍ فاخرت وطغت .......واليوم كم عبرةٍ فيها لمعتبرِ
( 1 )
-------------------------

( 1 ) :القصيدة للأديب: ناصر بن مسفر الزهراني

#8 ضاحي الغريب

ضاحي الغريب
  • مشرف
  • 1,394 مشاركة
  • Gender:Male
  • Location:Egypt *&* KSA
  • Interests:((( إن لم تكن لك حسنة جارية فاعمل على ألا تكون لك سيئة جارية !!)))

تاريخ المشاركة 03 يونيو 2013 - 10:27 ص

 

ولكن مشكلتي ليس في فائدة الكود ولكن المشكلة واضحة في العنوان

اين اضع الكود وخطوات وضعه.

بارك الله فيك

 

اخي الكريم // محمد

في سؤالك في المشاركة رقم (5)

 

 

وليس مقصودي الآن هو الاحتراف

 

فان امكن طريقة مختصرة مثلا

لو اردت  جمع خليتين كيف ادخل الكود وكيف احفظه

وما هو الفرق بين الكود والمعادلة؟

 

لذلك شرحت علي قدر فهمي لسؤالك  الفرق بين كود المعادلة والكود 

لكن اذا كنت تريد كيفية كتابة الكود

عليك بدورة الأستاذ / عبدالله المجرب

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

(( دورة شرح الفيجول بيسك للتطبيقات VBA))

فيها شرح ييسير وسلس ووافي

للفيجوال والاكواد وتسجليها

علي الرابط التالي

 

http://www.officena....showtopic=39323

 

ومكتبة الموقع ملئية بالدورات من الصفر للاحتراف لاستاتذة الموقع ورواده

تقبل تحياتي


evbr.png

ycee.png

ckwz.png

7sz4.png


#9 محمد أبو البراء

محمد أبو البراء
  • EMembers-1
  • 1,070 مشاركة
  • Gender:Male
  • Location:مصر _ اسيوط
  • Interests:الحمد لله على نعمة الإسلام

تاريخ المشاركة 03 يونيو 2013 - 12:14 م

بارك الله فيك استاذ/ ضاحي

وسامحني فانا مبتدي في الاكواد

ومن الغريب انني اخذت دورات في الاكسيل ولم اسمع عن الاكواد الا في منتداكم.

الامر الثاني : توصلت الى ما كنت اريده ولكن لي سوال أخر وهو قمت بعملية جمع بالطريقتين

وملاحظاتي هي

بالنسبة للمعادلة :عند تغيير اي رقم في الخليتين المراد جمعهم يتم تغيير حاصل الجمع

اما في الكود لا يتم تغيير حاصل الجمع في خلية حاصل الجمع ! لماذا ؟


صورة

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

هذا بلا بصر، أو ذاك في شلل......... وآخر هده الطاعون والجدري
ومرضعٌ خِفَّ منها الثديُ ..........وانفجعت
بموت طفلتها يا قسوة الخبر
ومسلمٌ لم يجد سترًا .........وانظر لآخر شد البطن بالحجري
ماتوا من الجوع والأمراض........... تنهشهم ونحن نقذف بالأرزاق في الحفرِ
كم من مآسٍ تذيبُ الصخر......... وبعضنا قلبهُ أقسى من الحجر
نخاف من نقمة الباري........ فكم من قريةٍ قبلنا بالكبر والبطرِ
وانظر لبعض ديارٍ فاخرت وطغت .......واليوم كم عبرةٍ فيها لمعتبرِ
( 1 )
-------------------------

( 1 ) :القصيدة للأديب: ناصر بن مسفر الزهراني

#10 ضاحي الغريب

ضاحي الغريب
  • مشرف
  • 1,394 مشاركة
  • Gender:Male
  • Location:Egypt *&* KSA
  • Interests:((( إن لم تكن لك حسنة جارية فاعمل على ألا تكون لك سيئة جارية !!)))

تاريخ المشاركة 03 يونيو 2013 - 05:21 م

 

بالنسبة للمعادلة :عند تغيير اي رقم في الخليتين المراد جمعهم يتم تغيير حاصل الجمع

اما في الكود لا يتم تغيير حاصل الجمع في خلية حاصل الجمع ! لماذا ؟

 

قم بوضع الكود في حدث الصفحة كالتالي

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
    Dim myrng As Range, myc As Range
Dim i As Integer
Set myrng = Sheets(1).Range("d2:d4")
myrng.ClearContents
For Each myc In myrng
myc = Application.WorksheetFunction.Sum(Range("a" & myc.Row, Range("b" & myc.Row)))
Next myc
Application.EnableEvents = True
End Sub

التطبيق بالمرفقات

ملفات مرفقة

  • ملف مرفق  الجمع.rar   9.88كيلو   19 عدد مرات التحميل

evbr.png

ycee.png

ckwz.png

7sz4.png


#11 محمد أبو البراء

محمد أبو البراء
  • EMembers-1
  • 1,070 مشاركة
  • Gender:Male
  • Location:مصر _ اسيوط
  • Interests:الحمد لله على نعمة الإسلام

تاريخ المشاركة 03 يونيو 2013 - 11:16 م

قم بوضع الكود في حدث الصفحة كالتالي
 

 

جزاكم الله خيراً أخي الفاضل / استاذ ضاحي الغريب

وبعتذر لك على تعبك معي :fff: :fff: :fff:

اولاً : ما المقصود بحدث الصفحة

ثانيا : قمت بتغيير الارقام في العمود "a"

ولكن ما زال الوضع كما هو عليه

وهذا واضح في مرفقك الذى ارسلته بعد تعديلي للارقام ..

ملفات مرفقة


تم تعديل هذه المشاركة بواسطة محمد 28: 03 يونيو 2013 - 11:16 م

صورة

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

هذا بلا بصر، أو ذاك في شلل......... وآخر هده الطاعون والجدري
ومرضعٌ خِفَّ منها الثديُ ..........وانفجعت
بموت طفلتها يا قسوة الخبر
ومسلمٌ لم يجد سترًا .........وانظر لآخر شد البطن بالحجري
ماتوا من الجوع والأمراض........... تنهشهم ونحن نقذف بالأرزاق في الحفرِ
كم من مآسٍ تذيبُ الصخر......... وبعضنا قلبهُ أقسى من الحجر
نخاف من نقمة الباري........ فكم من قريةٍ قبلنا بالكبر والبطرِ
وانظر لبعض ديارٍ فاخرت وطغت .......واليوم كم عبرةٍ فيها لمعتبرِ
( 1 )
-------------------------

( 1 ) :القصيدة للأديب: ناصر بن مسفر الزهراني

#12 محمد أبو البراء

محمد أبو البراء
  • EMembers-1
  • 1,070 مشاركة
  • Gender:Male
  • Location:مصر _ اسيوط
  • Interests:الحمد لله على نعمة الإسلام

تاريخ المشاركة 10 أبريل 2014 - 06:50 م   افضل اجابه

(يا سلام لما صعيدي بيتعلم _وانا منهم طبعا _ )

( ابتسامة رقيقة )

هذا موضوع اخر ابتسمت عليه

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

استغربت جدا جدا على هذه العقلية

شعرت وكان في راسي حجر

بل الججر ممكن يلين وهذه الدماغ لم تلين

ولكن لعل التشبيه الاول افضل

وعذراً لاخواني الصعايدة وانا منهم طبعا (اسيوطي)

وطبعا لا انسى الشكر

للاستاذ  الكريم // أحمد فضيلة

 الاستاذ والاخ الحبيب // ضاحي الغريب

والاستاذ  والاخ الحبيب// حمادة عمر


  • أحمد أيمن معجب بهذا

صورة

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

هذا بلا بصر، أو ذاك في شلل......... وآخر هده الطاعون والجدري
ومرضعٌ خِفَّ منها الثديُ ..........وانفجعت
بموت طفلتها يا قسوة الخبر
ومسلمٌ لم يجد سترًا .........وانظر لآخر شد البطن بالحجري
ماتوا من الجوع والأمراض........... تنهشهم ونحن نقذف بالأرزاق في الحفرِ
كم من مآسٍ تذيبُ الصخر......... وبعضنا قلبهُ أقسى من الحجر
نخاف من نقمة الباري........ فكم من قريةٍ قبلنا بالكبر والبطرِ
وانظر لبعض ديارٍ فاخرت وطغت .......واليوم كم عبرةٍ فيها لمعتبرِ
( 1 )
-------------------------

( 1 ) :القصيدة للأديب: ناصر بن مسفر الزهراني




0 عضو (أعضاء) يشاهدون هذا الموضوع

0 الأعضاء, 0 الزوار, 0 مجهولين