rosealshamasad قام بنشر مارس 2, 2018 مشاركة قام بنشر مارس 2, 2018 مرحبا اصدقائي انشئت فورم اكسل لعملية حسابية و فيها Textbox1 ,Textbox2,Textbox3 و زر حساب Textbox3.value=Textbox1 × 5\100 و فرضنا ان الناتج 120.88 أو 2.6 أو 84.3 كيف يمكن تقريب الناتج ليصبح 121 أو 3 أو 85 ارجو مساعدتي شكرا لكم و لجهودكم و لأدارة المنتدى و الاعضاء رابط هذا التعليق شارك More sharing options...
Hisham85 قام بنشر مارس 2, 2018 مشاركة قام بنشر مارس 2, 2018 عن طريق دالة من دوال التقريب ما رأيك بهذا التعديل؟ TextBox3.Value = Application.WorksheetFunction.Ceiling(TextBox1.Value * 0.05, 1) رابط هذا التعليق شارك More sharing options...
rosealshamasad قام بنشر مارس 2, 2018 الكاتب مشاركة قام بنشر مارس 2, 2018 هل يمكن ان تشرح لي التعديل شكرا لاجابتك رابط هذا التعليق شارك More sharing options...
Hisham85 قام بنشر مارس 2, 2018 مشاركة قام بنشر مارس 2, 2018 طبعا التعديل هو وضع معادلة حضرتك (ضمن) دالة التقريب المطلوبة وهى دالة Ceiling وهى دالة تقوم بتقريب الأرقام العشرية لأقرب (أكبر) عدد صحيح، بصرف النظر عن قيمة الرقم العشرى كانت أصغر أو أكبر من 0.5 والدالة التى تقوم بعكس دور هذه الدالة هى الدالة Floor حيث تقرب لأقرب (أقل) عدد صحيح .. يعنى فى مثال حضرتك للرقم 84.3 دالة سيلينج تجعله 85 ودالة فلور تجعله 84 وتكوين الدالة فى الاكسل يكون اسم الدالة ثم خانتين الأولى نضع فيها العدد المطلوب تقريبه، أو الحسابات التى تصل بنا للعدد المطلوب تقريبه والثانية نضع بها طول التقريب، إن كان لأقرب عدد واحد نضع (1) إن كان التقريب مطلوب لأكثر من ذلك نضع العدد المطلوب = Ceiling(84.3;1) هذه صيغة الدالة فى شيت الاكسل لكن عند التعامل مع محرر اكواد الاكسل يجب استدعاء دوال الاكسل أولا عن طريق أمر Application والمقصود هو ابلكيشن الاكسل ثم أمر الدوال WorksheetFunction ثم نختار الدالة المطلوب إدراجها 1 رابط هذا التعليق شارك More sharing options...
rosealshamasad قام بنشر مارس 2, 2018 الكاتب مشاركة قام بنشر مارس 2, 2018 هل كتابة هذا الكود صحيحه (1;Textbox3.value= Ceiling (Textbox1 × 5\100 1 رابط هذا التعليق شارك More sharing options...
Hisham85 قام بنشر مارس 2, 2018 مشاركة قام بنشر مارس 2, 2018 (معدل) و نلاحظ أن الاكسل يتعامل مع علامة الضرب X بعلامة النجمة * وتمت كتابة الخمسة من مائة كرقم عشرى 0.05 للتسهيل كما يفضل أيضا عند استخدام التكست بوكس فى الأرقام والعمليات الحسابية إضافة أمر القيمة Value لتصبح مثلا TextBox.Value لاستخلاص القيمة بدقة عند التعامل مع الأرقام تم تعديل مارس 2, 2018 بواسطه Hisham85 رابط هذا التعليق شارك More sharing options...
rosealshamasad قام بنشر مارس 2, 2018 الكاتب مشاركة قام بنشر مارس 2, 2018 بالنسبة لحساب الضريبة وفق شرائح اضفت فورم لحساب الرواتب و قيمة الضريبة بالضغط على زر امر يظهر قيمة الضريبة في Textbox3 ماهوالكود الذي يمكنني كتابته ليحسب الضريبة على الراتب وفق القانون المرفق بالصورة رابط هذا التعليق شارك More sharing options...
Hisham85 قام بنشر مارس 3, 2018 مشاركة قام بنشر مارس 3, 2018 تمام ، هنا لازم نستخدم دالة if لتحديد الشرائح المطلوبة بس انا عندى سؤال، ليه حضرتك عملتى يوزرفورم وما اشتغلتيش على الشيت مباشرة؟ رابط هذا التعليق شارك More sharing options...
Hisham85 قام بنشر مارس 3, 2018 مشاركة قام بنشر مارس 3, 2018 عمومًا ده شيت فيه المطلوب لكن بطريقة الدوال داخل الشيت إذا حبيتى تحويل الدوال للفورم، ممكن تقومى برفع الملف وهحاول اضيفهم فيه Net Salary.xlsx رابط هذا التعليق شارك More sharing options...
rosealshamasad قام بنشر مارس 3, 2018 الكاتب مشاركة قام بنشر مارس 3, 2018 عم استخدم يوزرفوم ليكون شكل جمالي متل باقي البرامج المحاسبية و الاكواد ثابته اما الشيت ممكن ينحذف شي من الصيغ وقت ضيف او عدل هذا الملف يلي حضرتك ارفقته وفق القانون يلي بالصورة بتشكرك كتير 1 رابط هذا التعليق شارك More sharing options...
Hisham85 قام بنشر مارس 4, 2018 مشاركة قام بنشر مارس 4, 2018 السلام عليكم تم عمل المطلوب و رجاء مراجعة النتائج بالملف المرفق Net Salaries.xlsm رابط هذا التعليق شارك 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.