هاني بدر

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

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

بسم الله الرحمن الرحيم اشكرك كثيرا على مرورك الكريم واود ان اشير الى شيئ مهم وهو اني لست مبرمجا ولكني تلميذ مجتهد تعلمت الكثير من عظماء الموقع ولا يمكنني تحديد اسماء بعينها فهم كثر واخشى ان انسى اى منهم وانا احاول المزج بين صفة المحاسب الجيد والمبرمج الاكثر اجادة وفيما يخص الفورم فلم اعي مقصدك وان كنت فهمت منك ان السؤال عن الخروج من الفورم فاعتقد ان هناك بالفورم كوماند بوتوم للخروج وعلى العكس انا لا ارى اى جمال في الفورم من الناحية الشكلية حيث انني جاهل جدا في تنسيقات الالوان ولكن اجمل مافي الفورم هو انني ابتعدت بقدر المستطاع عن كتابة المعادلات داخل الصفحات وكما ترى يمكنك تسجيل كافة التعريفات والمتغيرات في Page 2 Setup وفي Page 1 يمكنك تسجيل بياناتك واستدعائها والتعديل فيها وان كنت لم اكمل موضوع التعديل ولكني ساكمله ان شاء الله كما يمكنك احتساب الاسعار بكل سهولة ودون عناء وكذلك ارجاع القيم الى قيمتها الاصلية قبل احتساب الضرائب ورسم الخدمة وهو جزء صعب جدا مهما حاولت ان اوصله لاى مبرمج فسنتعب سويا حتى تخرج النتيجة كما تظهر في الفورم وفكرتي الاساسية هي الابتعاد تماما عن مشاهدة صفحات الاكسيل والاكتفاء بالعمل داخل الفورم لذلك اشكرك مرة اخرى على مرورك وارجو التواصل ولي طلب عندك اعلم انه صعب جدا عندي ويسير جدا عندك وهو امر فلترة صفخة البيانات بناء على تاريخين ولن اتعجل في مساهمة الاخ الكريم ابوعبدالله فانا اعلم مدى عزيمته ورغبته الاكيدة في انجاح هذا العمل له ولك ولكل اعضاء المنتدى كل التحية هاني بدر

بسم الله الرحمن الرحيم حاولت ان اصمم السهل لاترك لعزيزي ابو عبدالله الاصعب وهو بعون الله قادر على اجتيازه وعليه فقد قمت بتصميم ملف ارحو ان ينال اعجابكم وينقصه لمسات الفن المعهودة لديكم المطلوب في الملف 1 - تعديل شكل صفحات الفورم الرئيسي وتغيير الوانها Page 1 , Page 2 , Page 3 مع الشرح 2- عمل فورمات عرض البيانات من صفحة التعريفات والتعديل عليها 3 - فلترة البيانات حسب التاريخ في الخلية U9 ماهو اكبر منها اويساويها في عمود الوصول وماهو اقل منها اويساويها في عمود المغادرة والله الموفق Income JV.rar

ارجو المساعدة في هذا البرنامج للاهمية القصوى

بارك الله فيك واشكرك بالطبع على اهتمامك Sheet1 هي قاعدة البيانات الاساسية والعمودان F , G هم اعمدة التواريخ ولو قمت في الفورم بادخال التاريخ وكتبت اليوم ثم الشهر ثم السنة وطلبت ترحيل البيانات والتي يتم ترحيلها الى صفحتين هم Sheet1 , Reserved فسيقوم الجهاز بادراج بيانات الفورم داخل الشيتين ولكن ستكون التواريخ غير مفهومة للجهاز لبناء معادلات بناء على هذه التواريخ وفكرة البرنامج تعتمد بقدر كبير على البعد عن ادراج البيانات مباشرة داخل اى شيت ولكن عن طريق الفورم كذلك التقارير حاولت الابتعاد عن صفحة المعادلات ويتم اخذ نسخة من البيانات داخل التقرير ووضعها في شيت منفصل حتى اذا قام احد المستخدمين ولو عن طريق الخطا بتعديل بيان فلن يؤثر في التقرير الاصلي والبرنامج في مجمله يؤدي الاغراض الاتية اولا: تسجيل بينات الحجز كاملة ثانيا : تفادي تكرار الاكواد ثالثا : تفادي حجز غرفة في اى فترة مادامت هي بالفعل مشغولة خلال اى يوم من هذه الفترة رابعا: استخراج تقرير سريع يوضح حالة الغرف في تاريخ محدد ومايليه بشهر وفي انتظار تعديل البرنامج ليصبح في افضل صوره لك كل التحية والتقدير

اشكرك اخي الكريم على المشاركة وتواجدك الدائم مشكلة التاريخ في انني لابد من ادخال الشهر اولا وم اريده هو ادراج اليوم اولا ولو قمت بادراج اليوم اولا فستجد في صفحة البيانات التاريخ غير معرف ولا يمكن بناء معادلات عليه تقبل تحياتي

بسم الله الرحمن الرحيم لدى برنامج قمت بتصميمه بالاعتماد على اكواد عظماء الموقع وما اكثرهم والبرنامج يقوم بتسجيل بيانات حجوزات الافراد والشركات ثم يقوم باستخراج تقارير عن وضع الفندق خلا شهر يبدا من التاريخ الذي يحدده المستخدم ولكن نظراً لاني غير مؤهل للبرمجة فقط اجتهدت واخرجت النتائج المرجوة ولكن زى مابيقولوا بالبلدي " ودنك منين ياجحا " لذلك ارجو التعديل على الاكواد بما يوفر الوقت وكذلك في فورم الادخال ارجو ان تساعدوني على اضافة كومبوبوكس للاكواد وبناء عليه تظهر بيانات الكود في نفس فورم الادخال مع امكانية التعديل عليه كما ان هناك مشكلة في ادراج التاريخ حيث انني لا اعرف لماذا يجب ادخال الشهر اولاً ارجو تعديل صيغ التاريخ لتبدا باليوم ثم الشهر ثم السنة ارجو ان ينال اعجابكم حيث انني اريد ان ارفق الملف مع استاذي الفاضل ابو عبدالله ضمن مشروعات 4 الخاص بمحاسبة الفنادق والمطاعم باسوورد الدخول 01020103 باسوورد VBA h30f02a08n24 رابط الملف http://www.mediafire.com/?ist7afbbepsjtt0 تقبلوا تحياتي

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

السلام عليكم ورحمة الله وبركاته بارك الله فيكم جميعا وهذا الموضوع بالاخص وهو الفروق بين اوفيس 2003 و 2007 فهل المشكلة مقتصرة فقط على طريقة عرض القوائم ام ان هناك مشكلة جوهرية في الاكواد فمثلاً لدى ملف وبه هذا الكود وبسبب انني اعمل على اوفيس 2007 تظهر رسالة خطا في الملف بسبب السطر المكتوب باللون المختلف ارجو افادتي للاهميةPrivate Sub UserForm_Initialize() On Error Resume Next Dim mycol As Collection Dim myrng As Range Set mycol = New Collection For Each myrng In Range("ÇáÇÓãÇá3") mycol.Add myrng.Value, myrng.Text Next myrng For 1 = 1 To mycol.Count If mycol.Item(I) = "" Then mycol.Remove I Me.ComboBox2.AddItem mycol(I) Next I End Sub

السلام عليكم ورحمة الله وبركاته بارك الله فيك اخي الكريم ولكن لدى مشكلة في الملف بسبب السطر المكتوب باللون المختلف ارجو افادتي حيث انني اعمل على اوفيس 2007 Private Sub UserForm_Initialize() On Error Resume Next Dim mycol As Collection Dim myrng As Range Set mycol = New Collection For Each myrng In Range("ÇáÇÓãÇá3") mycol.Add myrng.Value, myrng.Text Next myrng For 1 = 1 To mycol.Count If mycol.Item(I) = "" Then mycol.Remove I Me.ComboBox2.AddItem mycol(I) Next I End Sub

في الخلية N4 ضع معادلة عدد الاقساط =IF(F3>E2;"Out Of Date";MONTH(E2-F3)) الخلية B27 ضع مبلغ 90000 جنيه وفي الخلية F27 ضع معادلة =IF($F$3>$E$2;0;B27/$N$3) وهي لاحتساب قيمة القسط الواحد وفي الخلية N27 =IF($F$3>$E$2;"0";F27) O27 =IF(AND(F27>0;N27<B27);F27;0) P27 =IF(B27>=N27+O27+O27;F27;0) R27 =IF(B27>=N27+O27+O27+P27;F27;0) وهذه المعادلات لاحتساب عدد الاقساط شهريا بمتغيرات بداية السنة المالية ونهاية الفترة المطلوب احتساب اهلاك لها ولكن اذا كنت تريد معرفة الاقساط بالايام وحسب تاريخ شراء الاصل وتاريخ نهاية العمر الافتراضي له فهذا موضوع آخر

مش عارف لماذا لا يظهر المرفق

المرفق

جرب المرفق لو كنت انا فهمت الموضوع صح

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

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

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

بسم الله الرحمن الرحيم كنت قد بدات بمشاركة الاخ الكريم ابوعبدالله الذي لم يتردد لحظة في التفاعل والمشاركة فلا يفوتني ذكر كل التحية والتقدير لشخصه الكريم كنا قد بدانا في عمل تمهيدي لمحاسبة نزلاء الفنادق والقرى السياحية ويبدو ان هناك خطا ما قد حدث لذلك اطلب من الاخ الفاضل ابوعبدالله تغيير عنوان الموضوع الى مشروعات 4 وكنا قد توقفنا عند ارسال ملف تعريفات في اطار عمل البرنامج والذي قسمته الى نصفين نصف مدخلات والاخر هو مخرجات ومازلنا في اطار النصف الاول ومرفق ملف تعريفات واريد ان اوضح اطار العمل بشكل متكامل بعد وضع التعريفات الخاصة بتعريف الغرف وتعريف العملات والجنسيات وشركات السياحة وانواع المستندات المستخدمة ودليل الحساباتوانواع الاقامة وتصنيفات الغرف تبعا لعدد الافراد بالغرفة الى آخره ناتي للجزء الثاني وهو تسجيل البيانات والاضافات هناك نوعان للبيانات باربع قواعد بينات النوع الاول من البيانات هو تسجيل بيانات لا تؤثر في رصيد العملاء بشكل مباشر كان يتم تحديد سعر الصرف الشهري او تسجيل عقد شركة سياحة وهو قاعدة بيانات خاصة بهذه المعلومات ويتم استخراج بيناناتها اثناء تسجيل النوع الثاني من البيانات وهو الذي يؤثر بشكل مباشر في ارصدة النزلاء كتسجيل بيانات النزيل بكل محتويات Registeration Card وسيكون قاعدة بينات اخرى جديدة وكذلك تسجيل سندات القبض او التعديلات على الغرف كنقلها من غرفة الى اخرى او التعديل على سعر اقامة الغرفة او سندات تحميل الغرف باى مبالغ بخلاف ما ياتي من قسم الاغذية والمشروبات وهذا ايضا قاعدة بينات جديدة والقاعدة الرابعة هي تسجيل F & B Summary وهو الجزء الخاص بتسجيل مسحوبات النزلاء من قسم الاغذية والمشروبات فهل هذا جائز من الناحية البرمجية بحيث يمكنني استدعاء بينات الغرفة بناء على كود تسجيلها وفي خلال فترة محددة تتراوح بين تاريخين من الثلاث قواعد للبيانات الاخيرة والله الموفق تحياتي للجميع

الشكر واجب علينا وواجب لك عزيزي ابوعبدالله وقد تم رفع الملف في البوستنج رقم 11 ونظراً لاننا في آخر يوم العمل فاعذرني لاني بلغة المبرمجين قد أصابني فيروس الارهاق الذهني وفي انتظار سطوع شمس يوم جديد ان اراد الله لنا ذلك وان شاء الله سوف احدد جدول Statics وهو الجزء الاخطر على الاطلاق في البرنامج نظرا لما يحتويه من ارقام بناء على متغيرات متشعبة وفقنا الله واياكم اخوك هاني بدر

السلام عليكم ورحمة الله وبركاته لك كل التحية والتقدير عزيزي ابوعبدالله وجاري رفع الملف موضحاً فيه الحدود القصوي للتسجيل وكذلك توضيح ما اذا كان سيتم التسجيل في الجدول لمرة واحدة او التعديل فيما بعد ويعجز لساني عن شكرك هاني بدر Rooms.rar

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

الحمد لله تم الرفع والملف في المرفقات Rooms.rar

بسم الله الرحمن الرحيم سابدا برفع ملف لتوضيح فكرة الفورمات المطلوبة ارجو ان يساعد في فهم الفكرة وليكن هو نواة البدء ولكن لا اعرف من اين ارفع الملف

السلام عليكم ورحمة الله وبركاته الفورم الثالث سيكون للتعريف بطبيعة الغرفة تبعا لعدد الافراد وهي على النحو التالي SGL. DBL. TPL. والاولى تعني غرفة فردية والثانية غرفة مزدوجة والثالثة غرفة ثلاثية والفورم الرابع سيكون للتعريف بطبيعة الاقامة داخل الغرفة B.O. B.B. H.B. A.I والاولى تعني ان النزيل سيستفيد فقط بالغرفة واذا تناول اى وجبات فستحمل على حسابه المدين والثانية تعني انه سيقيم بالغرفة وله افطار في المطعم الرئيسي ولن يضاف الى حسابه المدين قيمة الافطار والثالثة تعني ان النزيل له الحق في تناول وجبة الافطار والعشاء وقيمتهم لن تحمل على حسابه المدين والثالثة تعني انه لاتوجد اى اضافات على حسابه المدين من الوجبات او المشروبات وارجو ان يتم دمج كافة هذه الفورمات في فورم واحد ويقوم المستخدم باستدعاء ما يشاء منهم اما الفورم الخامس وهو الاهم فسيكون مخصص للتعريف بشركات السياحة وكيفية محاسبتهم تبعا للبيانات الواردة في الاربع فورم السابقة خلال فترات محدة مسبقا باتفاق المؤسسة الفندقية والوكيل الشياحي هاني بدر