saad abed

اخوانى بعد اذن استاذى عبدالله المجرب واستاذى جمال الفار اقدم دالة هى من اعمال عالمنا خبور خير ( نسال الله له السلامة من كل مكروه) Option Explicit ' ÈÓã Çááå ÇáÑÍãä ÇáÑÍíã " ' ********************* " ' ÏÇáÉ ÇÓÊÎÑÇÌ ÇáäÕ Çæ ÇáÇÑÞÇã " '==============================================" ' False = ãåãá Çæ Kh_Number ÇÐÇ ßÇä " ' ÊÞæã ÈÇÓÊÎÑÇÌ ÇáäÕ " ' True = Kh_Number ÇÐÇ ßÇä " ' ÊÞæã ÈÇÓÊÎÑÇÌ ÇáÇÑÞÇã " '==============================================" '----------------------------------------------------------------- Function Kh_Replace_Text(ByVal Kh_Sub As String, Optional Kh_Number As Boolean) Dim Num As Byte, C As Integer Dim Sn As String, Re As String, Md As String Sn = Trim(Kh_Sub) For Num = 0 To 9 Sn = Replace(Sn, Num, "") Next Num If Kh_Number Then Re = Trim(Kh_Sub) Do While C < Len(Trim(Sn)) C = C + 1 Md = Mid(Sn, C, 1) Re = Replace(Re, Md, "") Loop Kh_Replace_Text = CDbl(Re) Else Kh_Replace_Text = Trim(Sn) End If End Function الفــــــار.rar

اللهم امين اللهم امين اللهم امين سعد عابد

اخى وصديقى جمال الفار اشتقنا اليك والى مشاركاتك القيمة وفقك الله وفرج الله همك امين سعد عابد

اخى ابوالحارث اذكرك ونفسى ان البقاء لله وحده وان الدنيا دار ممر وليست دار مقر فل تقل ان لله وان اليه راجعون نسأل الله ان يجعل مسواها الجنة مع النبيين والصديقين وحسن اولئك رفيقا اللهم امين اخوك سعد عابد

اخى الحسامى التنسيقات ممتازة بارك الله فيك اعزكم الله وجزاك الله كل خير سعد عابد

اخوانى عبدالله المجرب فعلا التواجد فى المنتدى يكسب مهارات كثيره وادخل مع كل التخصصات المحاسبين المدرسين المهندسين الكل يتحدثون لغة الاكسيل حسب احتياجاته ابو عمر حدد اين انت من الاكسيل مبتدئ متوسط جيد ثم شارك هذا المنتدى جامعة الاوفيس بحق وفقكم الله تحياتى سعد عابد

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

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

اخى nader شرفنا بمروركم وتعديلكم على الكود شكرا لك اخى المهندس دغيدى مروركم الكريم شرف كبير تحياتى سعد عابد

اخى عماد الحسامى عندما وجدت كود يصنع التاريخ الميلادى ظننت انها غريبه فوجدت عملك اقولها بدون مجامله اكثر من رائع بل تحفة فنية واكواد وافكار عربية بحب كل شئ عربى نفخر بوجودك بيننا يا مدرسة الاكواد يا حسامى اكثر من الكتابة لانك ما شاء الله موهوب لا تدفن هذه الموهبه اخوك سعد عابد

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

اخى الحسامى واخى بن عليه و اخى احمد زمان جزاكم الله خيرا ابداعات نشكركم عليها سعد عابد

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

اخى الجزيرة شكرا لكم مروركم اسعدنى بارك الله فيك سعد عابد

اخى احمد زمان اشكر لك مرورك وياريت يتعرب واظن ان الكود واضح ويمكن التعديل عليه تحياتى سعد عابد

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

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

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

اخى فضل اطلع على المرفق ربما يكون قريب من الحل كتابة اسم المادة بجانب كلمة لجنة وكلمة احتياطى.rar

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

اخى لعلك تقصد التعامل مع الجداول المحوارية pivot table اليك هذا الرابط يمكن تجد المطلوب http://www.officena.net/ib/index.php?showtopic=37742

اخى الغالى والعزيز جدا احمد فضيلة ( هانكوك) وحشنا جدا وقد تاخرت فى الرد لكى لا اكرر الكلمات فوجدت احبابى سبقونى وقد عبروا بكل واحلى الكلمات جزاك الله خيرا وبارك فيك اخوك سعد عابد

اخى احمد زمان وصلت الفكره يا فنان وتم تنفيذها والكود سريع ما شاء الله بارك الله فيك واصلح لك بالك واصلح الله لك دنياك واخراك وشكرا لك على الرد السريع اخوك سعد عابد

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

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