اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

عاطف عبد العليم محمد

03 عضو مميز
  • Posts

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

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

كل منشورات العضو عاطف عبد العليم محمد

  1. اخي Emad Sabry جزاك الله خيرا ان تطوعت بالرد وارجو ان تصبر علي لجهلي من كنترول بانل اي شاشة التحكم تمام /دوس على programs and features / اي البرامج ومنها البرامج والمميزات تمام / وبعدين دوس على الاوفيس كليك يمين واختار change / بالضغط يظهر لي ازالة تثبيت او تغيير بالضغط على تغيير يظهر لي خياران اصلاح سريع بدون انترنت او اصلاح عبر الانترنت فتم الاصلاح //// لم اجد جنب كلمة Microsoft Office فى سهم دوس عليه (او دوس كليك يمين) واختار Run all from my computer وبعدين اوك او continue ولذلك لم اتم ما تفضلت بشرحه نسخة الاوفيس 2016
  2. السلام عليكم هذا ملف للأخ / عبدالله باقشير غفر الله لنا وله وجزاه الله خيرا والملف به فورم رائع جدا واظنه يصلح للجميع المشكلة عندي ظهور هذه الرسالة could not load some objects because they are not available on this machine واظن سبب المشكلة ان الجهاز عندي 64bit وكنت اعمل على الفورم في جهاز سابق 32bite ونقلت الملفات للجهاز الحالي وتعمل تمام ارجو لمن يعرف الحل المساعدة وفقكم الله رابط الموضوع الاصلي المشكلة عن فورم ادخال و تعديل مرن بمعية فورم ادخال التاريخ (1).rar
  3. أخي ali mohamed ali وفقك الله انا رايت الملف طبعا ولكن لجهلي لم اعرف المدى المعرف سابقا وقد اجبت على سؤال وبقي سؤال اريد ان اضع تعريف المدى داخل الكود ويكون اكثر من مدى جزاك الله خيرا
  4. Dim tt As Variant Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Not Intersect(Target, Range("PRot_range")) Is Nothing And Target.Address <> "$A$1" Then m = Target.Count c = [AA1] k = tt If IsEmpty(k) Then GoTo 1 If m * c >= 1 Then Application.EnableEvents = False my_pass = Application.InputBox(" لا يمكن التعديل في هذه الخلية.... " _ & Chr(10) & "الا بحالات خاصة تتطلب كلمة مرور", "password") If my_pass = "pass" Then GoTo 1 Application.Undo Application.EnableEvents = True End If End If 1: Application.EnableEvents = True End Sub _____________________________________________________________________ Private Sub Worksheet_SelectionChange(ByVal Target As Range) tt = Selection.Value End Sub السلام عليكم يقول الاستاذ سليم بارك الله فيه كي توقف عمل الكود و يعود كل شيء الى طبيعته امسح محتويات الخلية AA1 (غير مرئية) لإعادة عمل الكود اكتب في الخلية AA1 الرقم 1 اذا أردت تغيير قيمة خلية غير فارغة سوف يطلب منك كلمة المرور أكتب pass كل ذلك في المدي من A1الى Z225 والسؤال كيف يمكن تغيير مدى الحماية فلم اجد في الكود a1 الى z225 وهل ممكن ان يوجد اكثر من مدى للحماية مثلا من a1 الى d10 ومن a15 الى d25
  5. اخي سليم حاصبيا وفقك الله في الكود اين يمكن تغيير النطاق المحمي ؟ و كيف اجعل نطاقين محميين في نفس الورقة
  6. اخي ali mohamed ali السلام عليكم ورحمة الله وبركاته تمام جدا ـ الله ينور عليك ويبارك لك ويوفقك
  7. السلام عليكم ممكن استاذ سليم نجعل التغيير مفتوح لخلايا محددة والباقي كما موجود لا يسمح بالتغيير ؟
  8. اخي ali mohamed ali إذا كان الرقم مثلا 561 وهو غير موجود في الجدول الناتج يكون 956 وهكذا كل رقم غير موجود يعطي رقم للمجموعة التالية ـ ان امكن وفقك الله تظبط الدالة اكثر بحيث تعطي رسالة خطأ
  9. بارك الله فيك اخي طارق محمود و جزاك الله خيرا بارك الله فيك اخي ali mohamed ali وجزاك الله خيرا وساعتمد على الدالة ان شاء الله اخي ali mohamed ali ان امكن شرح =My_Customesion($C$3;G7;G8;G9) لماذا فقط g7 ,g8 ,g9
  10. =IF(AND(C3>0;C3<51);951;IF(AND(C3>99;C3<131);952;IF(AND(C3>199;C3<214);953;IF(AND(C3>299;C3<311);954;IF(AND(C3>399;C3<409);955;IF(AND(C3>499;C3<561);958;IF(AND(C3>599;C3<660);956;IF(AND(C3>699;C3<739);957;IF(C3=740;959;IF(C3=739;961;IF(C3=738;960;IF(C3=737;962;"ادخل رقم حساب الصنف بالخليةc3")))))))))))) السلام عليكم ورحمة الله وبركاته المعادلة عاليه شغالة ولكن طويلة هل من طريقة لتقصيرها وكيف يمكن جعلها في الكود ليضعها مثلا في الخلية c4 حتى اذا اتمسحت يمكن جلبها بسهولة انا وضعتها بالكود ولكن عند تشغيله لم يلصق المعادلة كامل if طويلة.xlsm
  11. اخي مهند بارك الله فيك انا طلبت فورم فقط ولو كنت استطيع تصميمه لفعلت فعذرا
  12. السلام عليكم ورحمة الله وبركاته لدينا مجموعتين من الصفحات ( المجموعة المطلوبة ) و(مجموعة غير مطلوبة) المجموعة الأولى هي المطلوب ان يتم العمل عليها وهي تصميمها واحد السمة المشتركة الأساسية انه في الخلية e1 بها تاريخ وسمة مشتركة ايضا العمود c بداية من c10 به ارقام حسابات والعمود G به اسماء الحسابات بداية من G10 ولكن عدد الحسابات في كل صفحة غير متساوي فممكن صفحة بها 10 حسابات وأخرى 50 وهكذا قد يتم لاحقا اضافة صفحات أخرى من المجموعة المطلوبة لدينا صفحة قيود اليومية وهي المراد اخال البيانات فيه المطلوب نموذج ادخال بيانات فيه 1 يظهر فيه اختيار ليتم أختيار صفحة من الصفحات ( المجموعة المطلوبة) 2 بعد اختيار الصفحة يظهر اسماء الحسابات بالصفحة ليتم الاختيار منها 3 بعد اختيار اسم الحساب يظهر تلقائيا رقم الحساب 4 يتم اكمال باقي النموذج بمثل الجدول في صفحة قيد اليومية اسأل الله ان يكون هذا الطلب واضح ويمكن تنفيذه وييسر له من ينفذه وجزاه الله خيرا وصوما مقبولا للجميع ( يوم عاشوراء) شرح الطلب.xlsx
  13. الأخ الكريم /سليم حاصبيا واضح جدا جزاك الله خيرا هل من مزيد بالنسبة للدالة
  14. الأخ الكريم /ali mohamed ali جزاكم الله خيرا عند الاختيار بالسهم تعمل الدالة ولا يعمل ادراج اسم الصنف في الخلية C4 وعند الاختيار بالضغط انتر لا تعمل الدالة ويدرج اسم الصنف
  15. الاخ الكريم / ali mohamed ali السلام عليكم جزاكم الله خيرا كنت اريد ان يكون البحث عن طريق كمبو و الملف الذي ارفقته لا يحوي المطلوب على كل حال تم والحمد الله واستطعت ادراج الكمبو في المكان الذي اريده بنفس المميزات التي دلنا عليها الاخ سليم باقي ان النص الذي يظهر بها محاذي للشمال والمطلوب ان يكون محاذي لليمين وباقي دالة البحث VLOOKUP($B$3;ورقة1!$A$2:$H$70;COLUMNS($A$1:A1)+1;0) لم استطع حتى الان تطويعها وفقكم الله وجزى الله الاستاذ سليم وانتم كل خير أرفقت الملف ارجو التصحيح وشكرا محل1.rar
  16. الاخ الكريم / ali mohamed ali السلام عليكم جزاكم الله خيرا كنت اريد ان يكون البحث عن طريق كمبو و الملف الذي ارفقته لا يحوي المطلوب على كل حال تم والحمد الله واستطعت ادراج الكمبو في المكان الذي اريده بنفس المميزات التي دلنا عليها الاخ سليم باقي ان النص الذي يظهر بها محاذي للشمال والمطلوب ان يكون محاذي لليمين وباقي دالة البحث VLOOKUP($B$3;ورقة1!$A$2:$H$70;COLUMNS($A$1:A1)+1;0) لم استطع حتى الان تطويعها وفقكم الله وجزى الله الاستاذ سليم وانتم كل خير
  17. الأخ / سليم حاصبيا جزاك الله خيرا ومعذرة حاولت أن اطبق فلم استطع فلو سمحت سأرفق الملف و تطبق عليه المطلوب ادراج الكمبو في صفحة البيع خلية c2 الاختيارات من صفحة الأصناف من بداية خلية c3 في صفحة البيع الخلية c3 اريد ان يكتب بها تلقائيا بعد الاختيار من الكمبو الرقم المقابل لما تم اختياره والموجود في عمود b وجوزاكم الله خيرا محل1.rar
  18. الاخ /سليم حاصبيا هل يمكن عمل ما في الملف ليكون في نموذج ادخال ؟ اعني بمجرد ان اكتب في نموذج ادخال الاسم مثلا تظهر في خانات اخرى من نموذج الادخال البيانات نفسها و في خانة اخرى من نموذج الادخال ادخل رقم فيظهر في خانة اخرى منه الرقم مضروب في خانة اخرى ؟ وفقكم الله ولعلي سأطرح الموضوع في مشاركة مستقلة الاخ /سليم حاصبيا وفقكم الله في عملكم السابق كيف نجعل خلية بجانب خلية المبلغ الكلي ليظهر بها الاسم المراد ثم بعد اختياره يكون مكان الاختيار خالي ليسهل اختيار اسم آخر
  19. السلام عليكم ورحمة الله وبركاته نفترض ان في فورم الادخال خانة بها رقم الحساب ، هل يمكن بعد ادخال رقم الحساب ظهور اسم الحساب نفترض ان في فورم الادخال خانة بها سعر الوحدة هل يمكن بعد ادخال السعر يظهر في خانة اخرى السعر مضروب في خانة الكمية وهكذا عذرا اذا كان يمكن الشرح او الاحالة على مشاركة في نموذج بهذه الطريقة وجزاكم الله خيرا
  20. الاخ /سليم حاصبيا زادك الله علما وتوفيقا كيف اغير مكان القائمة المنسدلة بدلا من b3 اجعلها في c10 مثلا الاخ /سليم حاصبيا هل يمكن عمل ما في الملف ليكون في نموذج ادخال ؟ اعني بمجرد ان اكتب في نموذج ادخال الاسم مثلا تظهر في خانات اخرى من نموذج الادخال البيانات نفسها و في خانة اخرى من نموذج الادخال ادخل رقم فيظهر في خانة اخرى منه الرقم مضروب في خانة اخرى ؟ وفقكم الله ولعلي سأطرح الموضوع في مشاركة مستقلة
  21. وعليكم السلام ورحمة الله وبركاته انا لست خبير ولكن هذه المشكلة تقابلني ـ جرب ايقاف تشغيل الماكرو في الاكسيل عامة ثم افتح الملف لو فتح ممكن تنسخ ما فيه لملف جديد وفقك الله ده حل وممكن في حلول اسهل بس هذا ما اعرفه وفي المستقبل تعمل نسخة احتياطية كل فترة مناسبة
  22. السلام عليكم ورحمة الله وبركاته الأخ / أبوعبد الله اين تذهب القيود بعد اتمامها ؟ هل توجد صفحة تجمع فيها القيود وفقكم الله
  23. كيفية حساب مساحة قطعة أرض مساحة قطعة أرض منتظمة الشكل يمكن حساب مساحة قطعة أرض منتظمة الشكل بسهولة من خلال مجموعة من القوانين الحسابية الواضحة وسهلة الاستخدام، ومن هذه الأشكال ما يأتي: قطعة أرض مربعة الشكل: المربع هو شكل هندسي منتظم يحتوي على أربعة أضلاع متساوية في الطول مع أربع زوايا قائمة بقياس 90 درجة، ويمكن حساب مساحته من خلال قياس طول ضلع هذه القطعة، ثم حساب المساحة بناءً على المعادلة التالية: مساحة المربع = طول الضلع × طول الضلع مثال: كم تبلغ مساحة قطعة أرض مربعة الشكل طول ضلعها 20م؟ الحل: مساحة قطعة الأرض=20×20=400م². قطعة أرض مستطيلة الشكل: المستطيل هو شكل هندسي منتظم يحتوي على أربعة أضلاع، كل ضلعين متوازيين ومتساويين في الطول مع أربع زوايا قائمة بقياس 90 درجة، ويمكن حساب مساحته من خلال قياس الطول والعرض لهذه القطعة، ثم حساب المساحة بناءً على المعادلة التالية: مساحة المستطيل=الطول×العرض مثال: كم تبلغ مساحة قطعة أرض مستطيلة الشكل طولها 20م وعرضها 30م؟ الحل: مساحة قطعة الأرض=20×30=600م². قطعة أرض مثلثة الشكل: المثلث هو شكل هندسي منتظم يحتوي على ثلاثة أضلاع، وثلاث زوايا بقياسات مختلفة، ويمكن حساب مساحته من خلال قياس طول القاعدة فيها، بالإضافة إلى طول الارتفاع، ثم حساب المساحة بناءً على المعادلة التالية: مساحة المثلث = ½ × طول القاعدة × طول الارتفاع. مثال: كم تبلغ مساحة قطعة أرض مثلثة الشكل طول قاعدتها 20م وارتفاعها 40م؟ الحل: مساحة قطعة الأرض=½×20×40=400م². مساحة قطعة أرض غير منتظمة الشكل لا يوجد قانون حسابي ثابت لقطع الأرض غير منتظمة الشكل، ولكن يمكن حساب مساحة هذه القطع من خلال تقسيم القطعة الواحدة غير المنتظمة إلى مجموعة من القطع منتظمة الشكل، حيثُ تحسب مساحة كل شكل منتظم فيها على حدة، ثم حساب المساحة الكلية من خلال جمع مساحات القطع المنتظمة والصغيرة في هذه الأرض. منقول
×
×
  • اضف...

Important Information