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

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

قام بنشر

بعد سلام الله عليكم جميعآ

 

كيف يمكن تحديد خلايا أو أعمدة محددة أثناء الطباعة بحيث تصبح الخلايا أو الاعمدة مجمعة فى صفحة واحدة وليس عدة صفحات  

قام بنشر (معدل)

السلام عليكم

 

ملفك واجهة محرر الاكواد مغلق برقم سري ؟

 

جرب الكود التالي

Option Explicit
Option Base 1
Public Sub Ali_Hed()
On Error Resume Next
' الاعمدة المراد إخفائها
' Range("J:W")' كما هو موضح حاليا
' Range ("A2,E:F,J:W")'واذا اردت الاشاره الى اعمدة معينه متفرقه هكذا
Dim M As Range: Set M = Range("J:W")
ALI_HID_C Sheet1, M
End Sub
Private Sub ALI_HID_C(ALI_SH As Worksheet, SH_A As Range)
With SH_A
 .Columns.EntireColumn.Hidden = 1
   With ALI_SH.PageSetup
     .PrintArea = "$A$7:$AR$30"
     .BlackAndWhite = False
     .Zoom = False
     .FitToPagesWide = 1
     .FitToPagesTall = 1
      ALI_SH.PrintPreview
     .PrintArea = ""
   End With
 .Columns.EntireColumn.Hidden = 0
End With
End Sub

تم تعديل بواسطه عباد
قام بنشر

بعد سلام الله عليكم جميعآ

 

كيف يمكن تحديد خلايا أو أعمدة محددة أثناء الطباعة بحيث تصبح الخلايا أو الاعمدة مجمعة فى صفحة واحدة وليس عدة صفحات  

أخي الكريم

موضوعك هام وهي مشكلة تقابلنا جميعا تقريبا عند الطباعة ولم تضع مايكروسوفت لها حل في صورة خيار عند الطباعة

مثلا ( هل تريد طباعة التحديد المتعدد في صفحة واحدة ... نعم / لا ؟ )

الحل من وجهة نظري القاصرة هو إلتفافي (work around) :-

1- إخفاء الأعمدة التي لاترغب في طباعتها - حسب ما ذكر الأستاذ/ عباد

2- نسخ الأعمدة التي ترغب في طباعتها في صفحة جديدة ومن ثم طباعتها

وقد قمت بالحل الثاني في الملف المرفق - يمكنك الإطلاع عليه

طباعة أعمدة متفرقة.rar

قام بنشر (معدل)

عزيزي next

محرر الأكواد مغلق برقم سري

إذا أردت المساعدة

برجاء فتح محرر الأكواد

حتى نتمكن من تنفيذ المطلوب

وللعلم الأستاذ عباد

والأخ الفاضل حمادة

قاموا بالمطلوب .

جزاهم الله كل الخير

تم تعديل بواسطه Akram Galal

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