طارق محمود

السلام عليكم إستبدل الماكرو بالتالي Sub FailForman() ' ' FailForman Macro ' ' Keyboard Shortcut: Ctrl+Shift+I 'Select columns titeled المعدل t = ActiveSheet.Cells.SpecialCells(xlLastCell).Column For x = 1 To t If myR = "" Then fasel = "" Else fasel = "," If Cells(1, x) = "المعدل" Then myR = myR & fasel & Cells(2, x).Address & ":" & Cells(20, x).Address End If Next x Range(myR).Select Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlLess, _ Formula1:="=50" Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority With Selection.FormatConditions(1).Font .Bold = True .Italic = False .Underline = xlUnderlineStyleSingle .Color = -16776961 .TintAndShade = 0 End With Selection.FormatConditions(1).StopIfTrue = False End Sub مع استبدال الرقم 20 في السطر myR = myR & fasel & Cells(2, x).Address & ":" & Cells(20, x).Address بأي عدد من الأسطر مثلا 300

السلام عليكم أخي الكريم رجاءا راجع الموضوع التالي ، إن شاء الله ستجد به ماتريد http://www.officena.net/ib/index.php?showtopic=32040

خلاص كلمة السر 1234

كلمة السر؟؟

معذرة أخي مرفق الملف المضبوط 11-3.rar

السلام عليكم أختنا الفاضلة الدالة الأفضل هنا هي RANK بفرض أن الرقم الأول في الخلية A1 و الرقم الثاني في الخلية B1 و..... و الرقم الأخير في الخلية F1 في الصف الثاني مثلا اكتبي المعادلة التالية =RANK(A1,$A$1:$F$1) في الخلية A2 واسحبي منها نسخ للخلايا المجاورة

ثانيا بالنسبة للملف الآخر لتلافي ظهور الأخطاء ضع شرط في التنسيق الشرطي كالتالي =ISERROR(A6) وإجعل اللون بلالون ولون الفونط أبيض في حالة تحقق الشرط (أي يوجد خطأ) مرفق الملف وبه التعديل Classeur2.rar

السلام عليكم أولا بالنسبة للملف الذي ارسلته انا لقد تركت لك أن تحاول تغييره بنفسك حتي تستطيع عمله بنفسك مستقبلا عموما التغيير كان بسيطا كالتالي مثلا إذا زادت الأسماء في الورقة الأولي حتي الصف 304 غير المعادلة في الخلية C8 من ="'اسماء الطلبة'!$A$"&B8&":$A$20" إلي ="'اسماء الطلبة'!$A$"&B8&":$A$304" وإنسخها للأسفل وكذلك غير المعادلة في الخلية E8 من =VLOOKUP($D8,'اسماء الطلبة'!$C$8:$K$19,E$6,0) إلي =VLOOKUP($D8,'اسماء الطلبة'!$C$8:$K$304,E$6,0) وإنسخها لليسار وللأسفل وكرر ذلك في ورقة الناجحين مرفق الملف وبه التعديلات cherch3.rar

السلام عليكم أختنا الفاضلة في الخلية F3 اكتبي المعادلة التالية =DATE(D3,C3,B3) وانسخيها لباقي العمود F كما تريدي

السلام عليكم أخي أبو عاصم تفضل المرفق وراجع الخلايا المكتوبة بالأزرق sumifs_Tareq.rar

لإرفاق ملف: 1. إستخدم نافذة المحرر الكامل وليس نافذة التعليقات فقط 2. إضغط علي زر Click to Attach Files الموجود أسفل نافذة المحرر الكامل 3. إرفق الملف بشرط ان يكون مضغوطا بالـ winrar أو الـ winzip وليس بصيغة XLS

أخي طوخي (ابو احمد) مرحبا بك مرة اخري أرفق مثالك إن لم تجد ماتريد وستجد الكثير يحب المساعدة تحيلتي

السلام عليكم أخي الحبيب في المرفق ستجد في الورقة المسماة "11" زر بإسم (إختر القسم للطباعة) تحياتي 11-3.rar

السلام عليكم أهلا ومرحبا بك اخي الكريم بين إخوانك أي العزيز هذا الموضوع مكرر ويوجد الكثير في المنتدي مثله أو قريب جدا مادمت تستطيع العمل ولو قليلا علي الأكواد وحيث أنك لم تعطي مثالا فقدابحثت لك واليك بعض مايفيد أنظر هذا http://www.officena.net/ib/index.php?showtopic=31960&st=0&p=163321&hl=%DE%ED%E6%CF&fromsearch=1&#entry163321 أو هذا http://www.officena.net/ib/index.php?showtopic=32105&st=0&p=164213&hl=%DE%ED%E6%CF&fromsearch=1&#entry164213 أو هذا http://www.officena.net/ib/index.php?showtopic=31525&st=0&p=160224&hl=%DE%ED%E6%CF&fromsearch=1&#entry160224 أو ...كثير إن لم تجد فيها ماتريد فإبحث أخي عن مايناسبك أو إرسل مثالا تقبل ودي وتحياتي

راجع المعادلات ووسع نطاق البحث المحاط بعلامات الدولار

السلام عليكم فعلا أخي عندك حق الملف لايعمل علي إكسل 2003 لم أنتبه لأنني أعمل علي 2010 وهذا يتلافي مثل هذه الشروط عموما عدل السطر الذي ذكرته من Sheets(Z).[A1].PasteSpecial Paste:=xlPasteValues, Operation:=xlNone إلي Sheets(Z).[A1].PasteSpecial xlFormulas وسيمشي الحال إن شاء الله

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

السلام عليكم أخي الكريم لابأس ، كلنا يحدث لنا مثل ذلك أنا فهمت ذلك أيضا كما أنه يريد منك عمل دورتين لحساب الزمن الكلي واختيار أنسب عملية نقل وأحب أطمئنك انني مهندس وأتعامل مع مثل هذه المشاكل الموضوع يبدو كما لو كان انك تنقل البضاعة للطابق الثاني ولابد ان تنقلها طابق بطابق بفرض أنه لايوجد مشكلة في عدد العمال مثلا للنقل ولكن المطلوب إنهاء العملية بسرعة لتقليل الزمن الكلي للردود والنقل معا علي أساس أن زمن الردود = 2 وأن زمن النقل للقطعة الواحدة = 1 أي انه عندك 5 حالات وليس 4 حالات كما قلت الحالة الأولي حمل 16 قطعة مرة واحدة أي عدد الردود مرة واحدة (=16÷16) ويكون الزمن الكلي = زمن الدورة الأولي = 16×1 ردود مرة واحدة = 2 زمن الدورة الثانية = 16×1 إجمالي (أنظر الشكل a ص188) = 34 وحدة زمن الحالة الثانية حمل 8 قطع في المرة أي عدد الردود 2 مرتين (=16÷8) ويكون الزمن الكلي = زمن الدورة الأولي = 8×1 + 8×1 = 16 ردود مرتين لكن نحسب مرة واحدة لأن الأولي داخلة في زمن النقل = 2 زمن آخر جزء الدورة الثانية لأن السابق ضمن زمن الأولي = 8×1 = 8 إجمالي (أنظر الشكل b ص188) = 26 وحدة زمن الحالة الثالثة حمل 4 قطع في المرة أي عدد الردود 4 مرات (=16÷4) ويكون الزمن الكلي = زمن الدورة الأولي = 4×1 + 4×1 + 4×1 + 4×1 = 16 زمن آخر ردود لأن الردودات السابقة ضمن زمن الدورة الأولي = 2 زمن آخر جزء الدورة الثانية لأن السابق ضمن زمن الأولي = 4×1 = 4 إجمالي (أنظر الشكل C ص188) = 22 وحدة زمن الحالة الرابعة حمل قطعتين في المرة أي عدد الردود 8 مرات (=16÷2) وبنفس المنطق يكون الزمن الكلي = زمن الدورة الأولي = 2×1 + .... 8 مرات = 16 زمن آخر ردود لأن الردودات السابقة ضمن زمن الدورة الأولي = 2 زمن آخر جزء الدورة الثانية لأن السابق ضمن زمن الأولي = 2×1 = 2 إجمالي (أنظر الشكل D ص188) = 22 وحدة زمن الحالة الخامسة حمل قطعة واحدة في المرة أي عدد الردود 16 مرات (=16÷1) في هذه الحالة زمن الردود أكبر من زمن نقل الحمل وهذا هو المطلوب ان تدركه من المسألة أن الزمن الكلي لن تستطيع تقليله بزيادة الأحمال علي الإطلاق ولن ينفع هنا نفس المنطق السابق لحساب الزمن الكلي فهنا يكون الحساب = أول حمل في الدورة الأولي + 16 مرة ردود + آخر حمل في الدورة الثانية أي أن الزمن الكلي = 1 + 16×2 + 1 = 34 إجمالي (أنظر الشكل E ص188) = 34 وحدة زمن أنظر مرة أخري ص188

السلام عليكم مرفق المطلوب وبه شرح للدوال المستخدمة في شيت الراسبين cherch2.rar

السلام عليكم أخي الكريم ضع المعادلة =IF(AND(A1>0,B1>0),B1-A1+1,"") في الخلية C1 بدلا من المعادلة =B1-A1+1 ثم انسخها للباقي

السلام عليكم أخي الكريم أرجو أن يكون المرفق هو ماتطلب 11-2.rar

السلام عليكم أخي الفاضل كما أخبرتك يبدو أن الموضوع قد يأخذ بعض الوقت أحتاج منك شرح أكثر للطريقه اليدوية لحساب الفروقات في المثال الذي فرضته أنت : ترقية من تاريخ 26/1/1430هـ من رتبة عقيد إلى عميد كعقيد: 1- في عام 1430 كان يستلم راتب أساسي وقدره 16770 2- في عام 1431 كان يستلم راتب أساسي وقدره 17280 عند ترقيته يتعدل الراتب إلى الأتي كعميد 1- يعطى في عام 1430 راتب أساسي وقدره 16815 2- يعطى في عام 1431 راتب أساسي وقدره 17380، لابد من قاعدة بيانات بالراوتب الأساسية لجميع الرتب علي مدي عامي 1430،1431 وهل فقط يكفي عامان أو قد تحتاج 3 أعوام في بعض الحالات وقاعدة البيانات هذه ، وضعت لها تصورا في هذا الجدول المرفق وعليك إكمالها وتعديلها بالحذف والإضافة لتناسب طلبك إستفسارات آخري بعد الترقية في يوم 26 من شهر 1 مثلا كما فرضت فهل يكون مفردات الراتب 26 يوم علي القديم ثم 3 أيام أو 4 علي الجديد؟ وهل هذا يسري علي جميع مفردات الراتب والبدلات؟ وكيف يتم حساب بدل غلاء المعيشة (الذي تغيرت نسبته من 10% إلي 15% عام في عام 1430 ،1431) وكيف يتم حساب فرق التقاعد 9% الأفضل أن تكمل مثالا يدويا كاملا مشروع محاسبي عن الرواتب01.rar

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

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

كل عام وانت بألف خير للأسف ، لم أر الموضوع إلا الآن أخي الكريم لقد صبرت كثيرا ، فلابأس ببعض الصبر ثانية الموضوع إن شاء الله بسيط ، ولكنه يحتاج بعض الوقت وأنا قد لاـمكن من المشاركة حتي السبت القادم إن لم يتدخل أحد الإخوة حتي السبت القادم فسوف أحله لك إن شاء الله