اذهب الي المحتوي
أوفيسنا

سمير نجار

03 عضو مميز
  • Posts

    436
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو سمير نجار

  1. اخي الكريم ذكرت أن هذا الحل هو للطلب الثاني فهل كان الحل الذي تريد ؟ بالنسبة للطلب الاول فالمعذرة وأتمنى من الاخوة العمل على ذلك ملاحظة : ملفك المرفق يوجد فيه مشكلة في ظهور الفورم عند فتح الملف وقد تداركت ذلك اليك الرفق ‫برنامج حالات %5اصابة 1.rar
  2. اخي الكريم كريم فيما يخص الطلب الثاني شاهد المرفق ‫برنامج حالات %5اصابة 1.rar
  3. اخي الكريم سرمد بعد اذن استاذي الكريم ابو عيد حسب طلبك للكاش فان + المفرد يكون مجموع الاعمدة 23 وليس 20 وهذا هو الملف وطبعاً بالطريقة التقليدية توضيح جمع اكثر من خلية من أكثر من ورقة2.rar
  4. لعل هذا هو المطلوب كود لطباعة وتحديد ناحية الطباعة1.rar
  5. وعليكم السلام اخي الكريم محمد لاحظت عند المعاينة قبل الطباعة أن البيانات غير منظمة في الورقة وخاصة في الورقة الثالثة فالبيانات تكاد تكون في وسط الصفحة فهل هذه مشكلة لديك تحياتي
  6. وعليكم السلام اخي محمد الصورة صغيرة جداً وغير واضحة
  7. كل الشكر لك استاذي ابوالبراء على هذا الشرح
  8. استاذي الكريم ابوالبراء بارك الله فيك على المشاركة هل تختلف المعادلة في اكسل2007 عن نسخة احدث في مسالة فاصلة منقوطة وغير منقوطة؟
  9. أليس هذا كان طلبك؟؟ اذاً انت تريد النتيجة هكذا ( 25/8/2016 ) ضع هذه المعادلة في H2 =IF(MID(E2;4;1)<>"/";MID(E2;3;2)&"/"&MID(E2;1;1)&"/"&MID(E2;6;4);MID(E2;3;1)&"/"&MID(E2;1;1)&"/"&MID(E2;5;4)) تحياتي
  10. اخي الكريم م.سعيد معادلتك هي عبارة عن استخراج الارقام من العمود F وليس لها علاقة بتنسيق التاريخ .والخلايا في العمودين F و E ليست تنسيق تاريخ وهذه التواريخ ليست مدخلة كتاريخ هنا على كل حال انظر الى المرفق التاريخ4.rar
  11. اخي الكريم رمزي أعتقد انه من الافضل وضع طلبك في موضوع جديد ( حسب رأي الادارة الفاضلة) مع ارفاق ملف للموضوع بارك الله فيك
  12. اليك المرفق التاريخ 3.rar
  13. اخي الكريم رمزي حدد اي خلية او عدة خلايا او عمود ثم ضع مؤشر الماوس عليه ثم كليك يمين للماوس تظهر قائمة . اختر تنسيق خلايا ثم التنسيق الذي تريد ( رقم - عملة - تاريخ ....) وعند اختيار التاريخ . حدد نوع التنسيق الذي تريده ارجو ان يكون هو المطلوب
  14. اخي الكريم م.سعيد لاحظت أنك تريد نتيجة المعادلة هو ظهور التاريخ بهذا الشكل ( 22/05/2016 ) إن كان كذلك . ضع هذه المعادلة في العمود H لتعمل على العمود E =(MID(TRIM(E2);FIND("/";TRIM(E2))+1;2)&"/"&LEFT(TRIM(E2);2)&"/"&(MID(TRIM(E2);(FIND("/";TRIM(E2);4)+1);4))) وإن كان غير المطلوب فالرجاء توضيح اكثر
  15. اخي الكريم م.سعيد الرجاء توضيح المطلوب اكثر لديك معدلة في العمور I تعمل على العمود F وانت تريد تطبيق نفس المعادلة على العمور E صحيح؟ وفي اي عمود تريد تطبيق المعادلة؟
  16. على الرحب والسعة اخي قيس الحمد لله
  17. اخي الكريم ان حل مشكلة بسيط جداً ( واذا أردت ارفاق ملفك مع الماكرو فأنا جاهز ) لكن أفضل أن تتعلم ما هو الماكرو وتطبقه على ملفك لكي تثبت الفكرة عندك في المرفق ملف يشرح عن الماكرو - (حملته من النت على عجالة ) و أنا والاخوة معك في اي استفسار تحياتي elebda3.net-2251.rar
  18. وعليكم السلام اخي الكريم قيس111 عن طريق دالة iF أرجو أن يكون هو المطلوب انظر المرفق Book2.rar
  19. وعليكم السلام اخي الكريم RAHEM الاساتذة الافاضل في المنتدى لطالما نبهوا على ضرورة ارفاق ملف مع الموضوع . جزاك الله خيراً على كل حال يمكن عمل ما تريد عن طريق الماكرو ( ابدأ تسجيل الماكرو - حدد الخلايا التي تريد حذفها ثم احذفها - اوقف التسجيل) ويمكن تكرار هذه العملية بتشغيل الماكرو فقط تحياتي
  20. استاذي الكريم مختار بارك الله فيك وأرجو ان يسعنا حلمك وكرمك لا يوجد مشكلة في المجال E10:E68 عند تعديل اي خلية ضمن المجال لكن عندما تصل للخلية E69 عندها سيندرج سطر فارغ. جرب عدل الخلية E69 ثم انتر ومرة ثانية ثم انتر و.......( لاحظ العمود" I " (مجموع الفاتورة - الباقي ....) ستكرر المعادلة في عدة خلايا امر اخر : اذا وصلت بالاسماء الى الخلية E75 ارجع وعدل الخلية E72 مثلاُ عندها سيندرج سطر فارغ بين E72 و E73 تحياتي
  21. اخي محمد وفقك الله واياي لما يحبه ويرضاه وأعطاك مثلما دعوت
  22. نعم استاذي ابوالبراء هذا هو الكود ومكانه في حدث الورقة (تصفية)sheet3 حيث d2 هي خلية البحث . مع ملاحظة العمود A حيث هو مكان الفلترة والتصفية Private Sub Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = False On Error Resume Next Application.ScreenUpdating = False If Target.Row <> 1 And Target.Column <> 4 Then Exit Sub ActiveSheet.Unprotect ActiveSheet.ShowAllData Range("A7:A33333").AutoFilter Field:=1, Criteria1:="=" & [A2], Operator:=xlOr, Criteria2:="=" If [d1] = "" Then ActiveSheet.ShowAllData Range("D1").Select Application.CommandBars("Web").Visible = False End Sub واقصد بشمولية البحث انه يمكن البحث عن اي كلمة او جزء من كلمة او عن رقم وذلك ضمن المجال B7:M33333 وهذا الملف المرفق مع تعديل بسيط وطبعاً هنا التصفية لبينات الورقة نفسها وهناط طريقة اخرى لتصفية بيانات ورقة (عام) بيان بحركة السائقين3.rar
  23. وعليكم السلام ورحمة الله وبركاته استاذي الكريم احمد زمان بارك الله فيك هذه طريقة للتصفية من حضرتك كنت قد حفظتها من قبل وهي طريقة تعجبني كثيراً لما لها من شمولية للبحث في جميع الاعمدة أرجو أن تنال رضا استاذي ابو حنين بيان بحركة السائقين2.rar
  24. اخي محمد المعذرة على التأخير .. قضيت ساعات في ايجاد حل لمشكلة الكود لكن خبرتي ضعيفة إليك الملف حسب ( الطريقة صاح ) التي تريدها لكن أرجع واكرر بأن الكود فيه مشكلة الحل في حجم ورقة الفاتورة 7.rar
  25. كل الشكر والتقدير لك سيدي الكريم فكرة دمج فورم البحث مع فورم الادخال مقبولة اذا كانت الادخالات قليلة مثل موضوعنا الحالي بينما لو كانت الادخالات كثيرة بحيث كان حجم الفورم يأخذ نصف الشاشة مثلاً أو اكثر فأظن فصل الاثنين افضل وجزاك الله كل خير والفورم المدموج جميل ورائع يستفاد منه في كثير من الادخالات بقي امر واحد وهو عند ظهور رسالة التنبيه ثم موافق لماذا لا يرجع مؤشر الكتابة للتكست بوكس1 . أليس الجزء TIXTBOX1.SETFOCUS الموجود بعد الرسالة في الكود يعني ذلك . لأنه بعد ظهور الرسالة لا يمكن البحث مجدداً اخي الكريم محمد اشكرك على المشاركة والمتابعة
×
×
  • اضف...

Important Information