عبدالله باقشير قام بنشر يناير 5, 2012 مشاركة قام بنشر يناير 5, 2012 السلام عليكم ورحمة الله وبركاته هي لعبة معروفه لديكم ولكن هذا العمل لم ينجز من اجل عيون اللعبة وانما لنتعلم وهو نفس عمل آلية الحروف المعمولة في ملف شرح دوال الاكسل ستجدون الكثير من الاسئلة التي تحتاج الى اجابة في هذا العمل ضعوها هنا لنرد عليها ساعطيكم انا اول سؤال فان لم اجد اجاية ساجيب لاحقا لدينا 24 ليبل لاظهار ما تروه امامكم من صور ولا يوجد اي امر يستخدم من احداث هذه الليبلات لا عبر الفورم ولا عبر موديل كلاسس ولكن عند الضغط على الليبل يتحقق حدث معين كيف ذلك ؟ ودمتم في حفظ الله ================================== تعديل بسيط افي المرفق ملف اكسل 2003و2007 لعبة التركيز1.rar لعبة التركيز.xls 4 رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر يناير 5, 2012 مشاركة قام بنشر يناير 5, 2012 السلام عليكم يسعدني ان اكون اول من يرد على هذه اللعبة الخبورية والتعليق بعد التجربة رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر يناير 5, 2012 مشاركة قام بنشر يناير 5, 2012 السلام عليكم كلما أحسست انني تعلمت شيئا تفاجأني أخي واستاذي ببحر علمك ، زادك الله من فضله ورزقك حتي يرضي وجعل ذلك في ميزان حسناتك أنا أنتظر الرد علي السؤال الذي طرحته رابط هذا التعليق شارك More sharing options...
مجدى يونس قام بنشر يناير 5, 2012 مشاركة قام بنشر يناير 5, 2012 رائع اخ خبور زادك الله من علمه رابط هذا التعليق شارك More sharing options...
ابو الآء قام بنشر يناير 5, 2012 مشاركة قام بنشر يناير 5, 2012 استاذى الكبير بارك الله فيك رابط هذا التعليق شارك More sharing options...
الانيس قام بنشر يناير 5, 2012 مشاركة قام بنشر يناير 5, 2012 عمل رائع الاكسل يعمل اشياء لم تكن على البال مبروك على هذا الانجاز الاول من نوعه رابط هذا التعليق شارك More sharing options...
الـعيدروس قام بنشر يناير 5, 2012 مشاركة قام بنشر يناير 5, 2012 السلام عليكم جزاك الله خير استاذ عبدالله على هذه الروائع بالنسبة للتحكم في الليبلات 24 عن طريق ليبل LabelEvent لاكن ماهيا الالية لااعلمها وانما استخدمت هذا الكود لاحرك مكان ليبل LabelEvent في الفورم وقت التنفيذ ازحته عن بقية الليبلات اضغط على احد المربعات لايظهر الصور Dim C_ALI As Boolean Private Sub UserForm_Initialize() C_ALI = False End Sub Private Sub LabelEvent_Click() If C_ALI = True Then C_ALI = False Else C_ALI = True End If End Sub Private Sub LabelEvent_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) If C_ALI = True Then LabelEvent.Left = LabelEvent.Left + X LabelEvent.Top = LabelEvent.Top + Y End If End Sub Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) If C_ALI = True Then LabelEvent.Left = X LabelEvent.Top = Y End If End Su واما اللغز في التحكم الفعلي لااعلم رابط هذا التعليق شارك More sharing options...
abouelhassan قام بنشر يناير 5, 2012 مشاركة قام بنشر يناير 5, 2012 ابهرتنا استاذ عبدالله خبور الخير ما هذا انه درب من الخيال رائع بارك الله فيك رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر يناير 6, 2012 الكاتب مشاركة قام بنشر يناير 6, 2012 السلام عليكم ورحمة الله وبركاته جمعة مباركة على الجميع اخي الحبيب / عبدالله -حفظك الله و جزاك الله خيرا ----------------------------------------------- اخي الحبيب / طارق -حفظك الله و جزاك الله خيرا الجواب: كما قاله ابو انصار جعلنا الليبل LabelEvent هو اساس التحكم و عن طريقه يتم التعامل مع 24 ليبل و لو جعلت خلفيته غير شفافة ستلاحظ انه في الامام ولن ترى 24 ليبل لانها خلفه عن طريق الضغط على الماوس على الليبل LabelEvent يتم تحديد عنوان الليبل اللي خلفه بالدالة MyIndex ويتم التعامل معه بالكود kh_Test وقد عملت فورم للتاريخ الميلادي بنفس هذه الالية --------------------------------------------- اخي الحبيب / مجدي يونس -حفظك الله و جزاك الله خيرا اخي الحبيب / aboalaa-حفظك الله و جزاك الله خيرا اخي الحبيب / انيس -حفظك الله و جزاك الله خيرا اخي الحبيب / ابو انصار-حفظك الله و جزاك الله خيرا لقد اصبت الهدف عندك حب شغوف للتعلم مع ذكاء ملحوظ اخي الحبيب / ابو الحسن -حفظك الله و جزاك الله خيرا تقبلوا جميعا شكري وتقديري ودمتم في حفظ الله اضفت حركة بسيطة لتبسيط اللعبة تفضلوا المرفق ملف 2003/2007 لعبة التركيز1.rar 1 رابط هذا التعليق شارك More sharing options...
أبو أنس حاجب قام بنشر يناير 6, 2012 مشاركة قام بنشر يناير 6, 2012 السلام عليكم ورحمة الله وبركاته حفظك الله ابداع وراء ابداع وان شاء الله دائما ابو انس رابط هذا التعليق شارك More sharing options...
habibdar قام بنشر يناير 6, 2012 مشاركة قام بنشر يناير 6, 2012 ما شاء الله عليك اخي خبور لطالما عملت ابهرتنا بروائعك تمنياتي لك بالتوفيق دوما رابط هذا التعليق شارك More sharing options...
محمد السيد الشاطر قام بنشر يناير 6, 2012 مشاركة قام بنشر يناير 6, 2012 افكار أجمل من كده ما شفتش وبصراحة اجمل حاجه فيك الابتكار وحسن الخلق اخوك محمد رابط هذا التعليق شارك More sharing options...
الشهابي قام بنشر يناير 6, 2012 مشاركة قام بنشر يناير 6, 2012 أستاذنا الكبير أبو علي ( خبور خير ) إبداع لا نظير له رابط هذا التعليق شارك More sharing options...
naderwatfa قام بنشر يناير 6, 2012 مشاركة قام بنشر يناير 6, 2012 الملف ده تحفة في الإكسيل تسلم أفكارك أستاذ خبور رابط هذا التعليق شارك More sharing options...
الجازع قام بنشر يناير 6, 2012 مشاركة قام بنشر يناير 6, 2012 استاذنا الكبير خبور الخير ماشاء الله تبارك الله عمل متقن من عالم متمكن رابط هذا التعليق شارك More sharing options...
محمد يحياوي قام بنشر يناير 6, 2012 مشاركة قام بنشر يناير 6, 2012 الاخ الحبيب خبور عمل رائع من استاذ نابغة الحقيقة وقفت منبهرا امام هذا العمل الممتاز و زدت حبنا في الاكسل لما له من قدرات مذهلة امر اخر .... هل يمكن الاستغناء عن LabelEvent و التعامل مباشرة مع Labels الـ 24 رابط هذا التعليق شارك More sharing options...
الحسامي قام بنشر يناير 6, 2012 مشاركة قام بنشر يناير 6, 2012 السلام عليكم انجاز يسجل في تاريخ الاكسل العربي بارك الله فيك واتمنى لك دوام التقدم والنجاح رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يناير 6, 2012 مشاركة قام بنشر يناير 6, 2012 السلام عليكم ورحمة الله وبركاته استاذ خبور دائما تبهرنا باعمال وافكار جديدة جزاك الله كل خير رابط هذا التعليق شارك More sharing options...
ريان أحمد قام بنشر يناير 6, 2012 مشاركة قام بنشر يناير 6, 2012 l بحر من العطاء بلا حدود فعلا شكرا ملف رائع قمة في الدقة بارك الله فيك وجزاك الله كل خير رابط هذا التعليق شارك More sharing options...
احمد حمور-ابوعبدالله قام بنشر يناير 6, 2012 مشاركة قام بنشر يناير 6, 2012 عبدالله علي احمد باقشير (خبور خير انت رائع حقا ما شاء الله عليك علم وافر وغزير رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر يناير 7, 2012 الكاتب مشاركة قام بنشر يناير 7, 2012 السلام عليكم ورحمة الله وبركاته اخواني الاحباء ابو انس habibdar نزاهة الشهابي نادر jazea يحياوي الحسامي احمد زمان طاهر احمد حمور حفظكم الله ورعاكم ====================== اعذروني لم استطع التعبير عرفانا لما اورتموه من الكلام الطيب اكرمكم الله وجزاكم خيرا في الدنيا والآخرة ====================== ودمتم في حفظ الله 1 رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر يناير 7, 2012 الكاتب مشاركة قام بنشر يناير 7, 2012 الاخ الحبيب يحياوي حفظه الله امر اخر .... هل يمكن الاستغناء عن LabelEvent و التعامل مباشرة مع Labels الـ 24 نعم ممكن وسيكون الامر كالعادة امر لكل نيبل او عن طريق موديل كلاسس بحيث نعمل حدث جديد لكل هذه النيبلات في اسم واحد سترى فورم التقويم الميلادي لتعرف ان الاكواد المتشابهة بين العملين ممكن تستخدمها لاي عمل مماثل مع بعض التغييرات البسيطة تقبل تحياتي وشكري رابط هذا التعليق شارك More sharing options...
skyblue قام بنشر يناير 7, 2012 مشاركة قام بنشر يناير 7, 2012 شكرا استاذ خبور خير فأنت رجل لايأتي منك الا الخير رجل مبدع في كل اعمالك . ندعوا الله لك بالخير والتوفيق دائما وان يجعلك الله تمشي بنوره تحياتي لك رابط هذا التعليق شارك More sharing options...
قصي قام بنشر يناير 7, 2012 مشاركة قام بنشر يناير 7, 2012 جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
أ / محمد صالح قام بنشر يناير 7, 2012 مشاركة قام بنشر يناير 7, 2012 ما شاء الله رائع أخي خبور خير وهذا رابط للإخوة هواة ألعاب الإكسل http://excelgames.org 1 رابط هذا التعليق شارك 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.