أبو العاصم قام بنشر فبراير 14, 2015 مشاركة قام بنشر فبراير 14, 2015 السلام عليكم ورحمة الله الاخوة المشاركين فى المنتدى هل من كود يقوم بتغيير نطاق الطباعة فمثلا إذا كانت الخلية ِA1 = OFF يكون نطاق الطباعة هو A3:M15 بينما اذا كانت الخلية ِA1 = On يكون نطاق الطباعة هو B3:N15 وجزاكم الله خيرا رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر فبراير 14, 2015 مشاركة قام بنشر فبراير 14, 2015 أخي الكريم جرب الكود التالي : Sub ChangePrintArea() If Range("A1").Value = "OFF_" Then ActiveSheet.PageSetup.PrintArea = "A3:M15" ElseIf Range("A1").Value = "ON_" Then ActiveSheet.PageSetup.PrintArea = "B3:N15" Else ActiveSheet.PageSetup.PrintArea = "" End If End Sub يوجد ملف مرفق Change Print Area.rar 1 رابط هذا التعليق شارك More sharing options...
أبو العاصم قام بنشر فبراير 14, 2015 الكاتب مشاركة قام بنشر فبراير 14, 2015 اخى ياسر خليل جزاك الله خيرا لكن المطلوب هو كود يوضع فى محرك الصفحة فى الفيجوال وليس كود بزر المطلوب هو تغيير النطاق تلقائيا بمجرد نتيجة الخلية A1 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر فبراير 14, 2015 مشاركة قام بنشر فبراير 14, 2015 تفضل أخي الغالي Change Print Area.rar رابط هذا التعليق شارك More sharing options...
أبو العاصم قام بنشر فبراير 15, 2015 الكاتب مشاركة قام بنشر فبراير 15, 2015 السلام عليكم ورحمة الله أخى الغالى ياسر خليل بارك الله فيك وزادك الله من علمه هو فعلا عين المطلوب ولاستكمال الفكرة وإثراء الموضوع ما هو التعديل على الكود للوصول الى إذا كانــــــــت الخلية ِA1 = OFF يكون نطاق الطباعة هو A3:M15 فى صفحة رقم 1 بينما اذا كانت الخلية ِA1 = On يكون نطاق الطباعة هو A3:M30 بحيث المدى A3:M15 فى صفحة رقم 1 والمدى A16:M30 فى صفحة رقم 2 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر فبراير 15, 2015 مشاركة قام بنشر فبراير 15, 2015 تفضل Change Print Area.rar رابط هذا التعليق شارك More sharing options...
أبو العاصم قام بنشر فبراير 16, 2015 الكاتب مشاركة قام بنشر فبراير 16, 2015 (معدل) السلام عليكم ورحمة الله أخى العزيز ياسر جزاك الله خيرا والله إنى لأعتذر عن عدم توضيح المطلوب السابق وكبدتك مزيدا من الوقت إقبل أسفى على ذلك المطلوب ليس فى صفحات الاكسيل وانما فى صفحات الطباعة فإذا كان محتوى الخلية الأولى A1 = on يكون نطاق الطباعة هو A3:M15 فى صفحة طباعة رقم 1 فإذا كان محتوى الخلية الأولى A1 = off يكون نطاق الطباعة هو A3:M30 بحيث المدى A3:M15 فى صفحة الطباعة رقم 1 والمــــــــدى A16:M30 فى صفحة الطباعة رقم 2 تقبل إعتذارى ثانيا وجزاك الله خيرا على ما تقدم تم تعديل فبراير 16, 2015 بواسطه Abo3asem رابط هذا التعليق شارك More sharing options...
أبو العاصم قام بنشر مارس 25, 2015 الكاتب مشاركة قام بنشر مارس 25, 2015 السلام عليكم ورحمة الله أخى العزيز ياسر جزاك الله خيرا والله إنى لأعتذر عن عدم توضيح المطلوب السابق وكبدتك مزيدا من الوقت إقبل أسفى على ذلك المطلوب ليس فى صفحات الاكسيل وانما فى صفحات الطباعة فإذا كان محتوى الخلية الأولى A1 = on يكون نطاق الطباعة هو A3:M15 فى صفحة طباعة رقم 1 فإذا كان محتوى الخلية الأولى A1 = off يكون نطاق الطباعة هو A3:M30 بحيث المدى A3:M15 فى صفحة الطباعة رقم 1 والمــــــــدى A16:M30 فى صفحة الطباعة رقم 2 تقبل إعتذارى ثانيا وجزاك الله خيرا على ما تقدم رابط هذا التعليق شارك More sharing options...
أبو العاصم قام بنشر أبريل 22, 2015 الكاتب مشاركة قام بنشر أبريل 22, 2015 السلام عليكم ورحمة الله أخى العزيز ياسر جزاك الله خيرا والله إنى لأعتذر عن عدم توضيح المطلوب السابق وكبدتك مزيدا من الوقت إقبل أسفى على ذلك المطلوب ليس فى صفحات الاكسيل وانما فى صفحات الطباعة فإذا كان محتوى الخلية الأولى A1 = on يكون نطاق الطباعة هو A3:M15 فى صفحة طباعة رقم 1 فإذا كان محتوى الخلية الأولى A1 = off يكون نطاق الطباعة هو A3:M30 بحيث المدى A3:M15 فى صفحة الطباعة رقم 1 والمــــــــدى A16:M30 فى صفحة الطباعة رقم 2 تقبل إعتذارى ثانيا وجزاك الله خيرا على ما تقدم تحديد كأفضل إجابة تعقيب إقتباس متعدد رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر أبريل 22, 2015 مشاركة قام بنشر أبريل 22, 2015 صراحة لم أفهم المطلوب بشكل جيد ... عشان كدا مكانش فيه رد مني ... ارفق ملف لتوضيح المطلوب بشكل أكثر تفصيلاً تقبل تحياتي رابط هذا التعليق شارك 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.