mr_looking

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

كل عام وانتم بخير وعيدكم مبارك انشاء الله لدي سؤلان فقط : الاول : عند يفتح المستخدم ملف اكسل تظهر له رسالة تطلب منه الموافقة على تشغيل او عدم تشغيل الماكرو الموجد في الملف فيكن لدى المستخدم احتمالان 1- ان يقوم بالموافقة على تشغيل الماكرو (وهنا لايوجد مشكلة) 2- ان يرفض المستخدم تشغيل الماكرو ويتم فتح الملف بدون تشغيل الماكرو (وهنا توجد مشكلة وهي ان الملف يتم فتحه بدون تشغيل الماكرو وما اريده عندم يقوم المستخدم برفض تشغيل الماكرو اريد ان يتم غلق الملف بحيث يتم اجبار المستخدم على الموافقة على تشغيل الماكرو اذا اراد ان يطلع على الملف). الثاني : هل هنالك كود يقوم باخفاء وعدم اظهار المعادلات الموجودة بالخلايا مثل خلية تحتوي على المعادلة التالية (F1+F5). مع اطيب تمنياتي لكم بطول العمر انشاء وعيدكم مبارك

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

اخي العزيز واجهتنى مشكلة وهي ان المعادلة تقراء الرقم المدخل كتالي : 33.20 على انه ثلاثة وثلاثون ساعة ودقيقتين بينما المقصود هو ثلاثة وثلاثون ساعة وعشرون دقيقة تكفى شف لى حل في هالمشكلة والله يعطيك العافية

يعطيك الف عافيه والله خدمتنى خدموك ابناءك استعملت الفورملا الى انت كتبت وعدلت عليها حتى اصبحت كتالي =ROUND(IF(I9<=60,(LEFT(I9,2)*1050.05)+(RIGHT(I9,2)*17.5008333),(60*1050.05)+((LEFT(I9,2)-60)*1250)+(RIGHT(I9,2)*20.833333)),0) الفضل للك ثم لك وتسلم والله

لم استطع ان ارفق الملف وسوف احاول ان يكون شرحي الان اكثر تفصيل : انا عندي سعرين مختلفين الاول 1050.05 والثاني 1250 السعر الاول محدود بسقف وقت محدد وهو 60 ساعة * بمعنى ان العميل سوف يحصل على السعر الاول 1050.05 اذا كان الوقت الذي استهلكه مساوي للـ 60 أول اقل* /السعر سوف يتم حسابه على الساعة والدقية 1050.05 للساعة 17.50033 للدقية/ السعر الثاني سوف يكون للوقت الذي يزيد عن 60 ساعة حتى ولو دقيقة واحدة بحيث انه سوف محاسبة العميل على كلاي السعرين اذا تخطى 60 ساعة "نفس طريقة شرائح الاسعار أو شرائح الظرائب" تنسيق الارقام المدخلة سوف يكون Number المدخلات : العميل رقم 1 : 24.15 "اربعة وعشرون وخمسة عشرهللة" تم اادخالها على شكل رقم للتسهيل مع ان المقصود اربعة عشرون ساعة وخمسة عشر دقيقة" المعادلات العميل رقم 2 : 65.45 "خمسة وستون ريال وخمسة واربعون هللة" تم اادخالها على شكل رقم للتسهيل مع ان المقصود خمسة وستون ساعة وخمسة واربعون دقيقة" العميل 1: 24 * 1050.05 + 15*17.5008333 = 25463.71 "على ان تكون بمعادلة وفي نفس الخلية العميل 2: 60*1050.05=63003+ {5*1250=6250}+{45*20.83333=937.49}=70190.49 النتائج : اجمالي المبلغ المستحق العميل 1: 25463.71 اجمالي المبلغ المستحق العميل 2: 70190.49 تعبتني مرره المعادلة المستخدمة حالية =IF((E2)<=60,ROUND((LEFT((E2),2)*1050.05)+((RIGHT((E2),2)*17.500833333)),2),IF((E2)>60,ROUND((LEFT((E2),2)*1250.05)+((RIGHT((E2),2)*20.833333333)),2),0)) ويعطيك العافية على كل حال

هذه الرسالة تطلع لى فشلت عملية إرفاق الملف , غير مصرح لك بإرفاق هذا النوع من الملفات هذه الارقام عبارة عن ساعات ودقائق اريد معادلة لكي تقوم بحساب الساعات والدقائق التي تقل عن 60 بسعر 100 ريال للساعة و1.66 للدقيقة اما الساعات التي تزيد عن 60 فيكون السعر مختلف 0مازاد عن 60 ساعة يكون السعر 120 للساعة 2 ريال للدقيقة ملاحظة : ما اريده هو ان يتم حساب الساعات والدقائق التي تقل عن 60 بسعر 100 للساعة بالاظافة الى الساعات والدقائق الاضافية بسعر 120 للساعة 2 للدقيقة بمعنى اخر هنالك مستويان من الاسعار هنا حسب جميع الساعات والدقائق بسعر 1250 وهذا ما لا اريد 0مااريد ان يحسب 60 الساعة الاولى بسعر 1050.05 ريال ومازاد يكون بسعر 1250 المعادلة هي =IF((E3)<=60,ROUND((LEFT((E3),2)*1050.05)+((RIGHT((E3),2)*17.500833333)),2),IF((E3)>60,ROUND((LEFT((E3),2)*1250.05)+((RIGHT((E3),2)*20.833333333)),2),0)) ولا ادري كيف اجعل الاكسل يقوم بحساب 60 وفق سعر ثم الانتقال الى سعر اخر لحساب ما زاد على 60 في نفس الخلية وشكرا

اعزائي اعضاء وضيوف منتدى افيسنا الله يعطيكم العافية واتمنى ان تكون بخير والشهر عليكم مبارك مقدماً انشاء وجعلكم من صوامة وقوامة الحقيقة ان لدي اوقات اريد ان احسب تكلفتها تتكون من دقائق وساعات وعندي مستويان الاول بسعر مختلف عن الثاني واريد ان يتم حسابها في نفس الخلية المستوى الاول : 60.00 واقل بسعر 1050.05 ريال والمستوى الثاني 60.01 واعلى بسعر 1250 ريال ويتم حساب الدقيقة بسعرها الملف المرفق قد يوضح ما اريد بشكل افضل ولكم جزيل الشكر لم استطع ارفاق الملف ولا اعلم ماهي المشكلة

الاخوة الاعزاء مساء الخير هل يمكن جعل المستخدم يقوم بعمل sutep عند تركيب برنلمج على الاكسل زي اي برنامج اخر؟ الله يعطيكم العافية على كل حال اخوكم

روح ياشيخ الله يعطيك الف عافية ويجعل والديك في الجنة

تسلم على سرعة الرد ولكن تم عمل السابق الاشارة اليه ولكن المشكلة مازالت مستمرة اسم الاداة Drob Down من قائمة Form قمت بازالة الاشارة حسب الطريقة المشار اليها ولكن لازالت المشكلة مستمرة وتسلم

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

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

السادة محترفى الاكسيل : تحية طيب لكم لدى مشكلة فى برنامج على الاكسيل وهي تكمن فى: 1- لدى 3250 صف مكونة من 6 اعمدة 2- يوجد بالصفوف الاولى صف 1و2و3 كليشات عبارة عن خلايا مدموجة (لا اريد ان يتم فرزها ولكن يتم طباعتها مع كل ورقه) 3- فى نهاية الصف رقم 3250 اجمالى المبالغ المدخلة فى الصف اريد : 1- زر يتم انشاءه لكي يقوم بفرز الصفوف الموجودة فى الورقة فرز ابجدياً من أ الى ي بعد اكمال ادخال البيانات اعتماداً على الاسماء المدخلة فى العمود B (لا اريد ان يتم فرز الصف رقم 1و2و3 وذلك لوجود بيانات مثل اسم الشركة والسجل التجاري فى خلايا مدموجة) 2- زر يتم انشاءه لكي يقوم باخفاء الصفوف التي لايوجد بها بيانات اعتمادا على البيانات المدخلة فى العمود B وc (بحيث يتم طباعة الصفوف التي بها بيانات ويقوم باخفاء الصفوف الى ليس بها بيانات , وذلك لوجود الصف الذي يوجد فيه الاجمالي في الصف رقم 3250 ) محاولات : استخدمت كود قام احد الاخوة الكرام بكتابته فى المنتدى ولكن حدث مشكلة وهي: عند تشغيل الكود عن طريق زر طباعه الذي تم انشاءه يقوم برنامج الاكسل باستخدام CPU بنسبة 100% وكذلك الذاكرة ويحدث عدم استجابة فى برنامج الاكسل ويتوقف البرنامج عن العمل الكود هو : Sub MyPrint() Application.ScreenUpdating = False With Sheets("Sheet1") With .UsedRange For i = 1 To .Rows.Count If .Cells(i, 1).Value = "" Then .Cells(i, 1).EntireRow.Hidden = True End If Next i End With .PrintOut .Rows.Hidden = False End With Application.ScreenUpdating = True End Sub

الله يعطيك العافيه والله وابجرب الكورد واعطيك خبر انشاء الله شكرا على الرد