Jump to content
أوفيسنا

مصطفى محمود مصطفى

03 Special Member
  • Content Count

    432
  • Joined

  • Last visited

Everything posted by مصطفى محمود مصطفى

  1. الاستاذ سليم المبدع وذو الاخلاق العالية لا نعرف من اين نبدا بشكركم فانتم احيانا تساعدوننا واحيانا تريدون منا ان نتعلم وهذا فضل كبير ونحن نتعلم منكم ومن الاساتذة الكثير ولكن كما تعلمون الاكسل بحر كبير وكل مانتعلم فقرة نحتاج الى الاخرى وبمساعدتكم والاخوة الاعزاء في المنتدى الرائع ان شاء الله سنتعلم ولو القليل دمتم في رعاية الله وحفظه
  2. الله يحفظكم من كل سوء استاذ سليم وهذه المعلومة لم انتبه لها وفقكم الله ورعاكم لكم وافر الاحترام والتقدير
  3. السلام عليكم استاذ سليم جزاكم الله خيرا استاذ سليم حفظكم الباري عز وجل . الكود ممتاز ورائع وسريع جدا لكن لما ضفت بيانات اعلى الصف العاشر الذي بالكود حسب مافهمت منه ياخذ البيانات وبعدها يرحل بيانات الصف الحادي عشر لكن بعد اضافة بيانات اعلى السطر 10 بدء الكود لايرحل بشكل صحيح واخذ ينقل بيانات التي اعلى من الصف العاشر. ارجو التعديل بان ياخذالعناوين والبيانات من الصف العاشر بدون تنسيق او حذف صفوف اي قيم او اي عمل اخر يحافظ على اخفاء وتنسيق الاوراق والطلب الثاني هل يمكن للكود ان يرحل قيم دون المساس بتنسيقات الاوراق التي يفتحها او التي هي اصلا مفتوحة بعد تنفيذ الكود لاول مرة لان ان
  4. الاستاذ سليم حاصبيا دعواتي لكم بدوام الصحة والعافية انتهت المشكلة واصبح الكود يتجاوز الخطا المذكور جعله الله سبحانه وتعالى في ميزان حسناتكم لكم وافر الاحترام والتقدير
  5. الله يبارك لكم في صحتكم اخي سليم لكم تحياتياستدعاء بيانات.xlsm
  6. السلام عليكم استاذ سليم حاصبيا تحياتي لكم ارجو تعديل او اضافة للكود حيث اذا لم يجد بيانات يقوم باستدعائها حسب الشرط المفترض يعطي رسالة خطا و عند اضافة واحد او اكثر به شرط الاستدعاء يعمل الكود بشكل صحيح هل يمكن تجاوز هذا الخطا عندما لاتكون هناك بيانات لاستدعائها بالشرط المفترض لكم وافر احترامي
  7. الله يبارك لكم في عافيتكم وصحتكم استاذ سليم نعم في الملف الذي عندي عملته وكان رائعا ويختصر الكثير من الوقت يسرت لي الكثير الكثير يسر الله سبحانه وتعالى اموركم واعانكم لفعل الخير وفقكم الله وزادكم علما ومعرفة لكم وافر احترامي وتقديري
  8. الاستاذ الكبير سليم حاصبيا وفقكم الله وانعم عليكم بالصحة والعافية كود وتعديل اكثر من رائع جعله الله سبحانه وتعالى في ميزان حسناتكم ولو غلبتك معي اود ان يكون الترحيل من السطر 11 لان قاعدة البيانات التي اعمل عليها كما قلت لكم سابقا جعلتها من السطر 11 انا غيرت في هذه الجزئية من الكود هل صحيح لان الان يعمل بشكل صحيح خوفا من المستقبل يكون خلل Set RgD = Source_sh.Range("D11:D" & lastRo_data1) ودعواتي لكم بدوام الموفقية والنجاح ترحيل البيانات حسب الحروف الهجائية .xlsb.xlsm
  9. السلام عليكم اخي الاستاذ سليم حاصبيا وفقكم الله وحفظكم اكواد رائعة الترحيل واستدعاء البيانات حسب الحرف من القائمة المنسدلة عمل رائع جعله الله في ميزان حسناتكم هل ممكن التعديل على الكود بان يرحل العمودين اسم الام في عمود O وموقفه الحالي في عمود AJ لان هذا الكود يرحل ثمان اعمدة متتالية فانا ارغب بترحيل العمودين بعد الستة اعمدة وكذلك الستة اعمدة لم يرحل صفحة القيد ولا رقم القيد وهذا مهم لان على اساس رقم القيد وصفحته نستدل لاستخراج اسمه في قيود مدرستنا الورقية البيانات التي عنوانها باللون الاصفر في ورقة data هي المطلوب ترحيلها لكم وافر احترامي
  10. السلام عليكم لدي ملف به قاعدة بيانات كبيرة وقام الاخ سليم جزاه الله خيرا بترحيل البيانات حسب القيود وهذا نحتفظ به ورقيا داخل كل قيد واحيانا نحتاج البيانات حسب الحروف الهجائية عند البحث عن اسم احد الطلبة ورقيا بدل البحث عن جميع الاسماء ولدي كود للاستاذ الخالدي جزاه الله خيرا ولكن لم استطع اجعله يعمل جيدا وكذلك يرحل على التوالي لثمان اعمدة متتالية في قاعدة البيانات ارجو التفضل بكود ترحيل حسب الحروف الهجائية من الصف الحادي عشر 11 والتي تبدأ منC11 الى H11 يلحقها على التوالي عمودين متباعدين عن بعضهما البعض فاسم الام في العمود O و موقفه الحالي في العمود AJ ارجو التعديل على الك
  11. الاستاذ المبدع سليم حاصبيا جزاكم الله خيرا وزادكم من العلم والمعرفة لما تنتفع به وتنفع الاخرين الكود اكثر من رائع وجربته ووجدت بعض الملاحظات يمكن التعديل عليها ليعمل ان شاء الله بشكل رائع كروعتكم الكود يعمل على تسطير الاوراق التي بعد قاعدة البيانات من اليسار من الاصغر الى الاكبر وهذا رائع الملاحظات اذا كانت هناك ورقة ليس رقما وانما اسما بحروف بين الشيتات المرقمة ارقام حسب رقم القيد يظهر رسالة خطا ولا يعمل جعل الله سبحانه وتعالى جميع اعمالك في ميزان حسناتكم لكم شكري وتقديري لاحظت هذا الخطأ فيما بعد وقد قمت بتصحيحه يرجى اعادة نسخ الكود في مشاركتي الاخيرة وتنفي
  12. السلام عليكم استاذنا الفاضل سليم حاصبيا وفقكم الله نسال الله سبحانه وتعالى ان لايحرمنا من لمساتك المبدعة وفقكم الله ورزقكم الصحة والعافية وزادكم من فضله انا غيرت الرقم حسب الشيتات الموجود مع القاعدة وهي 20 شيت اي غيرت الرقم الى 20 والكود يعمل بصورة سليمة ورائعة لكم تحياتي ووافر احترامي
  13. السلام عليكم استاذ سليم جزاكم الله خيرا حدثت مشكلة اثناء ترحيل الاسماء الى الاوراق حسب رقم القيد هو ان جميع الاوراق الموجودة في المصنف يقوم الكود بمسح محتوياتها ويدرج صف العناوين فقط باعتبار ليس لديها قيود اصلا وحاولت ان اضع بعض الاوراق باسماء تختلف عن الارقام الى جهة يمين ورقة البيانات main وابقيت على الارقام على الشمال وفي هذه الحالة يقوم الكود بمسح محتويات ورقة البيانات الاصل وجميع الاوراق الباقية هل يمكن التعديل على الكود ان يتجاوز الاوراق التي ليس لها رقم القيد او على اليمين من قاعدة البيانات دون ان يعدل او يمسح البيانات الموجودة بداخلها انا الان اعمل بن
  14. الاستاذ سليم حاصبيا وفقكم الله واعطاكم الصحة والعافية عمل اكثر من رائع جعله الله سبحانه وتعالى في موازين حسناتكم لكم تحياتي
  15. السلام عليكم هذا الكود للاستاذ الفاضل سليم حاصبيا جزاه الله خيرا يقوم بترحيل البيانات حسب رقم القيد ويفتح ورقة لكل قيد باسمه اعتمادا على العمود الثاني B حيث كانت سابقا قاعدة البيانات تبدا من السطر الرابع انا غيرت في قاعدة البيانات وجعلتها تبدا من السطر 11 فاختلفت معايير الكود وحاولت اغير في الكود للسطر 11 لكن تظهر رسالة خطا والبيانات مبعثرة لان حتما تغييري غير صحيح ارجو التفضل بتعديل الكود ليرحل البيانات من السطر 11 بدلا من الرابع . ولكم وافر الاحترام والتقدير ترحيل اسماء الطلبة حسب رقم القيد.xlsm
  16. وعليكم السلام ورحمة الله وبركاته اخي العزيز بما انك عضو جديد وهذه اول مشاركة لك وليس لديك معرفة بقوانين المنتدى اولا ارجو ان تقرا التعليمات على هذا الرابط https://www.officena.net/Tips/Questions.htm وكما تفضل الاخ احمد يجب ان ترفق ملف كي يتم العمل عليه اليك شاشة دخول اسم المستخدم salma وكلمة السر 5050 تحياتي لكم شاشة دخول شيت كنترول برقم سرى - سعيد بيرم.xlsm
  17. وعليكم السلام لاحظ الملف المرفق ان شاء الله يفي بالغرض تحياتي لكم filter_between_two_dates_comboboxes ++xlsm.xlsm
  18. بارك الله في صحتكم ورزقكم اخي سليم جعله الله في ميزان حسناتكم وزادكم من فضله الكود بعد التعديل يعمل بشكل ممتاز واضفت الاعمدة الاخرى تحت بعض وعمل بشكل صحيح والخطا في كتابة رقم العمود المطلوب من قبلي تحياتي لكم
  19. الاخ سليم جزاكم الله خيرا الخطا لازال والتاريخ لم ينسق بعد اضافة التعديل علما وضعت التعديل قبل الاخيره With sh.Range("b7").Resize(m - 7, 12) .Borders.LineStyle = 1 .HorizontalAlignment = 1 .InsertIndent 1 With .Font .Bold = True .Size = 14 End With .Value = .Value End With End Sub ولم يتم تعديل التاريخ لكن رسالة الخطأ اختفت تحياتي لكم
  20. نسال الله سبحانه وتعالى ان يوفقكم ويحفظكم استاذ سليم الكود يعمل الان بعد التعديل بشكل ممتاز ورائع تقبلوا وافر احترامي وتقديري السلام عليكم استاذ سليم عند ترحيل التاريخ يظهر على شكل رقم ونسقت الخلايا التي يرحل لها التاريخ نسقتها تاريخ لكن عند تنفيذ الكود كذلك ترجع ارقام هل ممكن حل للمشكلة جزاكم الله خيرا
  21. شكرا لكم على سرعة الاجابة وفقكم الله ودائما مبدع استاذ سليم عند تنفيذ الكود ظهر خطا لا في السطر الاصفر لكم وافر احترامي وتقديري
  22. السلام عليكم الاساتذة الكرام وفقكم الله وجدت في المنتدى كودين للترحيل و الاستدعاء ومن اعمدة متفرقة وحاولت تنفيذه على ملفي فتعطي النتيجة خطا علما غيرت المعطيات كما في الشرح ارجو التفضل باجراء تعديل على كود الاستدعاء وتجنب الخطا الصادر اثناء تنفيذ الكود واذا كان هناك كود جديد يفي بالغرض فجزاكم الله خيرا لكم وافر احترامي استدعاء اعمدة متفرقة الى الورقة .xlsm
  23. السلام عليكم ورقة التقرير مجددة في كل مرة تطلب بها تقرير لذلك حتما التعديل الذي تجريه في ورقة التقرير سوف يحذفه كود ترحيل التقرير لانه في كل مرة تطلب تقرير سيقوم الكود بحذف جميع البيانات الموجودة في ورقة التقرير ويجلب التقرير المطلوب من جديد المفروض تطلب تصحيح عمل الكود ان يكون تكون البيانات تحت اخر خليه بها بيانات وبذلك يكون التعديل الذي تجريه باقي في الورقة عند كل تقرير يعني التقرير سيصبح مجموعة تقارير تحت بعض اما اذا اردت تعديل البيانات فيكون في الورقة التي ترسل منها التقرير حتى ياتي التقرير مع التعديلات لكم تحياتي
  24. دائما مبدع استاذ سليم وفقكم الله ما تفضلت به صحيح واحيانا تغيب الفكرة لكن بوجود الطيبين والخبراء في المنتدى وانت منهم جزاكم الله خيرا لما تقدمونه في المنتدى للاصدقاء من جهد وحلول كبيره لكم وافر الاحترام والتقدير
×
×
  • Create New...