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

Ali Mohamed Ali

المشرفين السابقين
  • Posts

    11,621
  • تاريخ الانضمام

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

  • Days Won

    287

كل منشورات العضو Ali Mohamed Ali

  1. السلام عليكم أخى عادل رجاءا لا تطرح نفس السؤال فى اكثر من مشاركة فهذا يجعل الأخوة تتغاضى عن مساعدتك حاول أن تركز فى مشاركة واحدة ولا تلح بالسؤال وكل ماعليك أن تكتب للرفع لأنه يجوز للإخوة أن ليس لديهم وقت كافى او منشغلين فى أعمالهم -فلا يتقاضوا أجرا هنا فى ردهم على التساؤلات فلا تستعجلهم- فهذه الأعمال فقط لوجه الله تعالى بارك الله فيك وتقبل منك سائر أعمالك
  2. السلام عليكم أخى جرح- هل هذا طلبك ؟ لقد تم بوضع هذا الكود بعد عمل الكمبوبوكس Private Sub ComboBox1_Change() Dim arr As Variant, i As Long Dim Sh As Worksheet For Each Sh In Worksheets If ComboBox1.Value = Sh.Name Then Sh.Activate End If Next End Sub Private Sub ComboBox1_Click() End Sub Private Sub ComboBox1_GotFocus() Dim arr As Variant, i As Long Dim Sh As Worksheet For Each Sh In Worksheets If Sh.Name <> "TOC" Then i = i + 1 ReDim arr(i, 1) arr(i, 1) = Sh.Name ComboBox1.AddItem arr(i, 1) End If Next End Sub
  3. السلام عليكم أخى محمد أما باقى المعادلات من غير if هل أدت معك الغرض ؟ أما بالنسبة لمعادلة if فهى معادلة صفيف -أى بعد كتابتها لابد من الضغط على Ctrl+Shift+Enter وبارك الله فيكم
  4. السلام عليكم أهلا بك صديق وزميل عزيز فى منتدانا الكريم -ممكن تجرب هذا طلب مساعدة في ترحيل بشرط.xlsm
  5. شكرا لك أستاذ عادل وبارك الله فيك هل هذا الحل أدى لك الغرض ؟
  6. السلام عليكم أخى هو المفروض من الول أن ترسل ملف ليتم التعامله معه ولكنى عملت لك ملف أتمنى أن يفى بالغرض ايجاد أصغر رقم فى عدة خلايا متفرقة.xlsx
  7. السلام عليكم تحياتى لأستاذى ومعلمى زيزو دائما سباق للخير ان شاء الله ولإثراء الموضوع اليك هذا الملف ادراج تاريخ.xlsm
  8. السلام عليكم بعد اذن أستاذى سليم ممكن أخ عادل تجرب هذا مطلوب داله حساب مكافأة ترك الخدمة طبقا لما يلى - Copy.xlsx
  9. وعليكم السلام ممكن تجرب البرنامج المرفوع هنا : https://up.top4top.net/downloadf-801soio31-rar.html
  10. بارك الله فيك أستاذى وجزيت خيرا جربت ولم يضبط معى
  11. وعليكم السلام أخى تفضل لقد تم التعديل Hotel Calculate.xlsm
  12. السلام عليكم لقد تم الرد وارسال الحل على مشاركتك الأخرى
  13. وأخيرا وهذا هو التعديل النهائى كما تريد ذر منفرد لإخفاء الصفوف واخر لإخفاء الأعمدة والأخير لإظهار الأعمدة والصفوف معا تقبل تحياتى جزاك الله خيرا وبارك الله فيك اخفاء الصفوف والأعمدة ثم إظهارها.xlsm
  14. تفضل أخى وقد تم ايضا اخفاء الصفوف الفارغة بمجرد ضغط على الشيت أو كتابة أى شيى ثم انتر سوف تختفى الصفوف الفارغة -وهى مختفية الأن فى الشيت المرسل لك وهناك ايضا طريقة بدون أكواد ولكن لحذف الصفوف والأعمدة الفارغة وهى : أولاً تقوم بتحديد نطاق خلايا الجدول التى تريد أن تحذف منها الصفوف والأعمدة الفارغة والباقى فى الشرح مع الصور المرفقة New ظˆط±ظ‚ط© ط¹ظ…ظ„ Microsoft Excel.xlsm الخطوة الأولى تذهب الى علامة النظارة وتختار.docx
×
×
  • اضف...

Important Information