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

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

اثراءا للموضوع :- كود يقوم بالترحيل وارد ومنصرف عن طريق الفورم Z = 2 x = 2 y = 3 On Error GoTo 1 Do Until Me.Controls("comboBox" & x).Value = "" lr = Range("A" & Rows.Count).End(xlUp).Row Cells(lr + 1, 4).Value = ComboBox1.Value Cells(lr + 1, 1).Value = Application.Text(TextBox2.Value, "dd/mm/yyyy") Cells(lr + 1, 3).Value = TextBox1.Value Cells(lr + 1, 5).Value = TextBox3.Value Cells(lr + 1, 2).Value = Me.Controls("comboBox" & x).Value Cells(lr + 1, 6).Value = Me.Controls("textBox" & Z + 2).Value Cells(lr + 1, 7).Value = Me.Controls("textBox" & y + 2).Value x = x + 1 y = y + 2 Z = Z + 2 Loop For i = 1 To 15 Me.Controls("TextBox" & i).Value = "" Me.Controls("ComboBox" & i).Value = "" Next 1 End Sub H-مخازن.rar

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

كنترول المرحلة الابتدائية 2013 / 2014 بعد التعديل الجديد وحسب االقرار 460 بتاريخ 2013/12/1 اسم المستخدم : الصياد كلمة السر : 1964

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

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

السلام عليكم ورحمة الله وبركاته عدد القواعد التنسيق الشرطي في اكسيل 2003 فقط ثلاث أما اكسيل 2007 فأعلى يحتوي على أكثر من عشرة.

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

‏الثلاثاء‏ 7‏/2‏/1435هـ الموافق ‏10‏/12‏/2013م اخي الكريم حسين جودة جزاك الله خيرا لكريم مبادرتك كود رائع من اخ كريم السلام عليكم و رحمة الله وبركاته ان شاء الله اذا ربنا قدرنا وسهل الأمور سوف نقوم بعمل نموذج مرن نوع: نموذج واحد لكل النوعين وارد وصرف رقم الحركة: يتم تلقائيا وضع تسلسل للحركات النوع: يتكون من قائمتين مسندلة تختلف حسب نوع الإذن المدخل + امكانية اضافة انواع جديدة تلقائيا بمجرد ادخالها هنا سوف يتم اضافتها للقائمة النوع المختار حاليا التاريخ: لايقبل تاريخ اكبر من تاريخ اليوم و يقبل تاريخ هجري و ميلادي اسم العميل: يتم اختيارة من القائمة المنسدلة + امكانية اضافة اسم عميل جديد بمجرد ادخاله هنا الأصناف: يتم اختيار الصنف من القائمة + امكانية اضافة صنف جديد بمجرد ادخاله هنا كل هذه البيانات تتم معالجتها من أي مسافات زائدة قبل اضافتها ونقول يارب يامسهل

تفضل ابو احمد هذه من عندي .. آمل التقييم subform.rar

الأخ الكريم/أبو ليمونه السلام عليكم ورحمة الله وبركاته قمت باستخدام سلاح الكود - وبإذن الله لن يتعارض مع توقيت أم القري تعرف أن رؤية الهلال تضرب بالتقاويم عرض الحائط من آن لآخر - اقربها غرة المحرم هذا العام جرب الملف - وبشرني بعدها . تقبل تحياتي AA-1-Modified-New.rar

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

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

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

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

أخى الحبيب ( blood ) بصراحة حضرتك بتحرجنى دائما بذوقك العالى وبصراحة أمام هذا الحب لاأجد الكلمات التى تقابلة سوى الكلمات المعتادة والدعاء لك على هذه المشاعر الجميلة تقبل تحيات : أخيك

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

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

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

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

اخى الحبيب الاستاذ / على حسن الطريقة الفعالة لتنشيط أوفيس 2010 و أوفيس 2013 نبدأ أولا أوفيس 2010 اتفضل حمل http://www.mediafire.com/?rxpwp89cu9r5x9s رابط أخر وهذا هو الإثبات ثانيا أوفيس 2013 اتفضل حمل http://www.mediafire.com/?xc0r8wxp9fn3qgm رابط أخر أنتظر حوالي 10 دقائق حتي يتم التفعيل ثم أفتح الأوفيس وهذا هو الإثبات الموضوع منقول

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

كلنا قد يصعب علية عمل CHART لإحصاءات معينة فلما لانجعلها عامة وجذابة ومتحركة إعتمادا على شئ موجود فى ال OFFICE هذه فكرة ممكن أستخدامها للعديد من الأحصاءات لعمل CHART متحرك وعام وفكرة لو أستخدمت بحرفية ستغير وتبسط عمل الرسومات البيانية حركة الأكسيل بعيدا عن الأكواد.rar

فَأَعْظَمُ أَسْبَابِ شَرْحِ الصَّدْرِ التَّوْحِيدُ، وَعَلَى حَسَبِ كَمَالِهِ وَقُوَّتِهِ وَزِيَادَتِهِ يَكُونُ انْشِرَاحُ صَدْرِ صَاحِبِهِ. قَالَ اللَّهُ... View the full article

أخى كما أوضحت سابقا لأستاذى عبد الله المجرب الخطأ تولد من عدم زيادة مدى ( table array ) =VLOOKUP(ROW()-ROW($D$1);$A$2:$B$100;2;FALSE) وستلاحظ فى الكود تم زيادة مدى ال($A$2:$B$100 )

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

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

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

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

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

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

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

السلام عليكم اخي الكريم .... لا يوجد شئ اسمه شرح كود و لو تم الطلب بجزئية معينة لم تفهمها لكان الامر ابسط اما شرح كود كامل فمن الصعوبة بمكان لذلك فهو بالاساس يشتمل على اساسيات الاكواد من قاعدة IF وجمل التكرار و استخدام ال Range واخفاء الاعمدة وعلى اية حال ساقوم بشرح ما يتيسر لي ---------------------------------------- الكود يعمل بناءا على ثلاثة احتمال الحالة الاولى اذا كانت قيمة القائمة تساوي 33 فيقوم باضهار كافة الاعمدة الحالة الثانية اذا كانت قيمة القائمة تساوي 32 فيقوم باضهار اعمدة معينة k .. s .. aa الخ وهذه الاعمدة ترقيمها 11 ... 19 ... 27 ولغاية السطر 251 الذي يمثل السكر IQ اي ان هذه الارقام متوالية هندسية تبدأ من الرقم 11 وتزداد بالرقم 8 في كل مرة حتى الوصول للرقم 251 ... ولذلك تم استخدام For i = 11 To 251 Step 8 اما الحالة الثالثة اذا كانت قيمة القائمة من 1 - 31 اي ايام الشهر بالاضافة الى اجمالي الشهر والمطلوب اضهار الاعمدة التي تخص كل بند ويتم تحديد الاعمدة المراد اظهارها بناءا على قيمة القائمة وبناءاً على معادلات رياضية للتوضيح : قيم القائمة الموجودة ............. 1 2 3 4 .... 31 بداية الاعمدة المطلوب اضهارها 4 12 20 28 .... 244 ورياضيا يتم ربطها بالصيغة ص=((س-1)*5)+(س*3)+1 بحيث لو كانت قيمة س = 1 اذن ص=((1-1)*5)+(1*3)+1 ... ص=4 بحيث لو كانت قيمة س = 2اذن ص=((2-1)*5)+(2*3)+1 ... ص=12 ... وهكذا وتم تحديد باية العمود ونهاية العمود المراد اضهاره Range(Cells(1, ((x1 - 1) * 5) + x1 * 3 + 1), _ Cells(1, ((x1 - 1) * 5) + x1 * 3 + 1 + 7)).EntireColumn.Hidden = False وتم اضافة الرقم 7 لتحديد اخر عمود في الاعمدة المطلوبة لان المطلوب اضهار 8 اعمدة وبزيادة 7 على العمود الاول يصبح لدينا الاعمدة ال8 المطلوبة