طارق محمود

السلام عليكم يوجد بالإكسل دالة المضروب FACT وتعني ضرب الرقم في الأصغر منه في الأصغر منه حتي تصل 1 فمثلا =FACT(4) تنتج 24 4×3×2×1 و =FACT(9) تنتج 362880 وهكذا وباستخدام قوانين الرياضة تحصل علي ماتريد مثلا لتوافيق 9 مع 4 = 9ق4 = مضروب 9 ÷ (مضروب 4× مضروب 5) = 362880 ÷(24*120) = 126

السلام عليكم أرجو ان يكون المرفق هو ماتطلب امكانية ربط و اظهار المربوط فقط.rar

السلام عليكم بالنيابة عن أخي العزيز / أبو أحمد هذا الشرط =IF(A5="","",معادلة)يتفادي أن ينتج خطأ في المعادلة إذا كانت الخلية A5 لاتحتوي علي شيء لأن المعادلة تقول انه بناءا علي قيمة A5 يجلب الإكسل قيمة العمود رقم 2 من المدي rang1 فإذا لم تجد المعادلة قيمة في الخلية A5 فسيعود بنتيجة خطأ

السلام عليكم يمكن عمل ذلك بالفلتر مباشرة ولكن المرفق كما تريد تفضل MED3.rar

السلام عليكم أخي العزيز تم الرد في الرابط http://www.officena.net/ib/index.php?showtopic=35907

السلام عليكم مرحبا بك أخي العزيز بين إخوانك أرجو مراجعة الرابط التالي http://www.officena.net/ib/index.php?showtopic=31953&st=0&p=163077&hl=+TIME%20+SHEET&fromsearch=1&#entry163077 أو http://www.officena.net/ib/index.php?showtopic=34866&st=0&p=183209&hl=+TIME%20+SHEET&fromsearch=1&#entry183209 ومن ثم أعد صياغة سؤالك لتساعد من اراد المساعدة والأفضل إرفاق ملف من عندك به مثال لما تريد عمله مرحبا بك أخي الكريم

السلام عليكم قسمة بعض الأرقام علي بعضها لاتنتج دائما أرقام صحيحة وفي المثال القسمة علي 3 أو 6 غالبا ماتنتج غير الأرقام الصحيحة ثلث ، ثلثين ، سدس .. هكذا فإن قسمت 10 علي 3 مثلا ينتج 3.33333333333333333333333333333 إلي آخر ماتستطيع من تقريب وليس الناتج 3.33 فقط ممكن يكون شكل الناتج هكذا 3.33 ولكن قيمته أكبر بهذه الكسور الدقيقة بين لثلث وبين 0.33 لذا إذا استبدلت الرقم 3.33 الموجود في الخلايا C4 من إلي C7 بالمعادلة =$B$4/$B$5 أو =10/3 سيكون الناتج مضبوط ان شاء الله

السلام عليكم أخي العزيز للتسهيل علي من يريد المساعدة أقترح عليك مليء بينات ولو وهمية في الورقتين مثلا قبل الضغط علي زر كذا يكون الشكل (1) وبعده يكون الشكل (2) وهكذا لأنني عن نفسي حاولت ولم أفهم

السلام عليكم أخي العزيز يفترض أن هذه البيانات سرد لأحداث حصلت بالفعل أي أن تاريخها اقل من تاريخ اليوم ولهذا تعطي خطأ إذا كانت غير ذلك فكيف تفهم أن أخبرك مثلا أن فلان في أجازة تبدأ من 2011/07/15 وعموما إذا كان ضروري يمكن تعديل المعادلة لتلافي هذا ولكني لاأحبذ هذا حيث ستكبر المعادلة بلاداعي التعديل سيكون كالتالي في الخلية J9 بدلا من =IF(G9<>"",DATEDIF(G9,TODAY(),"d")&" يوم","") سيكون =IF(E9>=TODAY(),"",IF(G9<>"",DATEDIF(G9,TODAY(),"d")&" يوم",""))

عندما تضغط زر الخروج في الفورم تفعل الكود التالي Private Sub Bu1_Click() ActiveWorkbook.Close Application.Quit End Sub والذي يغلق الملف وبرنامج الإكسل بلا رسائل

السلام عليكم أخي ابو أحمد يشرفني مروركم ومشاركتك وإن كان الكود يعمل عندي بلامشاكل تقبل ودي واحترامي

السلام عليكم أخي مراد ارجو أن يكون المرفق كما تريد تفضل حساب الإجازات والعطل2.rar

السلام عليكم أخي الكريم كما قلت لذلك ، أنا عن نفسي أبحث عن مواضيع يكون الرد عليها بضع دقائق فقط لأنني مشغول جدا هذه الأيام سأجيب فقط عن نقطة صغيرة للغاية ولكن كما يقولون أول الغيث قطرة حيث أنك تقول لايحدث تغيير لأن أداة الحسابات مضبوطة علي وضع يدوي وهذه في الأكسل 2003 يتم ضبطها من أدوات Tools Options Calculation Calculation Automatic وليس Manual

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

السلام عليكم أخي العزيز مرفق ملف قريب جدا مما تطلب كنت ارفقته سابقا لأحد الأخوة في طلب مماثل لما تريد أرجو ان يفي بالغرض أو تبدأ منه بتحديد طلباتك إذا لم يكن كما تريد تفضل المرفق Time_Sheet.rar

السلام عليكم أختنا العزيزة معادلات الصفيف تعمل كالتالي 1. تظليل المجال الذي فيه المعادلات وليس الخلية الأولي فقط 2. إظهار المعادلة في الخلية الأولي عن طريق F2 3. ضغط Ctrl-Alt-Enter معا لتعمل المعادلة في المجال بالكامل يعني قفي علي الخلية B33 ثم ظللي حتي الخلية B37 اضغطي F2 اضغطي Ctrl-Shift-Enter معا ان شاء الله تجدي المعادلة شغالة

السلام عليكم إستبدل الكود بالتالي Private Sub Bu1_Click() [b1000].End(xlUp).Offset(1, 0) = tx1.Value End Sub

السلام عليكم أضف السطر التالي ActiveSheet.Protect Contents:=False في أول كود الفورم ليصبح Private Sub Bu1_Click() ActiveSheet.Protect Contents:=False Sheet1.Range("B5") = tx1.Value Sheet1.Range("a1").Show Unload Me End Sub

السلام عليكم لم أستطع تحميل الملف من الرابط أنظر الصورة التي تظهر لي وأخبرني أين يفترض ان أضغط للتحميل الأفضل أن تضغط الملف باستخدام Winrar أو Winzip ثم ترفعه هنا عالمنتدي

السلام عليكم لم أستطع تحميل الملف من الرابط أنظر الصورة التي تظهر لي وأخبرني أين يفترض ان أضغط للتحميل الأفضل أن تضغط الملف باستخدام Winrar أو Winzip ثم ترفعه هنا عالمنتدي

السلام عليكم أخي الكريم هل جربت تفعيل خيار المشاركة في أوفيس / إكسل 2003 من قائمة Tools ثم إختر Share Workbook ثم Editing ثم علم علي المربع المقابل للخيار: Allow changes by .........same time

أين الكود ياأخي

السلام عليكم أخي العزيز أهلا ومرحبا بك بين إخوانك لايوجد مرفقات أعد إرفاق الملف للعلم ، لتتمكن من تحميل الملف لابد من ضغطه بالـWinrar أو بالـ Winzip ثم تحمل الملف المضغوط

السلام عليكم السلام عليكم أهلا ومرحبا بك بين إخوانك يجوز ان الدالة SUMIF قد لاتفي بالغرض هنا وموضوع الألوان قد يكون فقط في إكسل 2007 ، 2010 لذلك فأي دالة حسابية ستسخدمها لابد ان تجع إلي أصل الشرط الذي جعل هذا أحمر أو أخضر جرب هذه الدالة =SUMPRODUCT(--(E5:E20<F5:F20),G5:G20) وشاهدها في المرفق بعد التعديل2.rar

السلام عليكم في هذه الحالة تعملها علي خطوتين بفرض أن المعادلة السابقة =CELL("filename") موجودة في الخلية K1 إذهب لخلية أخري واكتب المعادلة التالية =MID(K1,SEARCH("[",K1)+1,SEARCH("]",K1)-SEARCH("[",K1)-1)