اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

نجوم المشاركات

  1. الصـقر

    الصـقر

    الخبراء


    • نقاط

      8

    • Posts

      1836


  2. ياسر العربى

    ياسر العربى

    الخبراء


    • نقاط

      7

    • Posts

      1510


  3. محمد حسن المحمد

    • نقاط

      7

    • Posts

      2220


  4. خالد الرشيدى

    خالد الرشيدى

    الخبراء


    • نقاط

      6

    • Posts

      889


Popular Content

Showing content with the highest reputation on 11/05/15 in all areas

  1. أخي الحبيب:السلام عليكم ورحمة الله وبركاته ورحمة ربك خير مما يجمعون ولعلك سمعت أن الأقلام ترفع وتجف الصحف عند الموت أي تختم سجلاتنا إلا ثلاث :علم ينتفع به( أرجو الله أن نكون من أهل العلم النافع) وولد صالح يدعو له ( اللهم اجعل أولادنا من الصالحين) وصدقة جارية ( نرجو الله أن يتقبل من أخينا الصقر صدقته علينا ) أرجو الله أن يبشركم بالجنة عند الموت حيث لا خوف مما هو آت ولا حزن على ما فات للمؤمن البشرى ...هو في فسحة من أمره لا في زنقة. ...والسلام عليكم.
    4 points
  2. الاخ الحبيب ابراهيم ابوليله جرب المرفق هل هو طلبك تقبل تحياتى واحترامى استخراج.zip
    3 points
  3. موضوع اتكرر قدامي كذا مره ويحصل فروق في الفلوس وفي الاخر تلاقيها فرق تقريب فلاقيت الحل البسيط دا قلت اضيفوا هنا يمكن ينفع حد ولا حاجه ممنوع تعليق المشرفين بهزر مرتبات.rar
    2 points
  4. جرب الان قائمة منسدلة بدون تكرار مرتبطة بقائمة اخرى salim.zip
    2 points
  5. اخى الكريم لعد الخلايا غير الفارغة داخل نطاق محدد.... يمكنك استخدام المعادلة التالية =COUNTIF(B1:B10;"<>")
    2 points
  6. الاخ الحبيب / ابراهيم ابوليله الاجمل هو مرورك العطر وشاكر دعائك الطيب واسال الله تعالى ان يكون لك نصيب منه ********************************************************** الاخ الحبيب / عبدالعزيز البسكرى بارك الله فيك مجرد رؤيتى لأى رد منك منتهى السعاده بالنسبه لى ********************************************************* استاذى الحبيب / ياسر خليل يا غالى انت ونعم الناس ادب وخلق وفن وابداع اسال الله ان يطيل عمرك فى طاعته انا خايف انت اللى تنسانى يا صحبى ******************************************************** الاخ الحبيب / وائل الاسيوطى جزاكم الله خيرا ******************************************************** استاذى الحبيب / عادل حنفى الاروع هو مرورك وتشريفك لموضوعى المتواضع والمسات تعلمناها منكم استاذى الفاضل فأنا تلميذك ******************************************************* الاخ الحبيب / ياسر فتحى جزاكم الله خيرا *******************************************************
    2 points
  7. عمل أكثر من رائع أخى الحبيب / حسام وربنا يرحم الفقيد / الحسامى برحمته الواسعه ويدخله فسيح جناته جزاك الله خيرا
    2 points
  8. اخي حسام عمل رائع ولمسة جيدة منك وربنا يتغمد الحسامي بواسع رحمته تحياتي
    2 points
  9. جعله الله في ميزان حسناتك
    2 points
  10. أخي الحبيب حسام جعل الله عملك في ميزان حسناتك يوم القيامة وجزيت خيراً على هذه اللفتة الطيبة .. ويا ريت لي رجاء عندك ابقى اعمل لي موضوع زي كدا وخلي لي صدقة جارية عندما يتوفاني الله (وإن شاء الله يكون لك نصيب منها) ..أخوك ساعتها هيكون مزنوق (أيوا والله مزنوق) ..ربنا يفك زنقتك لو فكيت زنقتي تقبل تحياتي
    2 points
  11. السّلام عليكم و رحمة الله و بركاته بارك الله فيك أخي الغالي " الصّقر " على الهديّة الممتازة .. لا يمكننا بأي حال من الأحوال الاستغناء عن التّاريخيْن الهجري أو الميلادي بحياتنا و أعمالنا اليوميّة .. جزاك الله خيرًا و زادها بميزان حسناتك و زادك من علمه و فضله فائق تقديري و احترامي
    2 points
  12. عزيزي الرائع ابوعبدالله اعتذر بشدة على تاخيري في الرد على كلامك الاكثر من رائع بخصوص محاسبة المطاعم وذلك لظروف مرضي ولكن ان شاء الله يمكننا سويا وضع نواة حسنة لمشروع محاسبة الفنادق والذي كما سبق واوضحت انه يشمل المطاعم بداخله واامل ان نبدا سويا من الالف الى الياء حتى يخرج مشروع فريد لمحاسبة الفنادق والتي اعتقد انها شاملة لاهم ومعظم مجالات المحاسبة. ولكن دائما سيبقى الوقت هو العدو الاوحد لي وساضع امامك اطار عام لمجال المحاسبة داخل المنشآت السياحية ولكن بكل بساطة او بمعنى ادق بالمفهوم العامي وقبل البدء ارجو ان يتسع صدرك لكلام محاسبة وبس اى بدون برمجة حتى تصلك الفكرة الاساسية والتي من خلالها يمكنك معرفة كافة مدخلات الاطار المحاسبي ( البيانات التي سيتم معالجتها او تبويبها )داخل الفندق وكذلك العمليات التي تتم فيه ثم المخرجات والتي ستكون في شكل تقارير اساسية واخرى مكملة - هناك اقسام داخل قسم المحاسبة والتي تقوم بتجميع البيانات كل حسب تخصصه. وهي كالتالي : قسم مراقبة التكاليف :Cost Control ويتراسه Cost controller وهو القسم المسئول عن مراقبة المخزون ومخرجه الاساسي هو ( تكلفة البضاعة المباعة )Cost Of Salesوبالطبع كي نصل الى رقم تكلفة البضاعة المباعة فنحن بحاجة لمعرفة رصيد اول الفترة المحاسبية وصافي المشتروات واخيرا رصيد بضاعة آخر الفترة (كل هذه البنود بسعر التكلفة وليس البيع) والمخزون في غالبية الفنادق يصنف على 4 محاور رئيسية 1- مخزون اغذية Food Store 2- مخزون مشروبات Beverage Store 3-مخزون عام General store 4-مخزون الصيانة Maintenance Store وساقوم برفع ملف به هذه التصنيفات بمحتوياتها من اصناف لان كل من هذه المخازن بداخلها تصنيف فرعي آخر وهنا يجب الاشارة الى معيار هام في التفرقة بين ماهو Food وما هو Beverage وهو اذا لم تتم اضافة اى تكاليف للصنف بعد شراؤه فهو Beverage وللتوضيح الشاى نضيف اليه سكر اذا فهو Food وليس مشروب Beverageاما الكولا فهي مشروب عزيزي ابو عبدالله اعلم اني اطيل عليك ولكن انت قلت ان الفكرة اعجبتك واذا اردت مني اكمال الموضوع فانا معك حتى تصل الفكرة للاذهان واذا قلت توقف وارسل ملفات فانا ايضا معك واتمنى ان لا تمل مني وفي المرة القادمة ساقوم بشرح باقي الاقسام والتعريف بمهامها الاساسية ومدخلاتها ومخرجاتها وهي على النحو التالي قسم مراقبة الايرادات Income و يتراسه Income Auditor ويليه Night Auditor ويليه Restaurant Auditor ويليه General Cashier ثم F&B Cashier وكل له تخصصه وله مدخلات بيانات ومخرجات مكملة لبعضها البعض قسم المدفوعات Payable قسم المقبوضات Receivable وكل هذه الاقسام تصب بياناتها في جعبة رئيس الحسابات والذي بدوره يصب بياناته بعد المعالجات والتسويات المطلوبة للمدير المالي تحياتي للجميع وتحياتي الخاصة جدا لك عزيزي المبدع على الدوام ابوعبدالله هاني بدر
    1 point
  13. السلام عليكم ورحمة الله وبركاته بالنيابة عن نفسي وعن إدارة المنتدي أهنئ الاستاذ نضال .nedal_shami بالترقية الي خبير معنمد لما يقدمه ويبذله من مجهود يستفيد منه جميع اعضاء المنتدي من الجديد الي القديم متمنين منه الابقاء (ان لم يكن بالزيادة) علي هذا العطاء اثابه الله عليه خير اثابة فألف ألف ألف مبروك والي الصعود دائما خالص تحياتي القلبية وتقديري الشخصي لأستاذ نضال
    1 point
  14. السلام عليكم أبيات للإمام الشافعي رحمه الله..من أجمل ما قرأت في وصف المنافقين المذبذبين..أدعو الله أن لا يجعلنا منهم.. لا خـيـر في ود امــرئ مــتلـــــون حلو اللســـــــان وقلبه يتلهبيعطيك من طرف اللــســان حلاوة ويروغ عنك كــما يروغ الثعلب يلقاك يحلف انه بـــــك واثــــــقـــا واذا توارى عنــك فهو العقرب واحذر مـــصاحــبــة اللئــــيم فانه يعدى كما يعدى الـسليم الاجرب و احذر من المظلوم سهمأ صائبأ وأعلم بان دعائه لا يـــحـجـــب
    1 point
  15. اخى الكريم جرب المرفق وابدى ملاحظاتك ... تم الغاء الدمج لانه يسبب مشاكل بالكود رصيد الفوندى_3.rar
    1 point
  16. السلام عليكم اخى / ياسر البنا شاكر مرورك العطر وكلماتك الطيبه ... جزاك الله خيرا خالص تحياتى وتقديرى لشخصكم الكريم
    1 point
  17. اول مشاركة من ببرنامج مخازن وبيع يصلح لاي نشاط تجاري ولا تنسونا بالدعاء FhdAccount.zip
    1 point
  18. 1 point
  19. البيانات تأتي اليك حتى و لو كان هناك تكرار لا Match بعد اليوم الذي يعطينا أول شيئ يصادفه و يتغاضى عن كل الباقيين البحث عن الاسم ياتي مرة ثلاثي ومرة رباعي.zip
    1 point
  20. اخى الكريم جرب الملف المرفق علة المطلوب .. انتبة الى المعادلة الموجودة بالخلية O1 البحث عن الاسم ياتي مرة ثلاثي ومرة رباعي.rar (يتم جلب القيم بمجرد ادخال الاسم بالخلية B1 )
    1 point
  21. اول شيء مرحبا مليون اخي محمد سلامة اشكرك على ردك وتجاوبك معي اخي . وانا عندي امل كبير ان شاء الله من الأعضاء التجاوب معي واعتقد بأن فعل الخير لا يحتاج إلى إمكانيات
    1 point
  22. ليس لنا رب سواك فيدعى وليس لنا الها غيرك فيسأل فاستجب دعائنا وتقبل منا انك انت السميع العليم واغفر لنا انك انت الغفور الرحيم وصلى اللهم وسلم وبارك على افضل الخلق اجمعين وعلى آله وصحبه وسلم تسليما كثيرا واخر دعوانا ان الحمد لله رب العالمين
    1 point
  23. ياغالى الله يبارك فيك اسعد دائما بوجودك ليتك تجد حلا لموضوع التنسيق التلقائى وسأفتح يدى اليك ضريا ولكن برفق يعنى خليك حنين تم تعديل المشاركة السايقة وافر تقديرى واحترامى
    1 point
  24. ايوه ياعم علي الهدايا اللي نازله ترف الله يسهلو اللي اداك يدينا يامعلم
    1 point
  25. ايه الناس اللي طلبتها مش بتخلص دي ولا يهمك ياعم ناصر احنا موجودين بس جيب معاك خرطوم ولا عصاية عشان لزوم الحل
    1 point
  26. و عليكم السلام اخي ... انا لي خلفية بسيطة عن الاكسس و لكن المساعدة المطلوبة من الاعضاء الكرام هي باعطائي النصائح و الاقتراحات او الافكار و انا اقوم بالعمل و اذا واجتني اي اشكالية بالعمل اقوم بالسؤال عنها و كل الاحترام لمرورك الكريم اخي
    1 point
  27. السّلام عليكم و رحمة الله و بركاته كلام طيّب من أخ أكثر من طيّب .. بارك الله فيك عزيزي " الصّقر " .. جزاك الله خيرًا و زادها بميزان حسناتك .. تفضّل يا غالي هديتي مع كامل إحتراماتي لشخصك الكريم الصقر.rar
    1 point
  28. صحيح اخي ياسر بعض الاسطر حذفت سهواً جرب المرفق Kh_Srech_Al_##.rar
    1 point
  29. الشرح أنا بحثت عنه على اليويتوب وحصلته على الرابط هذا
    1 point
  30. تمام يامعلم شغال الله ينور بس عشان خاطر ابو يوسف يبقي مش شغال ياعم صقر وظبطو شغلكوا شوية ياعم
    1 point
  31. السّلام عليكم و رحمة الله و بركاته أخي الكريم " أبو أمين " .. لو كنتَ اتبّعت التوجيهات الموضوعة بالمنتدى للأعضاء الجدد لوجدت الحل بأسرع وقت ممكن .. راجع هذا الرّابط لو تكرمت : http://www.officena.net/ib/topic/60047-كود-الوقت-و-التّاريخ-على-اليوزرفورم/ فائق تقديري و إحتراماتي
    1 point
  32. السلام عليكم أستاذي الكريم م/ياسر جزاكم الله خيراً...عمل رائع.... بارك الله فيك ونفع بك الاسلام والمسلمين شكرا الاخ مختار على الظافة
    1 point
  33. ألف ألف مبروك للأستاذ نضال شامي .. عقبال المزيد من الترقيات و النجاحات في شتّى المجالات ..
    1 point
  34. أمين شكرا على كلماتك الطيبة يا أخ عمرو طبعا أنا فهمت شغلك تمام باقي نقطة مهمة جدا في برنامجك وهي أن كمية البضاعة المطلوبة غير موجودة فإذا كان مثلا تاريخ الطلب هو قبل شهر من الآن ولم يتم توريد أي بضاعة حتى الآن لو سألتك الشركة يا عمرو : كم الكمية المطلوبة ؟ لن تستطيع الجواب من خلال البرنامج لأنه لا يوجد خانة تبين ذلك عموما تم حل هذه المشكلة في المرفق الآتي لاحظ الأعمدة الأربعة الجديدة D و F و AD و ِِ AE تفضل تحليل المشتريات للموردين3.rar
    1 point
  35. السّلام عليكم و رحمة الله و بركاته ألف شكر أستاذنا القدير عادل حنفي .. إلتفاتة طيّبة منك .. جزاك الله خيرًا و زادها بميزان حسناتك ألف ألف مبروك للأستاذ نضال شامي .. عقبال المزيد من الترقيات و النجاحات في شتّى المجالات .. دمتما ذخرا لنا و سندا للجميع في سبيل نشر العلم و المعرفة في هذا الصرح التعليمي الكبير ..زادكما الله من علمه و فضله فائق إحتراماتي
    1 point
  36. مبروك أحى نضال تابعت أعمالكم .. شد حيلك .. الهمة للمهمة
    1 point
  37. أخي الحبيب ومعلمي الكبير عادل حنفي جزيت خيراً على هذه التهنئة الطيبة ، بارك الله فيك الأخ الكريم نضال الشامي مبارك الترقية ألف مبروك وأنت تستحقها .. نظراً لما تقدمه وتبذله في سبيل إيصال المعلومة بكل بساطة
    1 point
  38. اتفضل انا كملت على الملف اللى ارسلته لك بالامس لان الملف اللى انت بعته لا يعمل جيدا اما استدعاء الماكرو فيكون من خلال Ctrl+q BBB.rar
    1 point
  39. رابعاً:- التعامل مع خصائص الـ ComboBox فى لغة البرمجه فى الدرس قبل السابق عرفنا ازاى نتحكم فى خصائص ComboBox من شاشة الخصائص اثناء عملية التصميم فماذا لو حبينا نتحكم فى خصائص ComboBox ولكن من خلال الاكواد وليس من شاشة الخصائص فى مرحله التصميم هنبدأ على طول بمثال عملى ونشرح عليه اضغط دبل كليك على اى مكان فاضى فى الفورم وهندخل محرر اكواد الفورم ونعمل كود فى حدث فتح الفورم اتبع الصوره هتلاقى الصوره دى فى المكان المظلل باللون الاحمر هنا موضوع كتابه الاكواد ولكتابة اى كود خاص بأى عنصر تحكم فى الفورم يكون على الشكل التالى الخاصيه ( Back Color):- زى ما قلنا قبل كدا ان هذه الخاصيه تتيح للمستخدم تغيير لون خلفية للـ ComboBox عايزين نكتب فى المربع الاحمر كود يجعل لون خلفية الكمبوبوكس (سماوى ) عند فتح الفورم لو حضرتك محترف كتابة انجلش كويس على الكيبورد وسريع خلاص لا تهتم بالقائمة المساعده للخصائص اللى بيعرضها الفيجوال بيسك واكتب انت بنفس سطر الكود ناخد مثال اخر عن الخاصيه ( Back Style):- ناخد مثال اخر عن الخاصيه ( Row Source ):- ComboBox1.RowSource = "A1: b5" سطر الكود زى ما هو ظاهر تم كتابة اسم العنصر ثم . ثم اسم الخاصيه ثم = ثم المدى المراد اظهاره فى الكمبوبوكس ( المدى تم كتابته بين اقواس تنصيص " المدى " وهذه الاقواس كما قلنا انها تكتب من خلال الضغط على شيفت + حرف ط بالعربى ) ناخد مثال اخر عن الخاصيه ( Column Heads ):- ComboBox1.ColumnHeads = True سطر الكود زى ما هو ظاهر تم كتابة اسم العنصر ثم . ثم اسم الخاصيه ثم = ثم نوع الخاصيه اما True أو false وكذالك لباقى الخصائص الخاصه باى عنصر تحكم على الفورم هذا هو الكود بشكله النهائى على الاربع خصائص السابقه Private Sub UserForm_Initialize() ComboBox1.BackColor = 15849925 ComboBox1.BackStyle = fmBackStyleOpaque ComboBox1.RowSource = "A1: b5" ComboBox1.ColumnHeads = True End Sub هل يمكن ايضا كتابة الكود بشكل ابسط نعم يوجد طريقه اخرى من خلال استخدام With وطبعا لازم نقفل With بـ End with ويكون بداية سطر الكود هو . ثم اسم الخاصيه ثم = ثم نوع أو قيمة النتيجة شاهد الكود كالتالى Private Sub UserForm_Initialize() With ComboBox1 .BackColor = 15849925 .BackStyle = fmBackStyleOpaque .RowSource = "A1: b5" .ColumnHeads = True End With End Sub أنا عايزك تجرب باقى الخصائص بنفسك ولو صدفك اى مشكله لا تتردد انك تراسلنى تابعونا
    1 point
  40. في المشاركة ... http://www.officena.net/ib/index.php?showtopic=38385&p=225383 كان الأخ الصمت المتحدث تساءل عن تطبيق فكرة نطاق السنوات على الأشهر ، ورغم تأخر الردّ ، نطبق الفكرة لعموم الفائدة وباستخدام مفهوم callback function ، لغايات تحقيق المرونة و الفاعلية ، نقوم بانشاء وحدة نمطية عامة ، تحدد هذه الوحدة خصائص مربع التحرير و السرد او مربع القائمة التي ستحتوي البيانات بحيث يكون نوع مصدر البيانات Value List وعدد الاعمدة 1 ، ثم نفرغ المربع المحدد من أي بيانات سابقة ، ونقوم بتحديد بياناته الجديدة بواسطة بقية جمل الوحدة النمطية . Public Function callbackMonth(strContMonth As Control) 'By Nart Lebzo .... www.officena.net 'Amman - Jordan 25/06/2014 Dim intI As Integer strContMonth.RowSourceType = "Value List" ' Clear out strContMonth.RowSource = vbNullString strContMonth.ColumnCount = 1 ' Months For intI = 1 To 12 strContMonth.AddItem Format( _ DateSerial(Year(Date), intI, 1), "mmmm") Next intI End Function وفي جملة الاستدعاء وفي حدث عند الحالي للنموذج نحدد اسم مربع التحرير و السرد او مربع القائمة المستهدف لاحتواء البيانات Call callbackMonth(CombMonth) مرفق تطبيق اصدار 2003 و 2007 NA_CallbackMonths.rar
    1 point
  41. كنا في المشاركة ... http://www.officena.net/ib/index.php?showtopic=38385&p=223496 تحدثنا عن نطاق السنوات لعشر سنوات ماضية وقادمة ، لتكون الوحدة النمطية مصدر الصف في مربع تحرير وسرد وهنا نعدل على الفكرة باستخدام مفهوم callback function ، لغايات تحقيق المرونة و الفاعلية ، ونقوم بانشاء وحدة نمطية عامة ، تحدد هذه الوحدة خصائص مربع التحرير و السرد او مربع القائمة بحيث يكون نوع مصدر البيانات Value List وعدد الاعمدة 1 ، ثم نفرغ المربع المحدد من أي بيانات سابقة ، ونقوم بتحديد بياناته الجديدة بواسطة بقية جمل الوحدة النمطية . Public Function callbackYearLoop(strContYear As Control, strLoop As Integer) 'By Nart Lebzo .... www.officena.net 'Amman - Jordan 25/06/2014 Dim YearHold As Date Dim intI As Integer strContYear.RowSourceType = "Value List" ' Clear out strContYear.RowSource = vbNullString strContYear.ColumnCount = 1 ' Year For intI = -strLoop To strLoop YearHold = DateSerial(Year(Date) + intI, 1, 1) strContYear.AddItem Format(YearHold, "yyyy") Next intI End Function وفي جملة الاستدعاء وفي حدث عند الحالي للنموذج نحدد اسم مربع التحرير و السرد او مربع القائمة المستهدف لاحتواء البيانات ثم عدد السنين لتحديد الدوران ( سابق ولاحق ) Call callbackYearLoop(CombYear, 3) وتكون النتيجة لدينا مرنه وقابلة للاستدعاء في اي نموذج وللفترات التي نحتاجها في كل نموذج او ظرف ( وحسب التحليل ) مرفق تطبيق اصدار 2003 و 2007 NA_CallbackYearLoop.rar
    1 point
  42. IS NOT يمكنك نفي شرط IS باتباع ذلك مع المشغل NOT SELECT LastName, FirstName, HourlySalary FROM Employees WHERE Department IS NOT NULL ..............
    1 point
  43. السلام عليكم ورحمة الله وبركاته أخي تفضل الكود Private Sub CommandButton1_Click() Dim Msg As String Dim ans As Integer Dim ans2 As Integer Msg = "هل ترغب بعمل نسخة احتياطية؟" ans = MsgBox(Msg, vbYesNo, "الرجاء الإنتباه") If ans = vbYes Then copy1 ans2 = MsgBox(" تم عمل نسخة إحتياطية ", vbInformation, "الرجاء الإنتباه") Else Exit Sub End If End Sub Sub copy1() Dim Extension$ Dim savePathName As String Extension = Left(ThisWorkbook.Name, Len(ThisWorkbook.Name) - 5) & "Backup" & (Format(Now, " dd-mm-yyyy,hh.mm.ss AMPM")) & ".xlsb" savePathName = "c:\Test Backup 1\" On Error Resume Next Application.DisplayAlerts = False GetAttr (savePathName) Select Case Err.Number Case Is = 0 Application.DisplayAlerts = False ThisWorkbook.SaveCopyAs savePathName & Extension Application.DisplayAlerts = True Case Else MkDir savePathName ThisWorkbook.SaveCopyAs savePathName & Extension End Select On Error GoTo 0 End Sub
    1 point
  44. جهد مشكور وجزيتم خيرا
    1 point
  45. في المشاركة 39 كنت تحدثت عن تعذر قبول المشاركات ، وقد رأيت اليوم ما لم أرى بالأمس ... يتم فتح الموضوع للمشاركة ، والتفاعل والله من وراء القصد ... وهو حسبي ......
    1 point
  46. أحتاج لخيار آخر غير InputBox بحيث يكون قابل للسيطرة و متناسقاً مع النظام من حيث الشكل وتنسيق النماذج !! هذه هينة بإذن الله ... قم بإنشاء نموذج بالحجم الذي تجده مناسبا قم بانشاء مربع نص بإسم Text000 قم بانشاء زر أمر بإسم ComClose وسمه OK قم بانشاء زر أمر بإسم ComCancel وسمه Cancel وفي محرر الفيجوال للنموذج ضع مجموعة الكودات التالية : Private Sub ComClose_Click() If IsNull(Me.Text000) Or Me.Text000 = "" Then MsgBox ("You did not provide anything!") Else MsgBox ("You entered: '" & Me.Text000 & "' as the value!") End If DoCmd.Close acForm, Me.Name End Sub Private Sub ComCancel_Click() MsgBox ("You pressed Cancel!") DoCmd.Close acForm, Me.Name End Sub Private Sub Form_Timer() DoCmd.Close acForm, Me.Name End Sub Private Sub Text000_Change() Me.TimerInterval = 0 End Sub التطبيق بسيط وفعاّل عند فتح النموذج وعدم التفاعل معه لمدة 10 ثواني يغلق تلقائياً عند إدخال أي نص في مربع النص تظهر الحروف على شكل نجمة (كلمة سر) بالموافقة على النص المدخل OK تظهر رسالة توضح النص المدخل ، وهنا يمكننا وضع الكود المناسب للتطبيق من حيث إعتماد القيمة أو رفضها ... في حال ترك مربع النص فارغاً وضغط OK تظهر سالة تفيد بانه لم يتم إدخال أي قيمة في حال الضغط على الزر Cancel يتم إشعارنا برسالة بخيارنا ويتم إغلاق النموذج جرب ....
    1 point
  47. الاخوة الكرام عندي سؤال بسيط وهو كيف يمكن عمل الاجمالي عند تصميم الجدوال بحيث يعطي الاجمالي اتوماتيكيا ممكن شرح ذلك وطريقة وضع المعادلة ولكم الشكر والتقدير مقدما. Ex.rar
    1 point
  48. أخي الكريم لقد وضعت لك برنامج صغير فاطلع عليه فعليه يوجد التعديل والحفظ وتستطيع أن تأخذ منه ما تشاء. أخوك R1.rar
    1 point
×
×
  • اضف...

Important Information