اذهب الي المحتوي
أوفيسنا

طلب كود جعل خلية القائمة المنسدلة لا تظهر أثناء الطباعة و المعاينة


BACHA22

الردود الموصى بها

السلام عليكم ورحمة الله وبركاته

 

يمكنك نقلها بعيداً عن حدود صفحة الطباعة أو يمكن اختار لون الخط أبيض ولون الخلية بدون لون وكذلك الحدود الموجودة بها تكون بلا حدود وبذلك لا تظهر في الطباعة.

رابط هذا التعليق
شارك

اخى الكريم

جرب هذا الكود

لعله ما تريد

Sub h()
Range("j6").Font.ThemeColor = xlThemeColorDark1
Range("j6").Borders.LineStyle = xlNone
Range("j6").Interior.Pattern = xlNone
Sheet1.PrintPreview
Range("j6").Font.ColorIndex = xlAutomatic
Range("j6").Borders.LineStyle = xlContinuous
Range("j6").Interior.Pattern = xlSolid

End Sub

رابط هذا التعليق
شارك

شكرا ام عبد الله

 

 لا أريد نقلها إلى حدود الصفحة

 

و أريد لون الخط أسود

 

 

ممكن الأخ إبراهيم تطبيق الكود على الملف

 

لأنه لم يعمل معي

تم تعديل بواسطه BACHA22
رابط هذا التعليق
شارك

الأخ الكريم/ BACHA22

السلام عليكم ورحمة الله وبركاته

بعد إستئذان الأستاذة الفاضلة/ أم عبد الله والأستاذ الفاضل/ إبراهيم ابوليله

جرب المرفق - علي أن تقوم بالمعاينة والطباعة من خلال زر الطباعة المضاف

كما يمكنك التحكم في نطاق الطباعة من خلال تغيير المدي داخل الكود .

تقبل تحياتي

 

Classeur2-Hide Certain Cells From Print.rar

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information