أ / محمد صالح
-
Posts
4,444 -
تاريخ الانضمام
-
Days Won
192
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو أ / محمد صالح
-
شكرا لكلماتك الطيبة بالنسبة لعدم ظهور النتائج فحلها بسيط جدا ضع في بداية الدالة Application.Volatile وبالنسبة لناتج الدالة فهو رقم من نوع double ولا يمكن أن تكون قيمته سلسلة نصية فارغة لذلك يمكنك تغيير خيارات العرض للشيت الحالي بعدم إظهار الصفر file --> options --> advanced --> display options for this worksheet --> show a zero in cells that have zero value بالتوفيق أخي الكريم ولا تنساني من صالح دعائك
-
شكرا لكلماتك الطيبة ولا يخفى عليك إمكانية دمج الدالتين في دالة واحدة مع تمرير باراميتر ثالث يحدد النوع صفر أو يترك فارغا للحالة الأولى 1 أو أي رقم غير صفر للحالة الثانية Function kest(total As Double, start As Date, Optional ftype As Boolean = 0) As Double If ftype = 0 Then If Date >= DateAdd("m", 1, start) And Date <= DateAdd("m", 37, start) Then If Month(Date) - Month(start) = 1 Then kest = 550 * (total * 96.25 / 100 / 550 - Int(total * 96.25 / 100 / 550)) + total * 3.75 / 100 Else kest = (total - 550 * (total * 96.25 / 100 / 550 - Int(total * 96.25 / 100 / 550)) - total * 3.75 / 100) / 35 End If Else kest = 0 End If Else If Date >= DateAdd("m", 1, start) And Date <= DateAdd("m", 11, start) Then kest = total / 10 Else kest = 0 End If End If End Function وفقنا الله جميعا لكل خير
-
إن شاء الله يكون هذا هو المطلوب Function kest(total As Double, start As Date) As Double If Date >= DateAdd("m", 1, start) And Date <= DateAdd("m", 37, start) Then If Month(Date) - Month(start) = 1 Then kest = 550 * (total * 96.25 / 100 / 550 - Int(total * 96.25 / 100 / 550)) + total * 3.75 / 100 Else kest = (total - 550 * (total * 96.25 / 100 / 550 - Int(total * 96.25 / 100 / 550)) - total * 3.75 / 100) / 35 End If Else kest = 0 End If End Function Function kest2(total As Double, start As Date) As Double If Date >= DateAdd("m", 1, start) And Date <= DateAdd("m", 11, start) Then kest2 = total / 10 Else kest2 = 0 End If End Function الدالة kest بديل المعادلة في C3 الدالة kest2 بديل المعادلة في K3 الباراميتر الأول هو المبلغ والثاني هو تاريخ البداية ولا تنس تحويل الملف لصيغة تقبل الأكواد xlsm , xlsb وفقنا الله جميعا لكل ما يحبه ويرضاه
-
شكرا لك لمشارتك معلوماتك وفيديو الشرح ردي على أساس انه سؤال وطلب عمل هذا حتي في مربعات النصوص المرتبطة بجدول وليس علي انه شرح خالص دعواتي بالتوفيق والتفوق -
لا اعتقد هذا الامر يتم على textbox لانه مرتبط بخقل في الجدول ولكن يمكن التخايل علي ذلك بإضافة labe بنفس حدود مربع النص وخلفية شفافة وعند الضغط على Label يتم إخفاؤه ووضع التركيز في مربع النص وعند الخروج من مربع النص يتم إظهار Label اذا لم يكن فيه محتويات او يبقي مخفيا اذا احتوي textbox علي اي كتابة وتكرار هذا الكود في حدث الخالي current للنموذج Label1.visible = isnul(textbox1.value) ارجو ان تكون الفكرة اتضحت
-
وفقنا الله جميعا لكل ما يحبه ويرضاه @ابا جودى
-
جميعا بإذن الله تعالى @حمادة عمر
-
الإجابة حسب السؤال: لا يوجد اي مشكلة المهم مهارتك في توظيف الكود بما يتناسب مع برنامجك كل عام وجميع الإحوة بكل خير
-
شكرا لدعمكم أستاذ @محمد احمد لطفى باقي مشاركة الموضوع والفيديو
- 12 replies
-
- 1
-
-
- فاتورة الكهرباء
- اسعار
- (و1 أكثر)
-
شكرا لكلماتك الطيبة استاذ هاني تفاعلكم هنا وفي يوتيوب خطوة في الحصول على البرنامج بالتوفيق للجميع
-
تعديل كود دالة التفقيط الى عدد عشري ثلاثي
أ / محمد صالح replied to acc_ama's topic in قسم الأكسيس Access
المنتدى به الكثير من الدرر تحتاج من يبحث عنها وهذه احداها -
شكرا لكلماتك الطيبة أستاذ @Ali Mohamed Ali ومبارك الانضمام لفريق الموقع الاقتباس نفسه يطلب الآراء خبيرنا @محمد سلامة مرحبا بك دائما
-
بسم الله الرحمن الرحيم، السلام عليكم ورحمه الله وبركاته، كل عام وجميع زوار وأعضاء ومشرفي وإدارة منتدى أوفيسنا بكل خير وسعادة، عذرا لقلة مشاركاتي في هذا الصرح الكبير؛ نظرا لانشغالي ببعض الأمور، ولكن أعدكم دائما بكل جديد ومفيد. وفي هذه المرة أحب أن أقدم لكم هدية بعنوان احسب فاتورة الكهرباء المصرية من 2020 الى 2025 مع هذا البرنامج. فقد اصدرت وزارة الكهرباء قرارا بتحديد اسعار اكهرباء ي مصر للخمسة سنوات مقلبة من 2020 الى 2025. وكان ذلك يوم الثلاثاء 9 / 6 / 2020 فقمت بتصميم هذا البرنامج في الاكسس وقمت بعرضه هنا وبانتظار آرائكم ومقترحاتكم لتطويره. رابط الملف المستعمل في الشرح سيكون بناء على تفاعلكم مع الموضوع وتعليقاتكم في اليوتيوب. وهذا الفيديو الخاص بالشرح وعرضت في الفيديو تحديا لمن يهتم ببرمجة الويب في تحويل هذا البرنامج لصفحة ويب فمن لها من اصدقائي؟؟؟!!! وفي الأخير أدعوكم جميعا لزيارة مدونتي في ثوبها الجديد. وفقنا الله جميعا لكل ما يحب ويرضى.
- 12 replies
-
- 2
-
-
- فاتورة الكهرباء
- اسعار
- (و1 أكثر)
-
فك حماية شيتات ملفات الإكسل بجمع إصداراتها وامتداداتها
أ / محمد صالح replied to أ / محمد صالح's topic in منتدى الاكسيل Excel
الطريقة على ويندوز 10 هي نفسها الموجودة في الشرح على ويندوز 7 -
موعدنا اليوم مع شرح طريقة كيف تعرف أسعار العملات اليوم بدون مغادرة برنامجك في VBA اوفيس 2003 أو 2007 أو 2010 أو 2013 أو 2016 أو 2019 سواء برنامج اكسس أو اكسل أو وورد أو باوربوينت مع التعرف على أكواد عملات العالم وكذلك اسماء العملات باللغة العربية والانجليزية التعرف على نسخ النص الموجود في مربع النص إلى الحافظة والكثير من المفاجآت اكتشفها بنفسك ثالثا لمن يريد تحميل الملف الذي تم استخدامه في الشرح يمكنكم التعليق سواء هنا في المدونة أو في اليوتيوب وسيصلكم رابط الملف بإذن الله والآن مع فيديو الشرح ************** ولا تنسوا أحبابي الدعاء لغيركم بظهر الغيب حتى يقول لك الملك: آمين ولك مثلها إن شاء الله وتذكر لو بخل بها غيرك ما وصلت إليك فشارك المعلومة مع جميع أصدقائك في جميع مواقع التواصل الاجتماعي ============ القادم أفضل بإذن الله
- 2 تعليقات
-
- 6
-
-
- اسعار العملات
- vba
- (و2 أكثر)
-
هل يمكن أن احصل على سعر صرف العملات من موقع xe
أ / محمد صالح replied to عبد الله قدور's topic in قسم الأكسيس Access
إن شاء الله يفيدكم هذا الفيديو فتابعونا وفقنا الله جميعا لكل ما يحبه ويرضاه ولا ينقصني سوى دعاؤكم لي بالخير في الدنيا والآخرة ومشاركة الفيديو مع أصدقائكم فرب صديق يحتاج لما لا تحتاجه أنت -
ربما لم تقرأ عني أنه لا توجد حماية مطلقة حتى ميكروسوفت نفسها لم تستطع حماية منتجاتها لوجود الباتشات والكراكات وإنما هي فكرة ظهرت بعد استعمال بعض الإخوة لبيانات التسجيل في جدول وهذا طبعا أسهل للعب فيه من الريجيستري
-
الفائدة من المدة التجريبية هي تجربة البرنامج لمدة 3 أيام مثلا وهل من المعقول أن يقوم إنسان بتثبيت نسخة ويندوز كل 3 أيام حتى يهرب من تسجيل برنامج؟؟؟!!!!
-
الملفات الخاصة بنطق الكلمات المكتوبة
أ / محمد صالح replied to alaa aboul-ela's topic in قسم الأكسيس Access
إن شاء الله يفيدك هذا الفيديو ولا ينقصني سوى دعاؤكم ومشاركة المعلومة مع جميع أصدقائكم فلو بخل بهذا غيرك ما وصلت إليك فلا تبخل بها على غيرك -
كل شيء ممكن المهم هو إرفاق ملفك للتعديل عليه مع توضيح المطلوب تماما لكن هذه الألغاز والفوازير إجابتها قد لا تفهمها أنت *************** فمثلا للإجابةعلى هذا السؤال أقول لك: استعمل application.onkey هل فهمت شيئا؟؟!!!
-
بسم الله الرحمن الرحيم سلام الله عليكم ورحمته وبركاته طلب مني الكثير من أولياء الأمور والتلاميذ شرح درس العوامل والمضاعفات والعامل المشترك الأكبر والمضاعف المشترك الأصغر والأعداد الأولية وتحليل العدد إلى عوامله الأولية المقرر على الصف الرابع الابتدائي حيث أنه صعب جدا على التلاميذ وربما بعض الكبار كذلك فقمت ببرمجة هذه الصفحة للمساعدة في حل هذه المسائل وفهم الموضوع ببساطة https://officena.net/team/mas/maths4/ والسؤال هنا هل أكتفي بهذه الصفحة أم أسجل فيديو لشرح الدرس؟ رأيكم يهمنا أرجو من الجميع المشاركة
-
بسم الله نبدأ جمعتكم طيبة بذكر الله والصلاة على رسول الله أشكركم جميعا أحبابي في الله من كل قلبي على ثقتكم الغالية وإقبالكم على فيديوهات قناتي المتواضعة وأشكركم على دعمكم الدائم للقناة بالإعجاب والتعليق ومشاركة الفيديوهات وأعدكم بكل جديد ومفيد إن شاء الله في مجال تطوير التعليم والبرمجة والترفيه رابط القناة #ostazmas أحببت أشارككم فرحتي التي أنتم شريك فيها
-
ممكن بالفوتوشوب أو الباوربوينت أو البابليشر أو أي برنامج رسومي المهم هو قدرة المستخدم على توظيف أدواته
-
جميعا بإذن الله @athal
