اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

زياد عبد الجليل

04 عضو فضي
  • Posts

    509
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو زياد عبد الجليل

  1. شكرا استاذ عمر و أسف على فتح اكثر من موضوع لنفس المشاركة ..المهم اشكرك كثيرا على هذا العمل الرائع .بارك الله فيك
  2. السلام على حميع الاخوة الافاضل صحيح ان الاكسل بحر كلما علمنا شئ غابت عنا اشياء اساتذتي الافاضل عندي ملف للاستاذ عمر الحسيني فيه كود يقوم بالقص و النسخ مختصر و رائع و لكن الاشكال عندما جئت لتنفيذه على ملفي لم اعرف اين السر فقد جربت كل الطرق و عدلت في الخلايا و طبقت الملف نفسه مع زيادة في الاعمدة و لكن كان الفشل السمة الغالبة على عملي خاصة واني لا اساوي شئ امام عمالقة هذا المنتدى فكل استاذ يعتبر مدرسة قائمة بذاتها وكل كود ينسينا في الكود الذي بعده ...ولم اعرف ما السبيل اساتذتي ارجو تطبيق ملف الاستاذ عمر على ملفي خاصة وان عملي بقي فيه تطبيق هذا الكود فقط ...شكرا مسبقا لكم على مساعدتكم وتقبلو مني فائق عبارات الاحترام و التقدير: ملف الاستاذ عمر : Omar_1.rar وهذا ملفي ..ملف التلميذ حذف و لصق في صفحة ثانية.rar
  3. اين انت يا استاذ عمر حاولت و حاولت ولم انجح في تطبيقه حرفيا مثلك الرجاء تطبيقه على الملف المرفق -- وان امكن شرح بسيط له لانني فهمت جزء منه ولكن الكثير من التفاصيل الدقيقة لم افهمها وشكرا.
  4. حاولت مع كود الحذف و اللصق ولكن لم انجح في ادراجه تاتيني رسالة خطأ رجاء التطبيق على الملف المرفق و شكرا
  5. شكرا جزيلا لك اخي عمر نعم هذا هو المطلوب بالضبط ولكن للاسم لم اشاهد الرد حتى هذه الساعة وكنت للاسف قد قدمت طلب في المنتدى لتعديل في كود يشبه كثيرا هذا الكود بارك الله فيك اخي و شكر جزيلا. رجاء اخي عمر هل يمكن تطبيق هذه الاكواد على الملف المرفق التالي ان امكن اكون شاكرا لك انا لا زلت مبتدئ ولم استطع تطبيق الكود في ملف عملي . حذف و لصق في صفحة ثانية.rar
  6. استاذ ياسر هذا الكود للاستاذ ربيع شوقي يعمل بشكل جيد و يقوم بالمطلوب لو تفضلت و اضفت فقط شرط وضغ العبارة في الخلية f ...ولك مني جزيل الشكر (Private Sub Worksheet_Change(ByVal Target As Range Dim Lr As Long: Lr = Cells(Rows.Count, "c").End(xlUp).Row Dim myRange As Range Dim cell As Range (Set myRange = Range("c9:c" & Lr If Not Intersect(myRange, Target) Is Nothing Then For Each cell In myRange Range("a" & cell.Row) = cell.Row - 8 Next cell End If End Sub هاهي العبارة Target.Offset(, 3).Value = "زياد777"
  7. السلام عليكم استاذ ياسر ولكن عند عمل delet لاي سطر يبقى اختلال التسلسل فيجب الذهاب عند الخلية التي يبدأ من اختلال التسلسل و عمل عليها كليك حتى يعاد التسلسل في الارقام كيف اجعل هذا الكود اكثر خفة اي يعمل بدون ان نلمس الورقة او عمل كليك عليها ....انا اقصد الكود الاخير في هذا الموضوع للاستاذ القدير ياسر...ولكم مني خاص عبارات الشكر و الامتنان.
  8. مشكور اخي ياسر على هذا الشرح الشافي و الكافي بارك الله فيك وجعلني و اياك في جنات الفردوس ان شاء الله ..اخي ياسر عندي استفسار بسيط حول الموضوع السابق ترقيم الخلايا اليا بمجرد الكتابة في الخلية b9 و ادراج جملة اليا كذلك في الخلية f من خلال كتابة الكود في حدث الورقة هناك اشكال بسيط فقط هو عند ازالة سطر يجب عمل كليك على الخلية التي بها اختلال في التسلسل حتى يتم تعديل التسلسل هل يمكن تعديله و جعله يعمل بدون ان نلمس الورقة اي بمجرد عما delet للسطر يتم تصحيح التسلسل ...ان امكن وان كنت مشغول فلا بأس ان نتركه ليوم الغد او في الايام اللاحقة...وشكرا لك استاذي الغالي الله يحفظك و يسترك ويبعد عنك كل مكروه ان شاء الله و دمت لنا مرجعا و المنتدى منبرا نلتقي لنرتقي و نتعلم فيه من كل اساتذتنا الافاضل ...بارك الله فيك
  9. السلام على جميع الاخوة الافاضل اما بعد : ما هي التكتيكات و الحيل المستعملة لجع ملف اكسل به فورم مثلا اكثر خفة و اقل حجما و كانه فارغ
  10. اساتذتنا الافاضل كيف يمكن مسح الترقيم بعد الادراج ...ارجو التنفيذ على ملف مرفق سابقا للاستاذ ربيع شوقي الترقيم الالي للخلايا عن طريق تاكس بوكس في الفورم ولكم مني كل الشكر
  11. شكرا استاذ ياسر يعني ساحاول تفادي هذا الحدث قدر الامكان حتى لا يكون هناك اي ثقل في الفورم...شكرا استاذنا وبارك الله فيك
  12. شكرا جزيلا استاذ ربيع لان فهمت كيف يعمل الكود بشكل جيد تحياتي عندي سؤال اخير هل يمكن بعد الترقيم الالي مسح الترقيم دون المساسا بالخلايا اي تسطير الخلايا ولك مني فائق عبارات الشكر و التقدير
  13. السلام على اخوتي الافاضل اما بعد : عندي كود رائع للاستاذ القدير حيدر علي يقوم بحذف و لصق في صفحة مختارة الكود يعمل بشكل ممتاز و فعال ولا يوجد به اي خطأ ولكن ارجو من الاخوة الاعزاء ان امكن اخنصاره لانه طويل نوعا ما وانا عندي تقريبا 6 ازرار احتاجها في عملي لاجراء القص و النسخ coupy-coller وان امكن هل يمكن الحفاظ على تسطير الخلايا مثلا اذا قمنا بحذف و لصق يبقى التسطير في الخلايا و انا كان غير ممكن فاكتفي باختصار الكود شريطة ان يقوم بنفس العمل و بدون اخطاء...تقبلو تحياتي الحارة اليكم جميعا قص و لصق..coupy coller.rar
  14. السلام على جميع الاساتذة الافاضل اما بعد عندي استفسار بسيط لاصحاب الخبرة هل من المستحسن عمل فورم واحدة يتم من خلالها مثلا الترحيل و التعديل و الحذف و الطباعة بالاضافة الى ازرار اخرى حيث يكون عدد الاكواد في الفورم كبير جدا هل هذا سيؤدي الى ثقل الملف خاصة عند التسجيل و الخروج و كذا ثقل الفورم ام من المستحسن تقسيم الاكواد على مجموعة من الفورمات مثلا 3 او 4 افيدوني هل عمل فورم واحدة بها عدد كبير من الاكواد لا يؤثر على حجم و خفة الفورم و الملف ككل ام من المستحسن تقسيم الاكود على فورمين او 3...وهل هناك طريقة لتقليص حجم الملف و جعله اكثر خفة ... و لكم مني جزيل الشكر و التقدير
  15. السلام على جميع لاخوة الافاضل ان امكن اخوتي لقد وجدت حل لها الاشكال من خلالكم و من خلال اكوادكم الرائعة واعمالكم الممتازة ولكن عندي طلب فيما يخص هذا الموضوع وهو تعديل على هذه الاكواد وجعلها مثلا بمجرد الكتابة في خلية c9 ترقم الخلية a9 وفي نفس الوقت تكتب عبارة في الخليةf9 مثلا :منتدى العمالقة- اوفيسنا وهكذا مع باقي الخلايا يعني ليس فقط f9 ...اعلم ان لا صعب يصعب على العمالقة . و الشكر موصول الى كل من ساهم معنا في هذا الموضوع.تقبلو مني اصدق مشاعر الحب
  16. مشكور اخي صهيب على هذا العمل الرائع و مرورك الطيب على موضوعنا ولكن المطلوب بدقة هو عندما نقوم بتسجيل التلاميذ و الانتهاء نقوم في الاخير بادراج رقم التسجيل و الذي يبدأ من الصفحة 1 الى غاية اخر صفحة على ان يكون الترقيم متسلسل بمعنى اذا انتهى التسلسل في الصفحة 1 عند الرقم 10 مثلا يبدأ اليا في الصفحة الموالية عند11 ولكن بشرط ان الخلايا التي بها اسماء فقط هي التي ترقم . اليكم ملف للعلامة ربيع شوقي ولكن لم اعرف التعديل عليه بحيث انا ابدا الترقيم من العمود b9 وحاولت ولكن لم استطع كما انه اذا كتبت عبارة مثلا في الاسفل يذهب و يرقمها لذا ارجو العمل على هذا الملف مع الشرح ان امكن لاني اعلم بان الموضوع صعب. الترقيم الالي للخلايا عن طريق تاكس بوكس في الفورم.rar
  17. السلام على جميع الاساتذة الافاضل اما بعد اطلب من العمالقة المتميزين في هذا المنبر العربي المميز و الرائع مساعدة تتمثل في الاتي اود عن طريق فورم بها تكس بوكس و زر ان تدرج ترقيم تلقائي ومتسلسل في العمود B بحيث يرقم فقط الخلايا التي بها اسماء على ان يبدأ الترقيم من الصفحة 1 ثم يكمل الترقيم الى الصفحة 2 و هكذا فاذا بدانا الترقيم مثلا في الصفحة 1 من 1 وانتهى في 10 يجب ان يبدأ التالي في الصفحة 2 من 11 حتى نهاية الخلايا التي بها اسماء و لكم مني كل الشكر و العرفان. ترقيم تلقائي عن طريق الفورم.rar
  18. شكرا اخوتي ولكن استاذ ربيع بعد عمل delet-supprimer لكل الخلايا تظهر قيم بالناقص في اعلى العمود هل يمكن ازالتها مثلا -1 -2 -3 وشكرا اساتذتي
  19. شكرا للاستاذين ربيع و الاستاذ ياسر على ردهما اود ان اضع برنامج اكتشفته بالصدفة اود ان يستفيد منه الجميع وهو برنامج بعد تثبيته يدمج مع الاكسيل اسمه donnex فهو يحول الملف مباشرة الى ملف تنفيذي مع امكانية تغيير ايقونة الملف وكل هذا موجود في البرنامج بعد عمل compiler اما فما يخص البرنامج الذي وضعه الاستاذ ياسر نعم يتم التسجيل ولكن نفس المشل الذي لاقاه الاستاذ ياسر يتم غلق البرنامج بعد اختيار الايقونة و الملف المهم اليكم رابط شرح البرنامج تحويل ملف اكسيل الى ملف تنفيذي + تغيير الايقونة كماقلت كله موجود داخل البرنامج رابط الشرح: رابط تحميل البرنامج :http://xcellcompiler.com/download/ ولكن يبقى اشكال و هي ضهور علبة الحوار عند فتح البرنامج بعد تحويله اذا تمكن اي استاذ من عدم اضهارها عند فتح البرنامج ارجو ان يشرح لنا الطريقة فقط وان لم يكن هناك حل فلا بأس
×
×
  • اضف...

Important Information