الشاب يوسف قام بنشر أبريل 16, 2013 مشاركة قام بنشر أبريل 16, 2013 (معدل) الاخوة الاعزاء برجاء عمل المطلوب الموجود في المرفق وهو كود يقوم بتكبير وتصغير حجم الصفحات كلها مرة واحده التكبير والتصغير.rar تم تعديل أبريل 16, 2013 بواسطه دغيدى رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر أبريل 16, 2013 مشاركة قام بنشر أبريل 16, 2013 السلام عليكم الاخ الكريم / yousifsamra بارك الله فيك شاهد المرفق ... واضغط الزر الموجود في الصفحة واكتب النسبة التي تريدها في التكست في الفورم ثم اضغط علي الزر ... وشاهد النتيجة ارجو ان يكون هو طلبك جزاك الله خيرا -samaالتكبير والتصغير-.rar 1 رابط هذا التعليق شارك More sharing options...
أبو عبد الرحمن سعيد قام بنشر أبريل 16, 2013 مشاركة قام بنشر أبريل 16, 2013 بسم الله الرحمن الرحيم السلام عليكم أخى العزيزالفاضل / يوسف وبعد إذن أخى العزيز / أبوسما إثراءا للموضوع شاهد المرفق نسألكم الدعاء وجزاكم الله خيرا رابط هذا التعليق شارك More sharing options...
الشاب يوسف قام بنشر أبريل 16, 2013 الكاتب مشاركة قام بنشر أبريل 16, 2013 أخى الغالى حمادة عمر دائما سباق في عمل الخير ....... لقد جعلت من الاكسل لوحة فنية جميلة تحمل توقيع احد رياحين اوفيسنا وعندما نجد الأبداع دوما سنلقى عطر حمادة عمر ...اشكرك والشكر موصول للمبدع صاحب اللمسات الانيقة سعيد بيرم متخصص الذوق العالى والمشاركات العبقرية ..... بارك الله فيك رابط هذا التعليق شارك More sharing options...
أبو عبد الرحمن سعيد قام بنشر أبريل 16, 2013 مشاركة قام بنشر أبريل 16, 2013 أخى يوسف أشكركم فهذا من واجبنا رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر أبريل 16, 2013 مشاركة قام بنشر أبريل 16, 2013 السلام عليكم الاخ والاستاذ الكريم / سعيد بيرم بارك الله فيك مثلك لا يستأذن بل يأمر دوما جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر أبريل 16, 2013 مشاركة قام بنشر أبريل 16, 2013 أخى الغالى حمادة عمر دائما سباق في عمل الخير ....... لقد جعلت من الاكسل لوحة فنية جميلة تحمل توقيع احد رياحين اوفيسنا وعندما نجد الأبداع دوما سنلقى عطر حمادة عمر ...اشكرك والشكر موصول للمبدع صاحب اللمسات الانيقة سعيد بيرم متخصص الذوق العالى والمشاركات العبقرية ..... بارك الله فيك السلام عليكم الاخ الكريم / yousifsamra بارك الله فيك وجزيل شكري علي كلماتك الراائعة التي لا يساويها شئ جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر أبريل 16, 2013 مشاركة قام بنشر أبريل 16, 2013 أخى الحبيب / حمادة عمر أخى الحبيب / سعيد بيرم تسلم االأيادى وجزاكم الله كل خير رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر أبريل 16, 2013 مشاركة قام بنشر أبريل 16, 2013 السلام عليكم الاستاذ العملاق / رجب جاويش بارك الله فيك مرورك دائما شرف لاي موضوع ... نورت الموضوع جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
أبو عبد الرحمن سعيد قام بنشر أبريل 16, 2013 مشاركة قام بنشر أبريل 16, 2013 السلام عليكم الاستاذ الفاضل / رجب جاويش بارك الله فيكم جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
الشاب يوسف قام بنشر أبريل 16, 2013 الكاتب مشاركة قام بنشر أبريل 16, 2013 أخى الغالى حماده اعجبنى الكود جدا ولكن واجهتنى مشكله ان عدد صفحات الشيت عندى كثيره جدا فهل يمكن تعديل الكود بطريقة تجنبنى كتابة اسماء الصفحات لانها تزيد عن 100 صفحة واشكرك جدا رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر أبريل 16, 2013 مشاركة قام بنشر أبريل 16, 2013 السلام عليكم الاخ الكريم / yousifsamra بارك الله فيك لتنفيذ ما تريده قم بتعديل الكود الموجود في الزر في الفورم الي الكود التالي سيعمل معك علي كل شيتات الملف مهما كان عددها بدون كتابة اسماء الشيتات كما هو في الكود السابق ارجو ان يفي بطلبك وفي انتظار ردك Private Sub CommandButton1_Click() ActiveWorkbook.Worksheets.Select Sheets("ورقة1").Activate ActiveWindow.Zoom = TextBox1.Value Sheets("ورقة1").Select Range("A1").Select End End Sub جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.