الصـقر

استاذى الحبيب خد الرابط ده وضعه بجوجل وشف هيفتح معك او لا ( http://www.gulfup.com/?9nxQAn ) تقبل تحياتى

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

اخى الكريم انا لله وانا اليه راجعون عظم الله أجركم وأحسن عزاءكم وغفر لميتكم واسكنها فسيح جناته وان يجمعنا بها بالفردوس الاعلى انا لله وانا اليه راجعون

اضم صوتى لكم نريد الشكل السابق فهو روعه روعه روعه وكان من بين افضل المنتديات التى كنت ادخلها وكان بمثابة ادمان لى فى الدخول

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

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

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

اخى الحبيب بعد تفكير سريع افضل العرض الثانى سيحقق لى ربح بعد 3 سنوات يصل الى 10350 27000 +10350(ربح) = 37350 ( اعتقد هذا افضل العروض تقبل تحياتى

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

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

الاخ الحبيب محمد الريفى رائع رائع رائع وما اروع اعمالك

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

استاذى الحبيب / محمد حسن والاستاذ الغالى / ياسر خليل هذه النسخه هى الاصدار الاول بتاريخ 30-9-2014م وكان تخص فقط 2014 وذالك لسببين الاول / اننا نتعامل مع ملف اكسيل فى النهايه يعنى لابد من مراعاة حجم البرنامج حتى لا يسبب ثقل للملف وبطئ شديد فى التعامل معه فكان لابد من يكون لكل سنه ملف خاص بها ثانيا / من الناحيه المحاسبيه يجب اقفال كل عام مالى برصيد ختامى وتسجيله برصيد افتتاحى فى عام مالى جديد اما الهدية ان شاء الله غير منقطعه والدليل على ذالك هذا الرابط من 1-1-2015م وهى نسخه عام 2015م http://www.officena.net/ib/index.php?showtopic=57962&hl= وان شاء الله كل عام هينزل نسخته هنا هدية للكل بالمنتدى وبخصوص موضوع الحمايه هو للحفاظ على البرنامج وعدم العبث فيه ولمن يريد التعلم التعلم يكون بالدروس الغزيرة اللى موجوده بالمنتدى والذى افاض بها اساتذتنا الكرام ومنوا بها علينا لان لكل برنامج خبايا وكل برنامج قائم على فكرة صاحبه فمن الصعب فهما ارتباط الاكواد بعضها البعض فى بعض الاحيان وانتظرو قريبا جدا برنامج EMA بشكله الجديد المختلف كليا وجزئيا عن الاصدارين السابقين

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

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

اخى الكريم راجع الرابط التالى ربما يفيدك http://www.officena.net/ib/index.php?showtopic=62138&hl= تقبل تحياتى

برافو عليك يا غالى بخصوص طلبك للمجموع راجع المشاركه رقم 5 فوق ستجد الحل عموما قم باضافه الاسطر التالية بالكود Dim total As Double For h = 0 To ListBox1.ListCount - 1 total = total + ListBox1.List(h, 6) Next h Me.TextBox3 = total طبعا بالمشاركة السابقه كان المجموع للعمود رقم 2 بالليست ولكن بعد ما عملت انت اضافات على الفاتورة اصبح عمود المجموع هو 6 ( ملحوظه صغيرة فى الليست العدد بيبدأ من 0 يعنى اول عمود بيكون رقمه 0 والعمود الثانى بيكون رقمه 1 وهكذا ) تقبل تحياتى ورمضان كريم

اخى الكريم والحبيب ضع هذا السطر فى مكانه طبعا انت عارف فين عايزك انت تجرب بنفسك ( صراحه ما شاء الله الملف فى تطور رهيب ) المهم السطر اهوو عايز اعرف هتقدر تعرف وين مكانه وترفع الملف هنا اشوفه ولا ابعتلك انا الملف بالحل .List(I, 6) = (Val(Me.TextBox1.Value) * Val(Me.TextBox2.Value)) - Val(Me.TextBox5.Value) واى اخدمه تحت امرك تقبل تحياتى

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

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

تفضل اخى الحبيب كل عام وانت بخير شاهد المرفق هل هو طلبك ملحوظه الترحيل فى الشيت 1 وليس 2 كما طلبت ( لان الشيت 2 هو مصدر البيانات للاصناف والسعر ) تقبل تحياتى فاتورة1.zip

اخى الحبيب كل عام وحضرتك بالف خير انظر المرفق هل هو طلبك تقبل تحياتى DOCUBLE CLICK.zip

اخى الكريم شاهد المرفق على حسب ما فهمت من سؤالك هل هذا هو المطلوب ضع هذه المعادله بالخلية G1 =IF(F1<B1;0;IF(AND(F1>B1*2;F1<50001);F1*5%;IF(F1>50000;(50000*5%)+((F1-50000)*10%);0))) على فرض ان راتب الموظف بالخلية B1 وتارجت المبيعات للموظف بالخلية F1 شاهد النتيجة بالخلية G1 كما هو موجود بالمرفق تقبل تحياتى معادله حساب العموله.zip

لو المشكله ما زالت قائمه جرب الحل التالى اتبع الخطوات كما بالصورة المرفقه

الكود تمام عندى ولا يوجد اى شئ باهت فى بعض الاوامر لا تكون نشطه الا حسب الحاجه مثل الامر Paste لا يكون نشط الا اذا تم عملية Copy مثلا