إبراهيم محمد

الاخ العزيز / اسلام السيد مرفق نسختين من البرنامج باصدارى 2003 و 2007 وتم عمل تعديل ظهور زر تغيير كلمه السر للمستخدمين من الخارج كما طلبت صلاحيات المستخدمين - اصدار 2 -5-2003.rar صلاحيات المستخدمين - اصدار 2 -5-2007.rar

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

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

الاخ العزيز / new4a خالص الشكر لمرورك الكريم ولكن الساعه التى ارفقتها فى مشاركتك هى من النوع فلاش بامتداد swf ولم اتمكن من تشغيلها ولكنى اطلب تعديل كود الساعه التى يتم انشائها بكود الاكسيل دون الاستعانه ببرامج اخرى تقبل تحياتي وتقديري

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

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

السلام عليكم ورحمه الله وبركاته الاخ الفاضل / اسلام السيد مرفق بعض التعديلات فى البرنامج حسب ما فهمت من طلبك تم تغير المسميات فى الشاشه الرئيسيه الى الانجليزي تم جعل كلمات السر الخاصه باظهار القوائم او حمايه المستند و نموذج اظهار كلمات السر للمستخدمين هى نفسها كلمه السر الخاصه بالادمن وبالتالى عند تغيرك الباسورد الخاصه بك سيتغير كل شىء وتصبح متجددة واى تعديل ستجدني فى الخدمه ان شاء الله صلاحيات المستخدمين - اصدار 2 -4.rar

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

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

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

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

الاستاذ الفاضل / رجب جاويش ما شاء الله عليك وفى اكوادك الرائعه بارك الله فيك وزادك الله من علمه

بارك الله فيك الاخ العزيز اسلام واشكرك على مشاعرك الطيبه

صلاحيات المستخدمين - -2اصدار 2.rar الاخ العزيز اسلام السيد مرفق البرنامج بعد تعديل الاسماء كما طلبت وباقى الشرح ستجدة فى الرد على رسالتك الخاصه واتمنى ان اكون وفقت فى تلبيه طلبك واى استفسار ستجدني فى الخدمه ان شاء الله

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

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

برجاء من الاساتذة الافاضل التكرم بشرح هذا الكود العبقري فى كيفيه تحويل المعادلات الى اكواد مع توضيح كيفيه التعديل عليه ليتاسب مع اى ملف واى معادله ويفينى فى اساتذة هذا المنتدي فى العطاء وبذل العلم لنفع الجميع بارك الله لكم ودائما نتعلم منكم المزيد والمزيد وجعلكم الله نورا يهتدى به فى دروب العلم Option Explicit Sub kh_Copy_Formula() On Error GoTo kh_Err kh_Application False '============================================= kh_cFormula Range("الاخطاء!$I$1:$I$1"), 3, 3900 '"kh_cFormula Range("ورقة2!$D$4:$G$4"), 10, 44 'kh_cFormula Range("ورقة3!$D$5:$G$5"), 11, 20 '============================================= kh_Err: kh_Application True If Err Then MsgBox "Err.Number : " & Err.Number Err.Clear Else: MsgBox " تم نسخ المعادلات بنجاح", vbMsgBoxRight, "الحمدلله" End If End Sub ' MyRng : الصف المخفي الذي يحوي المعادلات ملحوق باسم الورقة ' iRow : اول صف للبيانات ' Lastrow : آخر صف للبيانات Sub kh_cFormula(MyRng As Range, iRow As Integer, Lastrow As Long) Dim Col As Range Dim R As Long '======================== For Each Col In MyRng.Cells If Col.HasFormula Then For R = iRow To Lastrow With MyRng.Worksheet .Cells(R, Col.Column).FormulaR1C1 = Col.FormulaR1C1 .Cells(R, Col.Column).Value = .Cells(R, Col.Column) End With Next R End If Next '======================== Set Col = Nothing End Sub Sub kh_Application(ibol As Boolean) With Application .ScreenUpdating = ibol .Calculation = IIf(ibol, -4105, -4135) .EnableEvents = ibol End With End Sub

-صلاحيات المستخدمين - الاصدار 2-1.rar وعلى العموم الاخ العزيز يونس / م مرفق لك نسخه تم التحكم فيها فى ظهور الورقه الاولى للمستخدم الذى ترغبه حيث انها الان تظهر ضمن نموذج اعطاء الصلاحيات وبهذة الطريقه تستطيع ان تجعلها تظهر لمن ترغب فقط وتخفيها عن الاخر فهل هذا هو ما قصدته ؟

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

صلاحيات المستخدمين - الاصدار 2.rar الاخ الفاضل / يونس م معذرة عن التاخير فى الرد لظروف العمل لدى فان دخولى على المنتدي كان قليل فى الايام الماضيه وهذا هو المرفق بعد ايقاف خاصيه اخفاء اشرطه الادوات و زاله الازرار التى لا ترغب فيها واى تعديل نحن حاضرين

COUNTIFS-1.rar تفضل اخي المرفق وان شاء الله يكون به ما تريد

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

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

الاخ الفاضل / ابو محمد اشرف بالنسبه لداله countif فانها تعمل على اصدار 2003 اما السؤال كان على داله countifs وهى مستحدثه فى اصدار 2007 والفرق بينهما ان الاولى لا تاخذ اكثر من متغير واحد اما الثانيه فانها تصل الى 128 متغير

بالنسبه لاستخراج العشرة الاوائل يرجى مراجعه هذا الرابط ففيه شرح للموضوع http://www.officena.net/ib/index.php?showtopic=38931 وبالنسبه لداله countifs فحسب علمي انها قد بداءات من اصدار 2007 وما فوق