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

أ / محمد صالح

أوفيسنا
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    4477

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

  • Days Won

    197

 نوع المحتوي 

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

  1. أ / محمد صالح
    المرجع الدائري معناه أن الخلية الموجود بها المعادلة ضمن المرجع المحسوب في المعادلة يعني في حالتنا هذه خلية كسر الجنيه محسوبة ضمن إجمالي المستقطع الذي هو بدوره يدخل في معادلة الصافي فلا يمكن وضع معادلة تخص الصافي في خلية كسر الجنيه
  2. أ / محمد صالح
    شكرا لمرورك الكريم أستاذ أحمد الفضل لله العلي العظيم
  3. أ / محمد صالح
    الأسهل عمل قائمة تختار منها نقدي أو تقسيط لأن الحل سيكون بالمعادلات اما في حالة إضافة زرين سيتدخل الكود ولا تستطيع إضافة طلبيات مختلفة في النوع في الشيت الواحد أما في حالة القائمة والمعادلات يمكن تكرار الطلبيات مختلفة النوع في نفس الشيت وهذا ما طبقه الأستاذ سليم بارك الله له في ملفه المرفق.
  4. أ / محمد صالح
    في هذه الحالة يلزمك زيادة عمود نوع الطلبية نقدي أو تقسيط يختار من خلال القائمة وفي عمود السعر نستخدم دالة if =if(c1="نقدي", formula 1, formula 2) حيث المعادلة الأولى هي معادلة السعر النقدي والمعادلة الثانية هي معادلة سعر التقسيط والخلية c1 هي الخلية التي بها نوع الطلبية الذي تمت زيادته
  5. أ / محمد صالح
    بارك الله لك أستاذ ياسر طريقة أخرى لتنفيذ المطلوب وبنفس عدد سطور الكود (٦ سطور) وفقنا الله جميعا لكل ما يحب ويرضى
  6. أ / محمد صالح
    المشكلة كما قال أستاذ ياسر تخص تحديث دوت نت فريم وورك وأنصح باستخدام نسخة ويندوز أحدث حيث أن شركة ميكروسوفت قد أوقفت الدعم والتحديثات لنسخة اكس بي التي صدرت في ١٩٩٨ وصدر بعدها Vista 7 8 8.1 10 وأكرر جميع هذه الحلول لمشكلة واحدة ويلزمني منها أيسرها وأسرعها في التنفيذ وليس مجرد حصر لكل الحلول وفقنا الله جميعا لكل ما يحب ويرضى
  7. أ / محمد صالح
    أعتقد يجب قبل الدخول لشاشة الكود مع السطر الأصفر تظهر رسالة مثل هذه رجاء تصويرها للتعامل مع الخطأ
  8. أ / محمد صالح
    وفقنا الله جميعا لكل ما يحب ويرضى
  9. أ / محمد صالح
    كدا أسهل وكنت أرجو أن تحاول فيها أولا إنما العلم بالتعلم والمحاولة والخطأ جرب تغيير الكود لهذا Sub addkasr() c = Cells(Rows.Count, "AR").End(xlUp).Row Range("an8:an" & c).ClearContents For n = 8 To c Range("an" & n) = Range("ar" & n) Next MsgBox "ok" End Sub
  10. أ / محمد صالح
    الخلية D5 هي الخاصة بالسعر بها هذه المعادلة =IF(B5="","",VLOOKUP(B5,'اسم المادة والسعر'!$B$2:$C$999,2,0)) وهي تحضر ناتج البحث من العمود الثاني C وهو الخاص بسعر القسط ولجلب سعر النقد الموجود في العمود d =IF(B5="","",VLOOKUP(B5,'اسم المادة والسعر'!$B$2:$D$999,3,0)) أرجو أن يكون هذا هو المطلوب
  11. أ / محمد صالح
    المطلوب غير واضح بصورة كافية رجاء تحديد الأعمدة المطلوب التعديل عليها وتحديد خيارات التعديل بمنتهى التفصيل
  12. أ / محمد صالح
    جميع أكواد السادة الزملاء تعمل بكفاءة ولا يوجد أخطاء وربما تصوير نص رسالة الخطأ وليس شاشة الكود بعد إغلاق الرسالة يفيد في الوصول للحل في مشكلة الكود الرابع
  13. أ / محمد صالح
    بعد إذن أخي وحبيبي في الله الأستاذ سليم حاصبيا جرب هذا المرفق أخي الكريم بكود بسيط يمكن أن يؤدي الغرض Sub addkasr() c = Cells(Rows.Count, "A").End(xlUp).Row Range("h2:h" & c).ClearContents For n = 2 To c Range("h" & n) = Range("j" & n) - Int(Range("j" & n)) Next MsgBox "ok" End Sub mas_كسرالقرش.rar
  14. أ / محمد صالح
    يمكنك كتابة الاختيارات في عمود ثم تقف في الخلية المطلوب عمل قائمة بها ثم من تبويب data (بيانات ) نختار data validation (التحقق من الصحة) ثم من القائمة الأولى نختار list (قائمة) وفي الخاصية source (المصدر) نختار النطاق ثم نضغط على ok موافق لتكون هكذا
  15. أ / محمد صالح
    شكرا جزيلا لكل من شارك الموضوع وفقنا الله لكل ما يحب ويرضى
  16. أ / محمد صالح
    شكرا لمروركم الكريم أحبتي في الله وفقنا الله جميعا لكل ما يحب ويرضى
  17. أ / محمد صالح
    قناة رائعة باللغة الإنجليزية ولدينا الكثير باللغة العربية أيضا مشكورين جميعا على جهودكم الطيبة
  18. أ / محمد صالح
    بعض ما عندكم أستاذ محمود تقبل الله منا ومنكم
  19. أ / محمد صالح
    شكرا لمرورك الكريم على موضوعاتي القليلة أخي الخبير زيزو العجوز وفقنا الله وإياكم لكل ما يحب ويرضى
  20. أ / محمد صالح
    وإياكم أستاذ ياسر بارك الله لك ...................................... رابط الملف المستعمل في الشرح https://www.file-upload.com/9saayxfsiz7l
  21. أ / محمد صالح
    بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته كل عام أنتم جميعا بخير أحبابي في الله اليوم موعدنا مع فيديو جديد للمتقدمين في الإكسل إلى عشاق التميز في التعامل مع نماذج إكسل يشرح كيفية تصغير نموذج الإكسل إلى شريط المهام إخفاء برنامج الإكسل Hide excel window إضافة زر تصغير للنموذج add minimize button to userform إضافة أيقونة لشريط عنوان النموذج add icon to title bar for userform إضافة أيقونة للنموذج في شريط المهام add icon to userform to taskbar تصدير موديول export module استيراد موديول import moduleأي استفسار لا تتردد في كتابة تعليق ادعمنا ب لايك كومنت شير ولا تنسوني من صالح دعائكم
  22. أ / محمد صالح
    مشكور أخي حمادة تجميعة رائعة
  23. أ / محمد صالح
    بارك الله لك أستاذ محمد وفقنا الله وإياكم لكل خير
  24. أ / محمد صالح
    هي فعلا ضمن إكسل ٢٠١٠ و ١٣ و ١٦ وإذا لم تجدها ينبغي عمل إصلاح repair الأوفيس أو إلغاء تثبيته ثم تثبيته مرة أخرى وفقكم الله
  25. أ / محمد صالح
    ما شاء الله رائع أستاذ محمد كل عام وانت بخير وسعاده ورضا
×
×
  • اضف...

Important Information

  I accept