عبدالله باقشير

السلام عيكم في كل الاوراق ما عدى الرئيسية من زر ( إظهار/إخفاء)

السلام عليكم إن شاء الله

السلام عليكم الاخ ناصر ----------------------حفظه الله الاسم التالي في الخلية المشار عليها في الدالة : جمال عبد الناصر خبور خير عند استخدامك الدالة : =Father_Name(B9;3) نتيجة الدالة :خبور خير في المرفق امثله لذلك fname2.rar

الاخ قصي عفوا لم انتبه لسؤالك والرد اصلا موجود : اذهب الى النطاق البيانات بعد آخر صف الصق ما تريده وعدل في مدى النطاق حسب الصفوف الجديدة

السلام عليكم الاخ علي ____________شكرا جزيلا الاخ خليلي سؤالك غير مفهوم لدي الملف مفتوح بدون اي امانات

السلام عليكم اخي ابو اسامة --------------------حفظه الله شكرا جزيلا ممكن تضيف المعيار بمثل المعايير الموجودة في الكود Mid(KhString, 1, 5) = "عبيد " Or _ ==================================== الاخ / قصي --------------------حفظه الله الاخ / محمدي عبد السميع --------------------حفظه الله الاخ / masrawy--------------------حفظه الله الاخ / ايمن --------------------حفظه الله تقبلوا شكري وتقديري

السلام عليكم الاخ/ ahh الاخ / محمدي عبد السميع الاخ /ابو اسامة الاخ /اياد جمعة الاخ /قصي الاخ /هشام الاخ / stiff الاخ /شرنقة الاخ /احمد يعقوب الاخ /هادي سالم الاخ /المعلم خالد الاخ /ابو عبدالله اكسيلجي الاخ /ناصر حفظهم الله جميعا تقبلوا شكري وامتناني ======================= الاخ /ابو اسامة هو قبل ان تضيف كلمة جديدة ستبحث عنها في القاموس وعندها ستعرف انها غير موجودة وستضيفها حينها بالنسبة للبرنامج يعطيك المجال بالاضافة حتى لو كانت مكررة ولكن عند الحذف لا يحذف الا المؤشر عليها في اللست لان معيار الحذف ياخذ باللغتين شكرا جزيلا ========================

السلام عليكم لن اتكلم كثيرا ولكن يجب ان اذكر التالي: كلمات القاموس الحالية منقول من المنتدى وباستطاعتكم اضافة ما تريدونه من كلمات بالنسخ واللصق في الملف وتغيير مدى النطاق المسمى (البيانات) هنا يتواجد معنا الاستاذ القدير /ابو اسامة العينبوسي في كود تغيير اللغة فكرة الاضافة والتعديل والحذف والاستماع الاستاذ القدير / محمدي عبد السميع فكرة فورم الخروج (منتديات اهلا عرب) تفضلوا _____________.rar

السلام عليكم جمعة مباركة دالة استخراج اسم ولي الامر الجديدة ================== ' بسم الله الرحمن الرحيم " '======================================" ' دالة استخراج اسم ولي الأمر " '======================================" 'تلقائية الاستخدام : تقوم بإستخراج الاسم " ' تلقائياً حسب معايير معرفة لديها " '======================================" 'بالإختيار : تقوم بإستخراج الاسم " ' رقما يحدد KhIndex حسب التعيين في " ' ( بعد كم فراغ يستخرج الاسم المطلوب ؟ )" '======================================" Function Father_Name(Name As Variant, Optional KhIndex) As Variant Dim KhString, SearchChar, KhMyNo, KhMyNo1 Dim KhMyLen As Integer KhString = Trim(Name.Value) KhMyLen = Len(KhString) SearchChar = " " If InStr(1, KhString, SearchChar, 1) = 0 Then Father_Name = "": GoTo 3 If Not IsError(KhIndex) Then KhMyNo = 1 For R = 2 To KhIndex KhMyNo1 = InStr(KhMyNo, KhString, SearchChar, 1) + 1 KhMyNo = KhMyNo1 Next KhMyNo1 = InStr(KhMyNo, KhString, SearchChar, 1) + 1 Father_Name = Mid(KhString, KhMyNo1, KhMyLen) Else KhMyNo = InStr(1, KhString, SearchChar, 1) + 1 KhMyNo1 = InStr(KhMyNo, KhString, SearchChar, 1) + 1 If Mid(KhString, 1, 4) = "عبد " Or _ Mid(KhString, 1, 4) = "أبو " Or _ Mid(KhString, 1, 4) = "ابو " Or _ Mid(KhString, KhMyNo, 5) = "الله " Or _ Mid(KhString, KhMyNo, 6) = "الدين " Then Father_Name = Mid(KhString, KhMyNo1, KhMyLen) Else Father_Name = Mid(KhString, KhMyNo, KhMyLen) End If End If 3 End Function fname2.rar

السلام عليكم اخي احمد يعقوب اخي BU3 انتما الكرماء بالرد الكريم ================ اخي MAS الملف الاخر فيه ما تصبوا اليه من طلبات

السلام عليكم اخي الخضر _--------------_ حفظه الله اخي اعمل خطوة عملية و ارسل ملف حتى تتم المناقشة و بلاش من الكلام الذي لا يجيب ولا يودي فالرابط الذي بيننا حب في الله فلا تدنسه باي ظنون مش حلوة اعمل ملف مزبط فيه شرح مفصل مع بعض الامثلة علشان تحرك الموضوع

السلام عليكم تفضل المرفق book18.rar

السلام عليكم تفضل الملف خاصتك اما الملف الاخر المطور متبقي بعض المراجعات ثم ساضعه في مشاركة جديدة ___________2_________.rar

السلام عليكم اخي قصي ما طلبات حضرتك؟؟؟؟؟؟؟؟

السلام عليكم انا شغال على طلبك مع ادخال تحسينات جديدة للملف

السلام عليكم هذا حل آخر بدالة: SUMPRODUCT ========== =SUMPRODUCT((INDEX(c_rang;1;0)=$A$1)*(INDEX(c_rang;0;15)=B3);c_rang) وهذه تعليمات الدالة: ضرب مكونات مناظرة في الصفائف المذكورة، وإرجاع مجموع هذه النواتج. بناء الجملة SUMPRODUCT(array1,array2,array3, ...) ...,Array1,array2,array3 (صفيف 1، صفيف 2، صفيف 3،...) الصفائف من 2 إلى 30 التي ترغب في ضرب مكوناتها ثم جمعها. ملاحظات يجب أن يكون لوسائط الصفيف نفس الأبعاد. إذا لم تكن كذلك، تقوم SUMPRODUCT بإرجاع قيمة الخطأ !VALUE#. تعامل SUMPRODUCT إدخالات الصفيف غير الرقمية كما لو كانت أصفار. ============================================================ تفضل المرفق Wages1.rar

السلام عليكم اخي نزار سليمان -----------------------------حفظه الله جزاك الله خيرا على الدعاء والتشجيع المثمر الذي تطيب له النفس اخي فضلا منك لا امرا عليك مراسلتي على بريدي الملحق بتوقيعي لمعرفة بريد حضرتك ============================================ ============================================ اليك شرح موجز: =========================================== ={SUM(IF(INDEX(c_rang;1;0)<>$A$1;"";IF(INDEX(c_rang;0;15)<>B3;"";c_rang)))} INDEX(c_rang;1;0) هذا الصف اللي فيه التواريخ في النطاق المسمى c_rang $A$1 ودي الخلية اللي فيها التاريخ المراد ( مرجع مطلق ) هذا الشق من المعادلة معناه: اذا كان التاريخ في الصف المحدد في النطاق لا يساوي التاريخ في الخلية a1 ( لا نريده) ================================================ INDEX(c_rang;0;15)<>B3 هذا العمود اللي فيه اسماء المندوبين في النطاق المسمى c_rang B3 ودي الخلية اللي فيها المندوب المراد ( مرجع نسبي) هذا الشق من المعادلة معناه: اذا كان اسم المندوب في العمود المحدد في النطاق لا يساوي اسم المندوب في الخلية b3 ( لا نريده) ================================================= الخلاصة من صيغة الصفيف: جمع الخارج عن الشروط اعلاه في النطاق =================================================

السلام عليكم اخي محمد عسكر --------------------حفظه الله جزاك الله خيرا و بارك الله فيك سرورنا بوجودك معنا لا تحرمنا اياه

السلام عليكم اقتباس من الموضوع نفسه

السلام عليكم اشكرك اخي هشام

السلام عليكم اخي احمد يعقوب اخي الجزيرة تقبلوا شكري وتقديري

السلام عليكم بارك الله فيك اخي هشام السؤال الاول باستخدام الدالة: CEILING =CEILING(A14;0.05) لو فرضنا ان الرقم في الخلية A14 مثل ما اورد اخي هشام في المرفق بالماكرو ========================= السؤال الثاني استخدم الدالة: =TRUNC(A14;2) لو فرضنا ان الرقم في الخلية A14 ================================================== TRUNC اقتصاص رقم إلى عدد صحيح بإزالة الجزء الكسري للرقم. بناء الجملة TRUNC(number,num_digits) Number (الرقم) الرقم الذي ترغب في اقتصاصه. Num_digits (عدد الأرقام) رقم يحدد دقة الاقتصاص. تساوي القيمة الافتراضية لـ num_digits صفراً. ملاحظة تتشابه كلاً من TRUNC وINT في أن كل منهما يقوم بإرجاع عددين صحيحين. تقوم TRUNC بإزالة الجزء الكسري للرقم. تقوم INT بتقريب الرقم إلى أقرب عدد صحيح استناداً إلى قيمة الجزء الكسري للرقم. تختلف INT و TRUNC فقط عند استخدام أرقام سالبة: تقوم TRUNC(-4.3) بإرجاع -4، ولكن تقوم INT(-4.3) بإرجاع -5 لأن -5 هو الرقم الأدنى. ================================================================

السلام عليكم استخدم صيغة الصفيف التالية: ={SUM(IF(INDEX(c_rang;1;0)<>$A$1;"";IF(INDEX(c_rang;0;15)<>B3;"";c_rang)))} ويجب ان تعرف كيفية استخدام صيغة صفيف تصحيح الخطأ #VALUE! حدد الخلية أو نطاق الخلايا الذي يتضمن صيغة الصفيف، واضغط F2 لتحرير الصيغة، ثم اضغط CTRL+SHIFT+ENTER. Wages.rar

السلام عليكم من اجل يتم تغيير الورقة حسب التغييرات في الخلية G2 قمنا باثبات مرجع الخلية بنص باستخدام ( CONCATENATE("'";aa!$G$2;"'!";"B";6;":";"J";35 للمرجع الذي تريد استخراج البيانات منه ثم استخدمنا دالة (INDIRECT) لتحويله الى مرجع مرة اخرى انظر الى التعليمات لهذه الدالة: ================= INDIRECT ========= إرجاع المرجع المحدد بواسطة سلسلة نصية. يتم تقييم المراجع مباشرةً لعرض محتوياتها. استخدم INDIRECT عندما تريد تغيير مرجع إلى خلية داخل صيغة دون تغيير الصيغة نفسها. بناء الجملة INDIRECT(ref_text,a1) Ref_text (مرجع النص) هو مرجع لخلية تحتوي على مرجع نمط A1 أو مرجع نمط R1C1 أو اسم معرّف كمرجع أو مرجع لخلية كسلسلة نصية. إذا لم تكن ref_text مرجع خلية صالح، تقوم INDIRECT بإرجاع قيمة الخطأ #REF!. إذا أشارت ref_text لمصنف آخر (مرجع خارجي)، يجب أن يكون المصنف الآخر مفتوحاً. إذا لم يكن المصنف المصدر مفتوحاً، تقوم INDIRECT بإرجاع قيمة الخطأ #REF!. A1 هو قيمة منطقية تُحدد نوع المرجع الذى تحتويه الخلية ref_text. إذا كانت a1 تساوي TRUE أو تم حذفها، يتم تفسير ref_text كمرجع نمط A1. إذا كانت a1 تساوي FALSE، يتم تفسير ref_text كمرجع نمط R1C1. ========================================

السلام عليكم البرنامج فيه مزود بكود الغاء حماية ============================= اذهب الى القائمة ادوات / ماكرو / وحدات ماكرو ستظهر لك قائمة بالاكواد الموجودة ابحث على كود اسمه الغاء حماية / اشر عليه واضغط تشغيل =============================