معتصم محمد

لا أدري استاذ ياسر قد يكون ذلك بسبب احد الإختيارات في الملف الشخصي حاولت البحث عن أحد الإختيارات في الملف الشخصي ولم استطع ايجاد شئ عموماً طلب حضرتك شرف لي

الدالة SYD - حساب قسط الإهلاك بطريقة مجموع السنوات

الدالة SYD - حساب قسط الإهلاك بطريقة مجموع السنوات

شرح للدالة SLN المسئولة عن حساب قسط الإهلاك بطريقة القسط الثابت

تدعيماً للموضوع شرح للدالة SLN المسئولة عن حساب قسط الإهلاك بطريقة القسط الثابت

في الملف طريقتان بالمعادلات تؤدي الوظيفة المطلوبة Book1.rar

شكراً للأستاذ محمودج على التوضيح

اتمنى توضيح المقصود بصفوف وهمية

الاستاذ / عبدالله عمل رائع الأستاذ / عادل شكراً على تكملة الأوامر بارك الله بكم جميعاً

اعتذر عن عدم ارفاق الملف لظروف الإنترنت الأستاذ / محمود بالنسبة للكود أحب ان اشير الى اننا نرغب في الفرز تنازلياً لذلك يجب تعديل هذا الجزء من Order1:=xlِِِِِِِAscending الى Order1:=xlDescending و بعد إذنك لي سؤال في الكود ما هي طريقة عمل هذا الجزء Key1:=Cells(5, Target.Column) الملف بعد الغاء الدمج.rar

الأستاذ / جمال .. نحاول فقط ان نضيف شئ لهذا الصرح الكبير الأستاذ / ياسر .. شكراً على الكلام الطيب الأستذا / نادر .. اللهم آمين شكراً للجميع على هذا التفاعل

سبب عدم الفرز هو وجود خلايا مدمجة وخاصة الصفوف الثلاثة الأولى عليك بإزالة الدمج نهائياً من الجدول وإعادة ضبط توزيع البيانات خاصة درجة الإمتحان العظمى (يمكن وضعها أعلى صف المواد) وإضافة صف خالي ثم تقوم بعملية الفرز بشكل عادي شيت 2 في الملف المرفق أو يمكنك إستخدام الحل الموضح بشيت 1 بالملف المرفق بالتوفيق بإذن الله

شكراً للأستاذ / ياسر على الملف

الأستاذ / محمود الأستاذ / كيماس شكراً على مروركم الكريم

الاستاذ / ياسر شكراً على الملف الأكثر من رائع جاري المطالعة

الأستاذ / محمود لابد من إرفاق الملف لفهم طبيعة المعادلة وما هي المدخلات الخاصة بها

جزا الله خيراً على هذه الملفات استاذ / عبدالله وجعلها في ميزان حسناتك ويسر الله لك الأمور وابعد عنك الهم والحزن

شرح للدالة VLOOKUP

بعد إذن الأستاذ / هشام يمكننا إستخدام الكود التالي Sub AddText() Dim rng As Range Dim StartText As String, EndText As String StartText = InputBox("أدخل النص الذي تريد إضافته في بداية الخلية") EndText = InputBox("أدخل النص الذي تريد إضافته في نهاية الخلية") For Each rng In Selection.Cells rng.Value = StartText & rng.Value & EndText Next rng End Sub بحيث يتم تحديد الخلايا التي ترغب في إضافة نص إليها ومن ثم تنفيذ الكود من خلال الإختصار alt+f8 وإختيار الكود addtext

حدد الخلية التي بها المعادلة ثم عدل تنسيقها لتحتوي على تنسيق التاريخ لان القيمة التي ذكرتها 40735 تعادل تاريخ اليوم 10/ 7/ 2011 لتعديل تنسيق الخلية لتصبح بتنسيق التاريخ تابع ما قاله الستاذ / القومي

الأستاذ / ماهر مرحباً بك في منتديات اوفيسنا تفضل المعادالة التالية =IF(A1<>"";TODAY();"")

الأستاذ / عبدالله شكراً على هذا الكود تم إعداد شرح فيديو لكيفية إستخدام الدالة

بسم الله الرحمن الرحيم الإخوة الأعزاء السلام عليكم ورحمة الله وبركاته إن الرقم القومي المصري يشتمل في طياته على العديد من البيانات الخاصة بالفرد هذه البيانات لا نستطيع الوصول إليها، لكن في ظل التعليمات الخاصة بمصلحة الأحوال المدنية التي وضحت لنا بعض النصائح في إستخراج البيانات من الرقم القومي مثل نوع الفرد ( ذكر ، انثى) تاريخ الميلاد محل الميلاد تحديد نوع البيانات و الحد الأقصى لمحتويات الخلية تحديد نوع الفرد - معادلة تحديد تاريخ الميلاد - معادلة تحديد محل الميلاد - معادلة تحديد النوع و تاريخ الميلاد ومحل الميلاد - كود - دالة مستحدثة UDF الرقم القومي نهائي.rar تحديد نوع البيانات و الحد الأقصى لمحتويات الخلية تحديد نوع الفرد - معادلة تحديد تاريخ الميلاد - معادلة تحديد محل الميلاد - معادلة تحديد النوع و تاريخ الميلاد ومحل الميلاد - كود - دالة مستحدثة UDF رابط موضوع الأستاذ / خبور

الأستاذ / هشام يمكننا كذلك إستخدام المعادلة التلاية في شرط التحقق =COUNTIF(B:B;B2)=1

الأستاذ : هشام شكراً على التشجيع فقط احب ان اشير بقصدي اول كود اكتبه اي اول مشكلة اجدها واقوم بكتابة كود لها من البداية ثم يعمل الكود بفضل الله لكنني احاول التعلم والإستفادة من امكانية استخدام الأكواد في الإكسل لانها تعطي مرونة اكبر للشيت