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

أ / محمد صالح

أوفيسنا
  • Posts

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

  • Days Won

    197

كل منشورات العضو أ / محمد صالح

  1. السلام عليكم ورحمة الله وبركاته عذرا لأني لم أنتبه أن هذا الموضوع بخصوص الكود الخاص بالتفقيط خاصتي فالمنتدى مليء بالدرر تفضل أخي الكريم أصلح الله أحوالنا وأحوالكم في اليمن الشقيق تفقيط الدرجات حتى 9999.5 ويمكن كتابة غ بدلا من الدرجة ويكون التفقيط غ ويمكن تعديله في الكود إلى أي كلمة أو عبارة أحتاج دعاءكم لي بصلاح النفس وسعة الرزق وفقنا الله وإياكم لكل خير تفقيط الدرجات.zip
  2. شكرا لتواصلك أخي الكريم إن شاء الله سيتم فتح موضوع جديد بهذا الخصوص ولكن لم تخبرنا برأيك في الموضوع المنشور
  3. بسم الله الرحمن الرحيم كيف الحال أحبابي في الله إن شاء الله بخير وسعادة ورضا كل عام أنتم جميعا بخير نلتقي من جديد في شهر ميلاد سيد الخلق وهديتي لكم بمناسبة المولد النبوي الشريف هي ********** بناء على طلب الأخ الفاضل @عبدالرحمن وسلمى قمت بعمل دالة معرفة لجلب ناتج التفقيط الموجود في صقحتي الشخصية فس موقع أوفيسنا https://officena.net/team/mas/tafkeet/ إلى ملف إكسل أو أكسس بشرط الاتصال بالانترنت ============== الجميل في الصفحة أنها تراعي بإذن الله كل قواعد صياغة العدد في اللغة العربية ولا تحتوي على أخطاء إملائية ولا نحوية وتمت برمجتها بلغة php لأني لم أجد من المرونة في لغة فيجوال بيسك للتطبيقات vba ما يسمح بنفس البرمجة المستخدمة في لغة الويب php لذا تم التحايل على الأمر بكود يقوم بطلب الصفحة الخاصة بالتفقيط وتمرير البيانات الخاصة بنا من صفحة الإكسل إلى الموقع ثم يسجل ما يعود به الموقع في الخلية ============ ويمكن الاستفادة من الكود في جلب بيانات أي صفحة من الانترنت عن طريقة vba والآن أترككم مع الملف التفقيط من الانترنت.rar
  4. ما شاء الله جزاك الله كل خير أخي الكريم أستاذ رجب جاويش على هذا الجهد العظيم المبذول في هذا الملف الرائع رزقكم الله سعادة الدارين
  5. شكرا لمرورك العطر أخي الكريم فعلا هذا البرنامج يخدم المستهلك أكثر من أهل العمل في هذا المجال وفقنا الله جميعا لكل ما يحب ويرضى
  6. على بركة الله شكرا لكلماتك الطيبة أخي الكريم سعيد طلباتك أوامر رغم إن موضوع التحكم في إضافة الرسوم والدمغة كان صعب قليلا رجاء مراجعة الملف تم إضافة إصدار جديد
  7. فعلا هذه المعلومة تجعل البرنامج كاملا هل تم التأكد من هذه المبالغ؟ وكيف يتم إضافتها؟ هل تصاعدية مثل المبلغ؟ بمعنى أن الشريحة من 1 إلى 50 يضاف عليها 1 جنيه فهل يضاف على من 51 إلى 100 مبلغ 1 جنيه للشريحة السابقة + 2 جنيه للشريحة الحالية أم يضاف 2 فقط؟ ففي مبلغ التكلفة تضاف 50 * 0.13 = 6.50 + 50 * 0.22 = 11 فتكون التكلفة الإجمالية 17.5
  8. لو أمكن ترفق الملف لمعاينته
  9. وإياكم أستاذ محمد لا تنس أن الفكرة من موضوعك هذا تطوير للفكرة فهل التطوير للأفضل ؟
  10. اعرض الملف حساب فاتورة الكهرباء المصرية من يوليو 2017 و يوليو 2018 بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته كل عام أنتم بخير وسعادة ورضا ================= استكمالا لسلسلة ما خف وزنه وغلا ثمنه موعدنا اليوم مع ملف يحتاجه كل مهتم باستهلاك الكهرباء في المنازل وحسابها بالأكسس بطريقتين أولا بحساب تكلفة عدد الكيلو وات المستهلكة ***************** والثانية بحساب عدد الكيلوات المقترح للتكلفة المحددة ------------------------------- وكل ذلك في نموذج واحد ودالتين معرفتين ///////////////////////////// ولا ينقصني سوى دعاؤكم لي بالخير في الدنيا والآخرة ********************** ملحوظة: الكود يعمل على كل إصدارات الأوفيس تم مشاهدة موضوع في نفس المجال وهو في هذا الرابط وتطوير الفكرة إلى ما وصلت عليه في هذا الملف ******************* دمتم في رعاية الله وحفظه وانتظرونا فالقادم أفضل إن شاء الله صاحب الملف أ / محمد صالح تمت الاضافه 20 سبت, 2017 الاقسام قسم الأكسيس
  11. Version 3.0.0

    852 تنزيل

    بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته كل عام أنتم بخير وسعادة ورضا ================= استكمالا لسلسلة ما خف وزنه وغلا ثمنه موعدنا اليوم مع ملف يحتاجه كل مهتم باستهلاك الكهرباء في المنازل وحسابها بالأكسس بطريقتين أولا بحساب تكلفة عدد الكيلو وات المستهلكة ***************** والثانية بحساب عدد الكيلوات المقترح للتكلفة المحددة ------------------------------- وكل ذلك في نموذج واحد ودالتين معرفتين ///////////////////////////// ولا ينقصني سوى دعاؤكم لي بالخير في الدنيا والآخرة ********************** ملحوظة: الكود يعمل على كل إصدارات الأوفيس تم مشاهدة موضوع في نفس المجال وهو في هذا الرابط وتطوير الفكرة إلى ما وصلت عليه في هذا الملف ******************* دمتم في رعاية الله وحفظه وانتظرونا فالقادم أفضل إن شاء الله
  12. بارك الله لك أخي الكريم اعتمدت على أنك تعرف كيفية عمل التنسيق الشرطي وبناء عليه تم تعديل المشاركة السابقة ليكون بها الجواب الكامل
  13. السلام عليكم ورحمة الله وبركاته وفقنا الله وإياكم لكل خير بعد إذن الأحباب المشاركين هذه محاولة مني لعلها تكون الإجابة تم التلوين باستخدام التنسيق الشرطي: بتحديد النطاق $E$8:$AI$62 من تبويب home نضغط conditional formatting ثم new rule ثم آخر أمر use a formula to ... ثم إضافة قاعدة التلوين =WEEKDAY(E$12)=6 وتعني أن يوم هذا التاريخ هو الجمعة على أساس أن ترقيم الأسبوع في إكسل يبدأ يوم الأحد ثم تحديد لون الخلفية المطلوب ثم Ok وتم تنفيذ الإظهار والإخفاء في حدث عند التغيير لورقة العمل Private Sub Worksheet_Change(ByVal Target As Range) For c = 33 To 35 Columns(c).EntireColumn.Hidden = 0 If Day(Cells(12, c)) < Day(Cells(12, 32)) Then Columns(c).EntireColumn.Hidden = 1 Next c End Sub وهي للتأكد من أن اليوم المكتوب في الأعمدة من 33 إلى 35 أكبر من اليوم الموجود في العمود 32 وهو 28 في الشهر فإذا كان أصغر تعني أنه شهر جديد فيقوم بإخفاء العمود كله أترككم في رعاية الله mas_solok.rar
  14. فعلا رمز الاتصال لديك أخي الكريم لا يدل على أن الاتصال مقطوع فهذا رمز قطع الاتصال في اللان وهذا رمز قطع الاتصال في الوايرلس ............. الغريب أننا لم نتلق أي رد من صاحب السؤال!!
  15. لعمل المطلوب بكل بساطة يلزمك وضع المعادلة =TRUNC(D3/$G$1,2) في الخلية G3 وذلك بقسمة عدد دقائق التأخير على عدد دقائق الحصة وفي الخلية H3 نضع هذه المعادلة =E3*G3 بضرب عدد حصص التأخير في سعر الحصة وفي الخلية I3 نضع هذه المعادلة =F3-H3 بطرح قيمة الخصم من المرتب
  16. الكود صحيح 100% ويعمل بكفاءة عالية ومجرب في أكثر من موضع وهذا ملف بسيط للتجربة وموافاتي بالنتيجة حتى نتوصل لأسباب عدم عمل البرنامج مع الأستاذ شيفان كما هو مطلوب check internet.rar
  17. يمكنك استعمال هذا الكود Private Declare Function InternetGetConnectedState Lib "wininet.dll" (ByRef dwflags As Long, ByVal dwReserved As Long) As Long If InternetGetConnectedState(0&, 0&) Then 'code if conected Else MsgBox "تأكد من اتصالك بالانترنت" End If مع مراعاة أن السطر الأول للإعلان عن الدالة يجب أن يوضع في الجزء العلوي من الموديول وكود الشرط يمكن تضمينه في أي إجراء أو حدث وفقنا الله وإياكم لكل خير
  18. بارك الله لك أستاذ هشام مشكلة غلق ملف الإكسل إذا قام المستخدم بإضافة أو حذف عمود أو صف لها أسباب كثيرة منها: كثرة المعادلات كثرة أوراق العمل المحتوية على معادلات قلة إمكانيات جهاز المستخدم كالمعالج والذاكرة العشوائية بالإضافة إلى ما ذكرت حضرتك من تجميد الألواح او التقسيم وأدعو الجميع المشاركة بذكر السبب الذي أدى لوجود هذه المشكلة معهم وطريقة حلها
  19. ما شاء الله أسلوب رائع في الكتابة أتوقع لك مستقبلا في تأليف المشاركات النافعة أستاذ @المالكي333 المشكلة تكمن في عدم إرفاق الملفين حتى يتمكن أحد الزملاء بعمل المطلوب وتوضيح خطواته
  20. التجربة خير دليل جرب وأخبرنا بالنتيجة رغم أنه لا يوجد ما يمنع تنفيذها نظريا
  21. ما الذي لايعمل؟ يجب أن تحددكلامك فربما يفهما أحدنا أن الوظيفة الإضافية لا تعمل وهذا مخالف للحقيقة فهي تعمل بنجاح ربما يحتاج أحدنا ممن لم تعمل معه إعادة الخظوات بطريقة أكثر دقة في تنفيذ المطلوب وفقنا الله وإياكم لكل خير
  22. بعد إذن حبيبنا شيفان يمكن استعمال المعادلة الآتية DSum("Field", "Table", "Field > 0") حيث table اسم الجدول و field اسم الحقل الموجود به الأرقام
  23. في هذه الحالة يلزمك حساب على موقع استضافة مجانية أو مدفوعة http://www.hostingadvice.com/how-to/free-web-hosting/
  24. وهذا فيديو لشرح الأكواد والطريقة من الألف إلى الياء نفعنا الله وإياكم بما علمنا وعلمنا ما ينفعنا
  25. جزاك الله خيرا أخي الكريم على مرورك العطر وكلماتك الرقيقة ويبدو انك لم تقم بفحص الأكواد جيدا بالنسبة المطلوب الأول: هل المدة التجريبية غير محددة في الكود باسم trial days ؟! وبالنسبة لتمديد الفترة التجريبية بعد تسجيل البرنامج يتم تمديد الفترة التجريبية وفتح البرنامج لأجل غير مسمى وبالنسبة لحقول العميل تكون في شاشة خاصة غير شاشة التسجيل فهنا الاعتماد على رقم الجهاز وليس اسم العميل وربما تتحفنا بمثال كهذا به كل أفكارك فيما يتعلق بالموضوع بانتظار تعديلاتك وفي ذلك فليتنافس المتنافسون
×
×
  • اضف...

Important Information