نجوم المشاركات

السلام عليكم ورحمة وبركاته بناء علي طلب اخ فاضل في موضوع ProgressBar Control اضافة شاشة دخول فضلت ان تكون في موضوع منفصل لتعميم الفائدة وسهولة البحث الرقم السري للدخول 111 تقبلوا تحياتي ProgressBarControl-V2.rar

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

اخواني واخواتي الأعزاء السلام عليكم ورحمة الله ممكن ان يكون قد تعودنا علي شكل ProgressBar Control لكن يمكن اجراء بعض التحسينات لاضافة مظهر لها كالتالي واترككم للتجربة مع تحياتي ProgressBarControl.rar

السلام عليكم ورحمة الله وبركاته بعد الحمد لله والصلاة والسلام على رسول الله وبعد احب ان اهدي هذا العمل _ وهو عملي الثالث _ لعمالقة منتدى اوفيسنا والذين طالما تعلمت منهم الكثير وبعتذر لعدم تخصيص الاهداء لاحد منهم وكلهم يستحقوا الذكر والثناء الجميل ولكن حتي لا انسى احد احب ان اجعل هذا الاهداء عام وباختصار هذا هو عملي الثالث بعد العمل الاول وهو شيت كنترول الصف الثاني الثانوي الصناعي انتظام [نجارة اساس... والعمل الثاني وهو [2]شيت كنترول الصف الثاني الثانوي الصناعي انتظام [حاسب أل... وهو خاص بشيت كنترول الصف الأول و الثاني الثانوي الصناعي انتظام جميع التخصصات لعام 2013/2014 [ 14 مادة تضاف للمجموع ] + [ 2 مادة لا تضاف للمجموع ] وبإذن الله سيتم عمل شيت خاص بالــــ 16و13 مادة قريباً اهم الاضافات والمميزات لهذا العمل 1 ) هذه اهم ميزة توصلت اليها ولله الحمد وهي شيت واحد لجميع التخصصات حيث اضفت صفحة بيانات التخصص هذه الصفحة سنكتب فيها اسم التخصص والمواد والدرجات وستنتقل البيانات الى جميع الشيت في اماكنها 2 ) هذا العمل خاص بالمرحلتين الاولى والثانية 3 )حاولت اصلاح جميع الاخطاء التى كانت موجودة في الاصدارات السابقة 4 ) حذف بعض الصفحات والتى لم يكن لها اهمية والان اترككم للتصفح وانا في انتظار ارائكم والسلام عليكم ورحمة الله وبركاته للعلم جميع المعلومات عن هذه المرحلة وما يخصها من درجات والقرارات الوزارية ماخوذة من الاستاذ //ahmed alimer فله الشكر وعند وجود اي أخطاء ارجو الابلاغ لتعديلها والسلام عليكم ورحمة الله وبركاته شيت النقل للصنايع_كل التخصصات 14 مادة تضاف للمجموع + 2 مادة لا تضاف للمجموع_.rar

الأستاذ / sayedco السلام عليكم ورحمة الله وبركاته بعد إذن الأستاذ الفاضل / وليد فتحي جزاه الله خيراً على الحل الرائع ولإثراء الموضوع إليك طريقة سهلة في كتابة توقيت الحضور والإنصراف بتسيق رقم عشري وليس وقت ولكن عند حساب عدد الساعات والاضافي يكون التنسيق وقت وهذه الطريقة تعلمتها من الأستاذ الفاضل / محمود الأسيوطي جزاه الله خيراً وجعله في ميزان حسناته. Overtime1.rar

السلام عليكم ورحمة الله وبركاته بحب اشكر الجميع على الاسهامات واحب اشكر الاستاذ //mod71 على الملف المرفق الاكثر من رائع جعله الله في ميزان صاحبه ومن اهداه والان اترككم جميعا مع ما وعدتكم به واتمنى ان ينال اعجابكم شيت كنترول النقل(للتعليم الفني) صنايع [انتظام][جميع التخصصات 14 مادة +2 لا تضاف][الاصدار الأول] والسلام عليكم ورحمة الله وبركاته

السلام عليكم ورحمه الله وبركاته بسم الله الرحمن الرحيم وبه نستعين على كل شىء وقبل كل شىء اللهم صلى على سيدنا محمد صلى الله عليه وسلم الحمد لله الذى تتم به الصالحات ,,,, برنامج تحليل المصروفات ( اداريه - بيع وتوزيع - تشغيل ) صدقه جاريه على روح والدتى رحمها الله وهديه للمنتدى !! اليوم اقدم لكم برنامج تحليل المصروفات الذى يغى كل محاسب وخاصه من الجيل القديم عن الدفتر الـ 70000 خانه هههههههههههه الـ 36 خانه عمل ممل ان تكتب بالدفتر فكان من وجه نظرى هذا العمل واعلم انه لم يعد يعمل احد بالدفاتر منذ فتره فقد انقرضت مع ظهور الانظمه المحاسبيه التى لا حصر لها واسألكم الفاتحه لوالدتى وولدى رحمهما الله اللذان ستظل روحى معلقه بهما دائما حتى يلحقنى بهما الله فى الجنه وجميع اخواننا المسلمين وانتظر ارائكم واستفساراتكم تلميذكم واخيكم // محمود الاسيوطى ( ابو اياد ) برنامج تحليل المصروفات اوفيسنا.XLSB

اسم الملف: تحديث برنامج المرتبات المدرسى للسنة المالية الجديدة 2014/2014 مرسل الملف: مجاهد القوصى ارسل الملف في: 24 مارس 2014 تصنيف الملف: قسم الإكسيل برنامج المرتبات المدرسى للسنة المالية الجديدة 14/2015بعد تجربة البرنامج من قبل الزملاء الافاضل ذوى الخبرة فى تحرير المرتبات ارسلوا لى بعض الملاحظات التى تحتاجها بعض المدارس وتم التعديل على البرنامج ليناسب طلباتهم والملاحظات التى اضيفت كالتالى 1- السادة الاداريين والعمال الذين اخذوا حكما ب 83.33 % وبذلك يتغير لهم قيمة الحد الادنى وخاصة من على الدرجة الثالثة والثانية 2- تعديل صفحة المرايا للكشوف 3- بعض رؤوس الاعمدة حرة وليست محمية ليمكن للسادة محررى الماهيات ان يضيفوا عنوانا جديد ومن ثم يتغير كل الصفحات التابعة تلقائيا 4- اضافة الاعباء الوظيفية او الحد الادنى للمنتدبين هذا احدث التعليمات من الادارة 5- تحديث فى كسب العمل حيث يطبق على جميع العاملين بناء على تعليمات قسم الحسابات بالادارة 6 - بعض الواجهات الفنية المساعدة ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ بالاضافة الى السابق ذكره 1- سهل الاستخدام لاى مستخدم بسيط 2- كشوف اساسية وبنوك ... 3- يفى كل البيانات حتى لمربوط الدرجة 4- كشوف + المرايا لكل كشف 5- كشف يطبع A3 ليكون بالمدرسة عن المراجعة 6- استمارة ماهية لموظف واحد اللكترونية لا يتدخل فيها المحرر 7- كشف مفردات مرتب اللكترونية 8-طباعة تأمين ومعاشات 9- طباعة قصاقيص التى تحتاجها الكشوف 10 - كشف الاجور المتغيرة 11- كشف للاجازات مرضى عارضة اعتيادى هذا العمل نتاج مجهودات زملاء وتكملة لمسيرتهم التقدميه الاستاذ / عبدالراضى توفيق واهداء لاخى وصديقى احمد المعز الغائب الحاضر هذا رابط التحميل اخر اضغط هنا لتحميل هذا الملف

السلام عليكم و رحمة الله بلاد العرب اوطاني و كل العرب اخواني انا في تونس الخضرا اعيش بين اشطاني و في السوداني السمرا احيا بيـــــــن انيلاي و في مكة المكرمة اقيم شعائر ادياني و في بلاد الشام ارض انبيــــائي و في مصر المحروسة انعم بالأمــــاني بلد الامان و خير الأجناد إخواني هذا الموضوع لمعرفة الإمتداد الجغرافي للأخوة الأعضاء في هذا الموقع الحبيب؟ و لنتذكر دائماً قاعدة مهمة نحن أخوة في الدين قبل الإنتماء لأي دولة, و عقيدة الولاء و البراء توجب علينا تقديم الدين على أي شيء آخر . دمتم في حفظ الله

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

كثيرا يري كتب الكترونية ومجلات بطرق عرض مختلفة ويستخدم الكثير من البرامج لاتمام العمل ومنها البرامج البسيطة ومنها البرامج الاحترافية السؤال هل يمكن تطويع الخصائص المتقدمة للفورم ونقوم باخراج كامل لكتاب او مجلة عن طريق الاكسيل ونستغني عن البرامج الاخري الأجابة نعم نستطيع وبفكرة بسيطة جدا ان نخرج عمل بل يصل لعمل احترافي لاخراج كتاب او مجلة الكترونية باستخدام الـVBA اكسيل ويمكن ان نضيف له معاينة وتكبير وتصغير وطباعة وتصدير الي صورة وتصدير الي PDF وهايبر لينك مجرد البداية قمت بتطبيقها علي عجالة علي المجلة الشهرية العدد الاول - مارس 2014م لاوضح الفكرة ومضمونها وان شاء سنمضي في تنفيذها وتطويرها وعمل قوالب جاهزة تسهيلا للمستخدم واضافة المميزات الاخري من تصدير الي صورة او بي دي اف او طباعة والهايبر لينك واضافة فهرس وارتباطات تشعبية للموضوعات شرح بسيط للفورم واترككم للتجربة وفي انتظار مقترحاتكم لتطوير العمل ان شاء الله تعالي تقبلوا تحياتي مجلة اوفيسنا - مارس 2014.rar

ايهاب على حسن تفقيط .rar

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

السلام عليكم شاهد المرفق 2010 احصاء اسبوعي وشهري.rar

السلام عليكم شكرا لك لمجهودك اخى العزيز لو تكرمت توجد عندى مشكلة فى فتح الملف تصل قراءة فتح الملف الى 81% ولا يفتح الملف على اوفيس 2010 ولك جزيل الشكر

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

الأستاذ الفاضل / محمد أبو البراء السلام عليكم ورحمة الله وبركاته جزاك الله خيراً على هذا العمل الرائع ومجهود كبير جداً قمت به لذلك خرج بهذا الإبداع. جعله الله في ميزان حسناتك وزادك من فضله وعلمه. لك كل التحية والتقدير.

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

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

اخى احمد ان شاء الله فى الوقت القريب سوف يتم عمل المطلوب

كود إظهار الصفحة (X هو اسم الصفحة) SHEETS("X").VISIBLE=1 أ[ما كود إخفاء الصفحة فيوجد نوعان من الإخفاء أخفاء عادي SHEETS("X").VISIBLE=0 وإخفاء شديد SHEETS("X").VISIBLE=2 الإخفاء العادي تستطيع بعد فك حماية الصفحة ( ومن القائمة المختصرة ) تستطيع إظهارها أما الإخفاء الشديد فلا تستطيع إظهار الورقة إلا من محرر الفيجوال بيسك

فى المبيعات والمشتريات هيتم تكرار ادخال الصنف يعنى مثلا بعت يوم 1/1 1000 وحده من الصنف أ ويوم 2/1 2000 وحده من الصنف أ اما المخزن الصنف هيدخل مره واحده بس مش هيتغير الا العدد بس

اخى احمد انا اقصد هل سيتم تكرار كتابة الصنف اكثر من مره مثلا 101-----1/1/2014 101----10/2/2015 وهكذا ام سيكون كتابة الصنف تقتصر على مره واحده فقط

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

اخى ضاحى والله مش عارفين نقولك ايه دائما ما نقف وننحنى امام ابداعاتك بارك الله لنا فيك وذادك من فضله وعلمه

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

بارك الله فيك وجزاك خيرا

الأستاذ / zedasalem السلام عليكم ورحمة الله وبركاته هذا عمل الأستاذ الفاضل / محمد أبو البراء والله أعلم جزاه الله خيراً على مجهوده الكبير جداً أو صاحب هذا العمل جزاه الله خيراً وبعد إذنهم تم تعديل بعض الأعمدة وبعض الإضافات لسهولة العمل وتم التعديل على الوائل والإحصاء كما حضرتك طلبت والباقي له باسورد على ما أعتقد أنه تمام . أدعو الله أن أكون وفقت في هذا التعديل. تجارب 2014.rar

السلام عليكم جرب هذا ايضا اظنه اسرع من السابق Sub kh_Start() Dim Rng1 As Range, Rng2 As Range Dim Cel As Range, CelDelete As Range With Sheets("1") Set Rng1 = .Range("B3", .Range("B" & Rows.Count).End(xlUp)) End With With Sheets("2") Set Rng2 = .Range("B3", .Range("B" & Rows.Count).End(xlUp)) End With For Each Cel In Rng1 If WorksheetFunction.CountIf(Rng2, Cel) Then If CelDelete Is Nothing Then Set CelDelete = Cel Else Set CelDelete = Union(CelDelete, Cel) Else Sheets("2").Range("C" & Rows.Count).End(xlUp).Offset(1, 0).Value = Cel.Value End If Next If Not CelDelete Is Nothing Then CelDelete.EntireRow.Delete Set Rng1 = Nothing Set Rng2 = Nothing Set CelDelete = Nothing End Sub المرفق 2010 فزر المكرر.rar

تم تعديل المرفق اخواني الكرام حيث كان المرفق السابق خاص بالتاريخ فقط جرب واشعرنا بالنتائج Copy of New Microsoft Excel -ssWorksheet.rar

الله اعلم لايوجد عندي Excel 2013

السلام عليكم ورحمة الله أخي الكريم زكرياء، يمكن حل المسألة بكود ولكن كم من الأسماء ستضع في الكود؟ العملية ليست بهذه السهولة!!! قمت بالمقابل وكما اقترحت سابقا بإنشاء شيت سميته "أسماء وجنس" تضع فيه أسماء (الأسماء فقط دون اللقب) مع ذكر الجنس مقابل كل اسم، ثم في الورقة المعنية بالبيانات قمت بفصل اللقب عن الاسم في عمودين إضافيين وفي عمود الجنس وضعت معادلة تجلب جنس اسم التلميذ من ورقة "أسماء وجنس" باستعمال الدالتين INDEX و EQUIV (الدالة MATCH)... أرجو أن يكون هذا العمل تقريبا للفكرة المقترحة أعلاه.... أخوك بن علية المرفق : جدول تصفية المنح جمال_2014.rar

نتابع باقى الصور سنتابع

اخي الفاضل مجدي يونس

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

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

اخي الفاضل عادل ابوزيد

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

بارك الله فيك ابا الحسين موضوع جميل جداً وادعو جميع الاخوة للمشاركة