طارق محمود

الأفضل أن تجعل العمود المساعد أبعد من B لتفسح المجال للنص ليتحول لأعمدة وليكن العمود G يمكن أيضا استخدام الدالة Trim بين الخطوتين 3 ، 2 انظر الفيديو المرفق Text2Column.rar

السلام عليكم أخي العزيز أولا جرب أن يكون هناك في برنامج الدوس إمكانية تصدير للإكسل أو أي شيء مرتب فهذا أقصر طريق إن لم تجد فإليك طريق طويل نسبيا 1- إستخدم عمود مساعد (غير الذي به البيانات) وليكن العمود B 2- ضع فيه أرقاما مسلسلة 1-2-3 - .... هكذا 3- ثم رتب البيانات كلها بناءا علي نوعها العمود A 4- ثم استخدم تجربة النص الى الأعمدة لكل مجموعة علي حدي ولن تفشل إن شاء الله 5- أخيرا أعد ترتيب البيانات باستخدام العمود

السلام عليكم أخي العزيز تفضل المرفق مناداه2.rar

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

السلام عليكم الأخ الفاضل تفضل ماطلبت 444_3.rar

السلام عليكم تم إصلاح الكود كالتالي: 1- بإضافة مجال في الورقة سميته Implam_ تأخذ منه الخلية H6 بياناتها (اللون الأصفر) 2- يتم التعرف علي مكان اللصق (للمنسوخ) من العمود المقابل لذلك النطاق (اللون الأزرق الباهت) 3- تم إضافة الجزء التالي للكود لإزاحة الجدول سطرا واحدا إذا كان مملؤا 'Check if Table is Full >> Insert one Row With Sheets("Implants").[Table5] If WorksheetFunction.Sum(.Rows(.Rows.Count)) <> 0 Then .Rows(.Rows.Count).ListObject.ListRows.Add AlwaysInsert:=True End If End With 4- تم اختصار الكود بقدر الامكان تفضل المرفق ملف ماكرو أصلي - للمتدى2.rar

السلام عليكم أخي العزيز مالغرض من الرقم 1 الذي تضعه في الخلية G6 ثم تريد نقله بالكود للجدول

السلام عليكم أخي الكريم مبدئيا الملف يحتاج تضبيط كثير 1- لاداعي لشيتات زائدة مثل الاستحقاقات أو نموذج معاشات 2- دالة VLOOKUP في هذه الحالة الأفضل أن يكون آخر معامل بها False أو 0 وليس True لأنه إذا الرقم المسلسل الذي تبحث عنه الموجود بالخلية الصفراء P3 إذا وضعت عن طريق الخطأ رقم ليس له وجود في جدولك وجعلت آخر معامل بالدالة True فلن يعطي خطأ وسيأتيك ببيانات أقرب رقم له في الجدول 3- تقول "حوالى 3000 موظف مقسمين لمناطق مختلفة" ضع في ملفك منطقتين أو أكثر علي شكل شيتات مثلا فهذا سيسهل كثيرا علي من يريد المساعدة

السلام عليكم أخي العزيز الخطأ بسيط للغاية الفارق بالعملة في العمود S هو اللي مفروض تقسمه علي المبيعات أي غير المعادلة في الخلية من =IFERROR(R7/Q7,0) إلي =IFERROR(S7/Q7,0) ثم اسحبها للأسفل

أخي الحبيب / حمادة عمر سامحني ، بل سامحوني جميعا علي الغياب بسبب ضغط العمل أنا حتي عندما أدخل للمنتدي ، أبحث عن المواضيع التي ليس بها ردود ويكون الحل سريع

السلام عليكم تفضل المرفق 444_2.rar

الأفضل كتابتها بخلية منفصلة آسف لاوقت الآن لشرح السبب إن كان ولابد أن تكتبها داخل المعادلة فلتسبقها بالدالة Time وهنا لابد أن تكتب الدقائق والثواني (ولو صفر) مثال بدلا من (IF(F2=0;0;F2-8:3= تكون المعادلة (IF(F2=0;0;F2-Time(8,30,0=

السلام عليكم أخي العزيز يتعامل الاكسل مع الأرقام بطريقتين مختلفتين 1- إذا كان رقما عاديا فيكون الفاصلة العشرية كما تعلم 0.1 ، 0.01 ، 0.001 وهكذا 2- إذا كان وقتا أو تاريخا فتكون أجزاء الساعة 00 00' 00" دقائق ، ثواني الخطأ عندك أنك تكتب رقما عاديا وتطرح منه 0.30 فيتبقي 0.70 جرب تكتب بدلا من الفاصلة العلامة : مثلا ضع في خلية 10:00 ثم في خلية أخري 8:30 وجرب تطرحهم في خلية ثالثة وشوف الناتج

السلام عليكم تفضل 12_2.rar

للأسف مشغوووول جدا ليومين أو ثلاثة كمان

السلام عليكم لاأظن المشكلة في ملفات المنتدي جرب فتح ملف winrar آخر (ليس من المنتدي) إذا ظهرت المشكلة (وغالبا ستظهر) فجرب التالي كليك يمين علي أي ملف winrar إختر Open with غالبا ستجد أن الخيار الحالي مضبوط علي الإكسل (بالخطأ) إذا كان ذلك فأعد ضبطه علي الـ Winrar وتنتهي المشكلة إن شاء الله

السلام عليكم يمكن ذلك بمد خط آخر غير نفس خط المنحني بل خط يقترب كثيرا من المنحني trendline تفضل المرفق به الشرح TrendLine.rar

تفضل المرفق به كل الخيارات Test400-8.rar

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

أخي الكريم أنت قلت أن الملف "مرتبط مع بيانات يتحدث تلقائي" فعلا هذه هي المشكلة لابد أن يتم تعريف وتوفيق البرنامج الأصلي "Tickerch.exe" مع الأوفيس 2010

بصراحة الأخ شرح طلبه اكثر من مرة ولأن الطلب غير تقليدي ، فلم أنساه بداية =IF(C_1,IF(C_2,IF(C_3,IF(C_4,IF(C_5,IF(C_6,E_3,E_2),E_2),A),E_5),E_5),X) يمكن فهمها كالتالي =IF(شرط_1,IF(شرط_2,IF(شرط_3,IF(شرط_4,IF(شرط_5,IF(شرط_6,E_3,E_2),E_2),A),E_5),E_5),X) الموضوع أن الأرقام بالعمودين A,B تؤثر بطريقة شائكة في النتيجة التي بالعمود G وذلك بعد الصف الثاني حيث يفترض أن الصفان الأولييان مجرد بداية وبالتفصيل يمكنك مراجعة مواضيعه فقد شرح الطلب أكثر من مرة (هو أو غيره لاأذكر)

أخي الكريم إرفق الملف

السلام عليكم أخي العزيز بغض النظر عن الموضوع ومدي الاستفادة منه ولكني نصحتك باستخدام النطاقات المسماة لتقليل حجم المعادلة وبصراحة لم اكن أتخيل ان المعادلة قد تصل إلي 3,110 حرف في طولها كما بالمرفق الذي رفعته أنت علي أية حال وبدون الدخول بالتفاصيل ، قمت بتسمية المجالات التالية A ="Two Answear" B ="Next" C_1 =AND(ورقة2!$A14=ورقة2!$G14,ورقة2!$A15=ورقة2!$G15) C_2 =AND(ورقة2!$B15>0,ورقة2!$B16>0) C_3 =AND((ورقة2!$A16=ورقة2!$B16),(ورقة2!$A17=ورقة2!$B17)) C_4 =ورقة2!$A19=ورقة2!$B19 C_5 =AND(ورقة2!$C18>0,ورقة2!$C19>0) C_6 =AND((ورقة2!$A19=ورقة2!$C19),(ورقة2!$A20=ورقة2!$C20)) C_7 =AND(ورقة2!$E20>0,ورقة2!$E21>0) C_8 =AND((ورقة2!$A21=ورقة2!$D21),(ورقة2!$A22=ورقة2!$D22)) C_9 =AND((ورقة2!$A22=ورقة2!$E22),(ورقة2!$A23=ورقة2!$E23)) D_1 =ورقة2!$A25=ورقة2!$E25 D_2 =AND(ورقة2!$D24>0,ورقة2!$D25>0) D_3 =ورقة2!$A27=ورقة2!$C27 D_4 =AND((ورقة2!$A26=ورقة2!$C26),(ورقة2!$A27=ورقة2!$C27)) D_5 =AND(ورقة2!$C27>0,ورقة2!$C28>0) D_7 =IF(D_1,ورقة2!$A30,A) D_8 =IF(C_9,D_7,B) D_9 =IF(C_7,D_8,ورقة2!$A32) E_1 =IF(C_8,N_1,D_9) E_2 =IF(D_2,E_1,D_9) E_3 =IF(D_3,E_2,A) E_4 =IF(D_4,E_3,E_2) E_5 =IF(D_5,E_4,E_2) N_1 =IF(C_4,D_9,A) X ="New Start For B" مما جعل المعادلة في الخلية G4 تقل من الشكل الأول =IF(AND(A2=G2,A3=G3),IF(AND(B2>0,B3>0),IF(AND((A2=B2),(A3=B3)),IF(A4=B4,IF(AND(C2>0,C3>0),IF(AND((A2=C2),(A3=C3)),IF(A4=C4,IF(AND(D2>0,D3>0),IF(AND((A2=D2),(A3=D3)),IF(A4=D4,IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4),"Two Answear"),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),"Two Answear"),IF(AND(D2>0,D3>0),IF(AND((A2=D2),(A3=D3)),IF(A4=D4,IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4),"Two Answear"),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4))),IF(AND(D2>0,D3>0),IF(AND((A2=D2),(A3=D3)),IF(A4=D4,IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4),"Two Answear"),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4))),"Two Answear"),IF(AND(C2>0,C3>0),IF(AND((A2=C2),(A3=C3)),IF(A4=C4,IF(AND(D2>0,D3>0),IF(AND((A2=D2),(A3=D3)),IF(A4=D4,IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4),"Two Answear"),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),"Two Answear"),IF(AND(D2>0,D3>0),IF(AND((A2=D2),(A3=D3)),IF(A4=D4,IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4),"Two Answear"),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4))),IF(AND(D2>0,D3>0),IF(AND((A2=D2),(A3=D3)),IF(A4=D4,IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4),"Two Answear"),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)))),IF(AND(C2>0,C3>0),IF(AND((A2=C2),(A3=C3)),IF(A4=C4,IF(AND(D2>0,D3>0),IF(AND((A2=D2),(A3=D3)),IF(A4=D4,IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4),"Two Answear"),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),"Two Answear"),IF(AND(D2>0,D3>0),IF(AND((A2=D2),(A3=D3)),IF(A4=D4,IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4),"Two Answear"),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4))),IF(AND(D2>0,D3>0),IF(AND((A2=D2),(A3=D3)),IF(A4=D4,IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4),"Two Answear"),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)),IF(AND(E2>0,E3>0),IF(AND((A2=E2),(A3=E3)),IF(A4=E4,A4,"Two Answear"),"Next"),A4)))),"New Start For B") إلي الشكل التالي =IF(C_1,IF(C_2,IF(C_3,IF(C_4,IF(C_5,IF(C_6,E_3,E_2),E_2),A),E_5),E_5),X) وقد تم تطبيقها بالورقة الثانية مما سيحفزك لفهم هذه الطريقة والتي تجعل حتي المراجعة علي المعادلة أسهل تفضل المرفق وبه المعادلة الجديدة بالورقة الثانية New Microsoft Office Excel Worksheet_NEW.rar

السلام عليكم بالنسبة لتتابع البيانات فهي وسيلة تأمين لإدخال البيانات ، مثلا كثيرا ما يسأل سائل " أريد ألا يستجيب الاكسل للإدخال في سطر ما إذا لم تكن جميع البيانات مستوفاة بالسطر السابق" كما أنه مفيد في تعقب المشاكل وإصلاخ الأخطاء بصورة أسرع (في المستقبل ، بعد تشغيل الملف ، غالبا مانواجه مشاكل لم تكن محسوبة من قبل) وهو أيضا مفيد في حالة عمل تحديد للبيانات - Data Validation - لضمان عدم احتوائها علي خلايا فارغة بالنسبة لإلغاء ظهور الصفر في ورقة معينة أنظر الصورة المرفقة بالنسبة لإستبدال الرقم بالإسم تم تعديلها بالمرفق تجد الملف بع التعديل وبه أيضا خاصية إخفاء الصفر Test400-7.rar

السلام عليكم السبب في هذا أخي أنه ليس هناك تتابع في البيانات تذكر في الشرح السابق (ثالثا) كنت أعتقد أن البيانات لابد أن تكون متصلة لكن عموما ما دامت هذه رغبتك ولتلافي هذه المشكلة فقد ألغيت النطاق tameen نهائيا وغيرت الدالة لترجع للعمود A بالكامل أنظر المرفق Test400-6.rar