رفيق محمد قام بنشر يناير 18, 2009 قام بنشر يناير 18, 2009 الاخوة خبراء الاكواد السلام عليكم (بصراحة ... مللت من كثر ما شكرتكم واثنيت على اعمالكم القيمة بالمنتدى) لي طلب عندي سبع ملفات بكل منها حوالي 100 ورقة عمل لكل عميل ورقة منفصلة السؤال هو هل يوجد كود معين يغير اسم ورقة العمل حسب خلية معينة (وليكن A1) او العكس هل يوجد كود معين يغير بيانات خلية معينة حسب اسم ورقة العمل بارك الله فيكم وجزاكم الله خيرا
عادل حنفي قام بنشر يناير 18, 2009 قام بنشر يناير 18, 2009 السلام عليكم اخي BU3MMAR اتمني ان يكون ما فهمته صحيحا جرب الملف التالي تحياتي BU3MMAR.rar
عادل حنفي قام بنشر يناير 18, 2009 قام بنشر يناير 18, 2009 عذرا اخي ابو اسامه لم ار مشاركتك خالص تحياتي
يحيى حسين قام بنشر يناير 18, 2009 قام بنشر يناير 18, 2009 أخي أبو عمار هذا الكود يقوم بتغيير اسماء جميع الصفحات حسب قيمة الخلية A1 ارجو ان يكون هو المطلوب Sub MyTest() Dim ws As Worksheet For Each ws In Worksheets ws.Name = ws.Range("a1").Value Next ws End Sub و دمتم في حفظ الله و رعايته
رفيق محمد قام بنشر يناير 18, 2009 الكاتب قام بنشر يناير 18, 2009 الاخ / ابواسامة العتيبي الأخ / عادل حنفي الأخ / Justice وكل الاخوة الاحباب في هذا المنتدى الرائع قبل ان اجرب الحلول لكم مني خالص الشكر والتحية ودمتم بخير
عادل حنفي قام بنشر يناير 18, 2009 قام بنشر يناير 18, 2009 (معدل) السلام عليكم اخي BU3MMAR جائتني فكرة احضار الاسماء الشيتات من ملف اخي ابو اسامه لاني لم افهم كامل طلبك في بداية طلبك وتم لعمل ذلك زر اسمه احضار اسماء الشيتات و ما عليك الا ان تكتب امام الشيت في الخلية التي تقابله في العمود B الاسم الذي تريد التغيير اليه و الضغط علي الزر الاخر ليتم التغيير ارجو التجربة و اخباري النتيجة BU3MMAR2.rar تم تعديل يناير 18, 2009 بواسطه aah_aah2008
رفيق محمد قام بنشر يناير 18, 2009 الكاتب قام بنشر يناير 18, 2009 سامحني يا اخ عادل معرفتي بالاكواد تساوي معرفتي باللغة الصينية الملف اعطاني خطا لكن الفكرة اللي كنت اقصدها انت كنت نفذتها في ملف العملاء خاصتك وكنت اريد ان اعرف كيفية تحديد المدى الذي سياخذ منه اسماء الشيتات جزاك الله خيرا وبارك فيك
عادل حنفي قام بنشر يناير 18, 2009 قام بنشر يناير 18, 2009 السلام عليكم اخي BU3MMAR لكن الفكرة اللي كنت اقصدها انت كنت نفذتها في ملف العملاء خاصتك وكنت اريد ان اعرف كيفية تحديد المدى الذي سياخذ منه اسماء الشيتات اخي هذه هي بالفعل نفس الفكرة فالزر الاول ياخذ اسماء الشيتات و يضعها في العمود الاول A و الزر الثاني اذا وجد اسم او رقم في الخلية الموجودة في العمود الثاني و المقابله لاسم الشيت لو وجد بها رقم او اسم (وطبعا هناك مجموعة ممنوعات ك / او بمعني اصح كل مالا يقبله الاكسل في تسمية الشيتات) فهذا معناه انك تريد اعادة تسمية هذا الشيت بالذي موجود في هذه الخلية و ان تركت فارغة لن يغير اسم الشيت ارفقت لك ملف فيديو بشرح العمل مع الملف مرة اخري مع اضافة on error resume next للتماشي مع اي خطأ مع انني قمت بتجربة الملف اكثر من مره و ليس هناك اي خطأ يذكر تحياتي BU3MMAR2.rar 1
رفيق محمد قام بنشر يناير 19, 2009 الكاتب قام بنشر يناير 19, 2009 وصلت الفكرة اخي الحبيب عادل اعزك الله ونفع بك وجزاك الله عنا خير الجزاء لك ولكل الاخوة المشاركين في هذا المنتدى الرائع
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.