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

بالنسبة للصفوف نعم نفس الطريقة المتبعة تصلح للعدد الذى تريدة لكن ال ( check box ) لازم يتم رسمة وربطة بالخلية التى تريدها والله أعلم

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

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

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

السلام عليكم الاخ الحبيب / إبراهيم ابوليله بارك الله فيك عذرا اخي الكريم علي التأخر في الدخول للموضوع حيث كنت امر علي الموضوع فقط فوجدت طلباتك ولكني اعتقد انني قمت بالرد علي طلبك علي الرابط التالي بعنوان : خطأ فى استدعاء بيانات فاتوره http://www.officena.net/ib/index.php?showtopic=49712

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

بعد إذن أخى ( ABUMODE ) أنظر المرفق لعله المطلوب إستخراج 3.rar

هدية العام الهجري الجديد ******************************************* كود اضافة ازرار باسماء الشيتات في الصفحة الرئيسية وزر للرئيسية في كل شيت **************************************************************************** السلام عليكم هذا الموضوع مقدم هدية لاساتذة وقادة هذا الصرح العملاق وهو هدية خاصة ( بسيطة جدا جدا ) بمناسبة العام الهجري الجديد للاستاذ القدير العلامة الخبير عبد الله باقشير لأقدم له عرفانا بالجميل لبعض ما تعلمناه منه ونتعلمه دائما بارك الله فيه ... وجزاه الله عنا خيرا وارجو ان ينال الملف اعجابكم تقبلوا خالص تحياتي وكل عام وانتم بخير وسلام وعلي طاعة الله دائما اضافة ازرار باسماء الشيتات وزر للرئيسية في كل شيت.rar

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

الكل يعتقد أن المعادلة يمكن أن تكون أقل من الكود فى الإمكانيات ولكن لى وجهة نظر محتلفة وهذا هو الدليل من عجائب المعادلات.rar

الأستاذ الفاضل/ جمال الفار حمدا لله علي السلامة - عدت إلي منتداك والعود أحمد السيد العميد/ دغيدى جزاك الله خيرا والسلام عليكم ورحمة الله وبركاته

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

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

أليك أخى ماطلبت فصل أسم على عدد من الأعمدة.rar

السلام عليكم الدالة صحيحة المشكل في تنسيق رقم الحساب حيث انو في ملف منسق على انه عددي اما الاخر على انه نصي كما انه يوجد في ملف book1 اسماء كود السلف الخاص بها غير موجود وهو سبب ضهور تلك العلامة لكي تتخلص من علامة N/A# عليك بدالة IFERROR حيث يصبح الكود كاتالي =IFERROR(VLOOKUP($A2;[Book1.xlsx]سلف!$C$7:$E$3700;3;VRAI);"") ارجو ان يكون الشرح قد وصلك وهذا الملف مطبق عليه المعادلات Desktop.rar

الاخوة الكرام / قمت بتصميم قاعدة بيانات وانتهيت منها والحمد لله وهي تعمل على ويندوز اكس بي أوفيس 2003 و شاشة العرض كانت هي 1024 × 768 جميع شاشات النماذج عند الفتح تشغل الشاشة كاملة والحمد لله المشكلة عند تشغيل البرنامج على شاشة عرض مختلفة عن 1024 × 768 يظهر البرنامج مصغر بمعنى أن النموذج لا يشغل الشاشة كاملة على شاشة العرض فقد جربتها على ويندوز 7 تفتح القاعدة في وسط الشاشة والفراغ من الجانبين فهل يوجد كود أو طريقة معينة يعمل بها البرنامج على أي شاشة عرض ( 1024 × 768 ) وتشغل الشاشة كاملة بحيث تحول الشاشة الى العرض المناسب بمجرد فتح القاعدة وجزاكم الله خيرا

الاخ الكريم شاهد المرفق التالي ارجو ان يكون كما تريد طباعة1.rar

السلام عليكم الاخ الكريم / طلعت محمد حسن بارك الله فيك بالنسبة لجميع الاكواد المرسلة تفي بالغرض المطلوب منها دون حدوث اي مشاكل بما فيها الكود الموجود اصلا بملفك في حدث الزر 18 Private Sub CommandButton18_Click() ولكن هناك خطأ هو ما يجعل الفورم يتشنج والملف يخرج ... الخ هو انه بحذف القيمة المختارة تكون بياناتها مازالت في الفورم وبالتالي فان الفورم ( لايعرف ولا يدري ) من اين سيعرض هذه البيانات وبالتالي .. ( معدش فاهم يجيب منين البيانات ) ولكي يتم مفاداة ذلك يتم مسح بيانات الكومبوبكس مثلا او مسح بيانات الفورم قبل عملية المسح وذلك باضافة السطر البسيط ComboBox11 = "" ليصبح الكود في ملفك كالتالي مثلا Private Sub CommandButton18_Click() æÑÞÉ2.Activate If ComboBox11 = "" Then MsgBox "!íÌÈ ÅÏÎÇá / ÅÎÊíÇÑ ÑÞã ÇáÝÇÊæÑÉ ÃæáÇð", vbExclamation, "ÅÎÊíÇÑ ÎÇØÆ" Exit Sub End If Q = 0 XXX = 4 Do Until æÑÞÉ2.Cells(XXX, "A").Text = "" If Me.ComboBox11.Text = æÑÞÉ2.Cells(XXX, "A").Text Then Q = 1 kk = MsgBox("åá ÊÑíÏ ÇáÛÇÁ åÐÇ ÇáÇÓã¿", vbYesNo) If kk = vbYes Then '========================== ComboBox11 = "" '========================== ActiveCell.EntireRow.Delete Else MsgBox "!! áã íÊã ÇáÛÇÁ ÇáÇÓã" End If End If XXX = XXX + 1 Loop End Sub واليك الملف بالمرفقات بعد التعديل ان شاء الله به طلبك جزاك الله خيرا تصميم فاتورة11.rar

اخي الكريم هل يعمل معك الملف بشكل طبيعي من الاساس ولايحدث فيه اي اخطاء مثل ما حدث قبل وضع الكود او مع استخدام اكواد اخري ** ومرة اخري جرب الكود التالي في زر الحذف ( في نسخة من الملف الاساسي ) لعدم المساس به وابلاغي ما اذ تم الحذف ام لحين امكانية ارفاق اي ملفات Private Sub CommandButton1_Click() Dim i As Integer For i = 1 To 2000 If Val(tt1.Value) = Cells(i, 1) Then Cells(i, 1).Select sama = MsgBox("سيتم حذف والغاء الفاتورة !! هل انت متأكد من تنفيذ ذلك الاجراء ؟", vbYesNo) If sama = vbYes Then ActiveCell.EntireRow.Delete Else MsgBox "!! تم حذف الفاتورة بنجاح" End If End If Next End Sub

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

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

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

السلام عليكم الاخ الحبيب / إبراهيم ابوليله بارك الله فيك مرور طيب وكريم تقبل خالص تحياتي

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

الاخ الحبيب / قنديل الصياد مرور طيب وكريم من شخص كريم تقبل خالص تحياتي جزاك الله خيرا

جزاك الله خيرا

السلام عليكم الاخ الكريم / mabrouk1234 بارك الله فيك شاهد المرفق التالي تم تنفيذ ما طلبته فيه بوضع الاكواد رجاء تجربته .. واخباري بالنتيجة هل هو كما تريد ام ان هناك بعض التعديلات الاخري رمضان كريم جزاك الله خيرا سند قبض1 .rar

الاخ الكريم / الشيباني عذرا ع التأخير تفضل المرفق ان شاء الله به المطلوب واي تعديلات معك باذن الله +SAMA+إستدعاء فاتورة بيع-.rar

رمضـــان كـــريـــم

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

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

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

طريقة عمل فورم بحث واظهار النتائج في ليست بوكس وتعديل النتائج بتكستات بوكس !! خطوة خطوة السلام عليكم اساتذة المنتدي وخبراؤه الكبار الاخوة الافاضل (((( الدرس الثالث )))) نتعرف في هذا الدرس علي طريقة اظهار البيانات التي نحددها في الليست بوكس بعد البحث بالضغط عليها لتظهر في تكستات بوكس التعديل كما نريد ..... الخ وبالطبع مع شرح الكود المستخدم سطر سطر كما تعودنا دائما مع استخدام اسهل وابسط الاكواد لعمل المطلوب مرفق ملف اكسيل به الفورم والمثال الذي سنعمل عليه والكود المستخدم بالشرح وفي الدرس القادم سنتعرف ( باذن الله ) علي طريقة التعديل في التكستات بعد اختيار النتائج التي نقوم بتحديدها كما نريد وتسجيل التعديلات في قاعدة البيانات في الاكسيل لدينا ... اليكم اولا رابط تحميل مباشر للملف الفيديو ( رابط خارجي ) أضغط هنا لتحميل الملف والتالي شرح بفيديو مباشر من خلال هذا الصرح العملاق ( ويمكنكم ايضا تحميله من هنا ) جزاكم الله خيرا طريقة تصميم فورم بحث عن طريق لست بوكس33.rar

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

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

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

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

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

السلام عليكم استاذي الحبيب / أبو حنين بارك الله فيك ومرورك وحضورك بيننا في اي وقت شرف لي ويكفيني ان اري اسمك فقط في موضوع لي حتي لو بدون رد ==================================== وانت استاذي الذي علمتنا التعلم والتعليم باسلوب السهل فأنت صاحب اسلوب (( السهل الممتنع )) بلا منازع واعاننا الله علي اكمال المشوار بنفس الطريقة ... وان اظل عند حسن ظنك استاذي ولكن الاكيد انه سيكون بمعاونتكم فانت استاذنا ونتعلم منك كل يوم شئ جديد ==================================== جزاك الله خيرا

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

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

أولا أخى الحبيب ( diaa ) بالنسبة للسؤال الأول أنت المتحكم فى الملف إللى حضرتك بتقول إنك مشيرة على شبكة بل أنت المتحكم فى الشبكة وفى كل شئ فيها بمعنى إنك إنت عامل كل مايحدث على شبكتك للقراءة فقط بل من مواصفات شبكتك تستطيع جعل الأخريين يجروا عليها التعديلات المطلوبة من حذف أو إضافة وذلك بعمل كليك يمين على الملف ثم من ( propertise ) ثم ( shiring ) ستجد (net shiring and scurity ) علم على المواصفات التى تريدها أوعلم على الأثنان أفضل اما بالنسبة للسؤال الثانى : مش معقول بل من الإستحالة إن منتدى كأوفيسنا بما يحتوية من علماء فى التخصص هذا بلذات لم يرد أحد عليك فيه وعلى العموم أنت أيضا المتجكم فى غلق بعض الخلايا وفتح الأخريات فى نفس الشيت عن طريق الأتى: 1- علم على جميع الخلايا الموجودة فى الشيت وعمل كليك يمين عليها 2- ستظهر قائمة إحتر منها ( format cells ) ثم إذهب إلى ( protection ) وأحذف علامة ( الصح ) من ( locked ) و ( hide ) 3- ثم عد مرة أخرى إلى الشيت وقم بالتظليل عل الخلايا المراد حمايتها بعد وضع البيانات بها ثم قم بنفس الخظوات السابقة 4 - ولكن ستختلف نقطة هنا عن سابقيها وهو التعليم على ( locked)و ( hide ) ثم 5- إذهب إلى ( tools ) ثم ) prptection ثم protect sheet ثم بكتابة كلمة السر الملائمة والتى تستطيع تذكرها سيطلب منك إعادتها إعدها مرة ثانية ثم ( ok ) ثم ستجد أن بعض الخلايا والتى قمت بعمل الجماية لها أصبح من الصعب التعديل عليها أما الأخرى فمن الممكن تعديلها كما تريد أتمنى أن يكون الشرح وهذه الطريقة هما المطلوبان لحضرتك

أخى (jo11 ) شكرا أخى الكريم على مرورك الذى أسعدنى وجزاك الله عنى ألف خير

الطريقة بسيدطة أختى ( SHEREEEN ) من قائمة ( TOOLS ) ثم ( OPTION ) ثم ستجدى زراير كثيرة ستضغطى على (SECURITY ) ثم فى المستطيل ( ADVANCED ) ستكتبى الباسورد الذى تريدينة سيطلب من حضرتك تكرارة مرة أخرى كررية بنفس الطريقة الأولى بالضبط ثم ( OK ) ثم عند غلق الملف سيطلب عمل SAVE وافقى على الحفظ ثم إعيدى فتح الملف ستجدية لن يفتح إلا بإدخال الباسورد الذى قمتى بعملة

أخى ( إبراهيم ) فعلا كما قلت أنت وأخى ( أحمد ) ناتج المعادلة يعطى صفر وقد جربتها بمعادلة الصفيف التالية ( =SUM(IF($L$8:$L$3697=$D$6;IF($D$35:$D$3697=$G$35:$G$3697;$G$3701))) وفعلا أعطت صفر حاول تراجع القيم والشروط وربنا الموفق

بعد كود أستاذى ومعلمى ( رجب جاويش ) إليك الحل بالمعادلات ترحيل فى اماكن محدده.rar ترحيل فى اماكن محدده 2.rar

لاتأسف على فعل الخير أخى العزيز ( هانى ) فالهدف واحد وهذا أجمل مافى هذه الجامعة

الشكل النهائي ( لبرنامج قوائم الفصول) قوائم الفصول.rar