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

أ / محمد صالح

أوفيسنا
  • Posts

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

  • Days Won

    195

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

  1. وفقنا الله جميعا لكل ما يحبه ويرضاه @ابا جودى
  2. جميعا بإذن الله تعالى @حمادة عمر
  3. الإجابة حسب السؤال: لا يوجد اي مشكلة المهم مهارتك في توظيف الكود بما يتناسب مع برنامجك كل عام وجميع الإحوة بكل خير
  4. شكرا لدعمكم أستاذ @محمد احمد لطفى باقي مشاركة الموضوع والفيديو
  5. شكرا لكلماتك الطيبة استاذ هاني تفاعلكم هنا وفي يوتيوب خطوة في الحصول على البرنامج بالتوفيق للجميع
  6. المنتدى به الكثير من الدرر تحتاج من يبحث عنها وهذه احداها
  7. شكرا لكلماتك الطيبة أستاذ @Ali Mohamed Ali ومبارك الانضمام لفريق الموقع الاقتباس نفسه يطلب الآراء خبيرنا @محمد سلامة مرحبا بك دائما
  8. بسم الله الرحمن الرحيم، السلام عليكم ورحمه الله وبركاته، كل عام وجميع زوار وأعضاء ومشرفي وإدارة منتدى أوفيسنا بكل خير وسعادة، عذرا لقلة مشاركاتي في هذا الصرح الكبير؛ نظرا لانشغالي ببعض الأمور، ولكن أعدكم دائما بكل جديد ومفيد. وفي هذه المرة أحب أن أقدم لكم هدية بعنوان احسب فاتورة الكهرباء المصرية من 2020 الى 2025 مع هذا البرنامج. فقد اصدرت وزارة الكهرباء قرارا بتحديد اسعار اكهرباء ي مصر للخمسة سنوات مقلبة من 2020 الى 2025. وكان ذلك يوم الثلاثاء 9 / 6 / 2020 فقمت بتصميم هذا البرنامج في الاكسس وقمت بعرضه هنا وبانتظار آرائكم ومقترحاتكم لتطويره. رابط الملف المستعمل في الشرح سيكون بناء على تفاعلكم مع الموضوع وتعليقاتكم في اليوتيوب. وهذا الفيديو الخاص بالشرح وعرضت في الفيديو تحديا لمن يهتم ببرمجة الويب في تحويل هذا البرنامج لصفحة ويب فمن لها من اصدقائي؟؟؟!!! وفي الأخير أدعوكم جميعا لزيارة مدونتي في ثوبها الجديد. وفقنا الله جميعا لكل ما يحب ويرضى.
  9. الطريقة على ويندوز 10 هي نفسها الموجودة في الشرح على ويندوز 7
  10. موعدنا اليوم مع شرح طريقة كيف تعرف أسعار العملات اليوم بدون مغادرة برنامجك في VBA اوفيس 2003 أو 2007 أو 2010 أو 2013 أو 2016 أو 2019 سواء برنامج اكسس أو اكسل أو وورد أو باوربوينت مع التعرف على أكواد عملات العالم وكذلك اسماء العملات باللغة العربية والانجليزية التعرف على نسخ النص الموجود في مربع النص إلى الحافظة والكثير من المفاجآت اكتشفها بنفسك ثالثا لمن يريد تحميل الملف الذي تم استخدامه في الشرح يمكنكم التعليق سواء هنا في المدونة أو في اليوتيوب وسيصلكم رابط الملف بإذن الله والآن مع فيديو الشرح ************** ولا تنسوا أحبابي الدعاء لغيركم بظهر الغيب حتى يقول لك الملك: آمين ولك مثلها إن شاء الله وتذكر لو بخل بها غيرك ما وصلت إليك فشارك المعلومة مع جميع أصدقائك في جميع مواقع التواصل الاجتماعي ============ القادم أفضل بإذن الله
  11. إن شاء الله يفيدكم هذا الفيديو فتابعونا وفقنا الله جميعا لكل ما يحبه ويرضاه ولا ينقصني سوى دعاؤكم لي بالخير في الدنيا والآخرة ومشاركة الفيديو مع أصدقائكم فرب صديق يحتاج لما لا تحتاجه أنت
  12. ربما لم تقرأ عني أنه لا توجد حماية مطلقة حتى ميكروسوفت نفسها لم تستطع حماية منتجاتها لوجود الباتشات والكراكات وإنما هي فكرة ظهرت بعد استعمال بعض الإخوة لبيانات التسجيل في جدول وهذا طبعا أسهل للعب فيه من الريجيستري
  13. الفائدة من المدة التجريبية هي تجربة البرنامج لمدة 3 أيام مثلا وهل من المعقول أن يقوم إنسان بتثبيت نسخة ويندوز كل 3 أيام حتى يهرب من تسجيل برنامج؟؟؟!!!!
  14. إن شاء الله يفيدك هذا الفيديو ولا ينقصني سوى دعاؤكم ومشاركة المعلومة مع جميع أصدقائكم فلو بخل بهذا غيرك ما وصلت إليك فلا تبخل بها على غيرك
  15. كل شيء ممكن المهم هو إرفاق ملفك للتعديل عليه مع توضيح المطلوب تماما لكن هذه الألغاز والفوازير إجابتها قد لا تفهمها أنت *************** فمثلا للإجابةعلى هذا السؤال أقول لك: استعمل application.onkey هل فهمت شيئا؟؟!!!
  16. بسم الله الرحمن الرحيم سلام الله عليكم ورحمته وبركاته طلب مني الكثير من أولياء الأمور والتلاميذ شرح درس العوامل والمضاعفات والعامل المشترك الأكبر والمضاعف المشترك الأصغر والأعداد الأولية وتحليل العدد إلى عوامله الأولية المقرر على الصف الرابع الابتدائي حيث أنه صعب جدا على التلاميذ وربما بعض الكبار كذلك فقمت ببرمجة هذه الصفحة للمساعدة في حل هذه المسائل وفهم الموضوع ببساطة https://officena.net/team/mas/maths4/ والسؤال هنا هل أكتفي بهذه الصفحة أم أسجل فيديو لشرح الدرس؟ رأيكم يهمنا أرجو من الجميع المشاركة
  17. بسم الله نبدأ جمعتكم طيبة بذكر الله والصلاة على رسول الله أشكركم جميعا أحبابي في الله من كل قلبي على ثقتكم الغالية وإقبالكم على فيديوهات قناتي المتواضعة وأشكركم على دعمكم الدائم للقناة بالإعجاب والتعليق ومشاركة الفيديوهات وأعدكم بكل جديد ومفيد إن شاء الله في مجال تطوير التعليم والبرمجة والترفيه رابط القناة #ostazmas أحببت أشارككم فرحتي التي أنتم شريك فيها
  18. شكرا لكلماتك العطرة نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  19. ممكن بالفوتوشوب أو الباوربوينت أو البابليشر أو أي برنامج رسومي المهم هو قدرة المستخدم على توظيف أدواته
  20. لا تحتاج لكتابة الكود في أكسس ثم تصديره إلى إكسل فقط تحتاج كتابة جميع سطور الأوامر الخاصة بالإكسل بين السطرين with xl end with وكأنك في تطبيق الإكسل تماما مثلا .activesheet.range("a1").value=5555555
  21. ما شاء الله شكرا خاص للأستاذ @رفعت يسري حامد لقيامه بالتحايل على المطلوب الذي أسعد أخانا مصطفى شاهين الله يعطيك العافية، تم حل المشكلة بإضافة كود تم إدراجه بالمشاركات أعلاه. أشكر لكم جهودكم الطيبة معنا والحمد لله صدق كلامي مع الأستاذ مصطفى ولم يتم الحل بجدول محتويات قائم على الإشارات المرجعية حيث أن ذلك غير ممكن في الوورد
  22. بفضل الله الموضوع بسيط لفتح الإكسل على مصنف معين وتشغيل ماكرو معين فيه استعمل هذه الدالة Function runExcelMacro(wkbookPath, macroName) Dim XL As Object Set XL = CreateObject("Excel.Application") With XL .Visible = False .displayalerts = False .Workbooks.Open wkbookPath .Run macroName .ActiveWorkbook.Close (True) .Quit End With Set XL = Nothing End Function وطريقة استدعائها هكذا Sub mas() Call runExcelMacro("C:\myworkbook.xls", "Macro1") End Sub الباراميتر الأول مسار الملف وليس اسمه فقط والثاني اسم الإجراء موفق بإذن الله
  23. يفضل تصوير الرسالة حتى نتعرف معك على الخطأ ويمكن معالجته
  24. أخي الكريم حتى يسهل عليك كتابة الكود يفضل أن تقوم بتسمية الجداول والحقول بحروف انجليزية وهي عادة حسنة يتبعها كل المبرمجين والمحترفين ولذا ينبغي عليك تسمية الجدول بـ names وحقل المعرف بـ id ثم أضف هذا الكود في حدث قبل الإدراج Private Sub Form_BeforeInsert(Cancel As Integer) If DCount("*", "[names]") >= 10 Then DoCmd.RunSQL "delete from names where id=" & DMin("id", "[names]") End If End Sub ومعناه كالتالي: إذا كان عدد السجلات في جدول names يساوي 10 يجري استعلام حذف السجل صاحب رقم id الأصغر موفق بإذن الله
×
×
  • اضف...

Important Information