اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

مساعدة في فتح اليوزر فورم


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

السلام عليكم اخواني الافاضل

هل هناك كود يقوم باعادة فتح اليوزر فورم بعد غلق تافذة صفحة معاينة الطباعة

وشكرا مسبقا

 

Private Sub CommandButton1_Click()
Sheets(1).Activate
UserForm1.Hide
Range("a1:u87").PrintPreview
End Sub

 

2016-03-27_231333.png

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

هل جربت إضافة السطر التالي في نهاية الكود

UserForm1.Show ..

إذا لم يعمل معك فأرجو إرفاق الملف للعمل عليه والإطلاع عليه بحيث تتضح الصورة

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

13 دقائق مضت, ياسر خليل أبو البراء said:

هل جربت إضافة السطر التالي في نهاية الكود

UserForm1.Show ..

إذا لم يعمل معك فأرجو إرفاق الملف للعمل عليه والإطلاع عليه بحيث تتضح الصورة

و الله جربت الان و نجحت العملية فبارك الله فيك يا استاذي الفاضل ياسر خليل أبو البراء  و دمت ذخرا لنا

Private Sub CommandButton1_Click()
Sheets(1).Activate
UserForm1.Hide
Range("a1:u87").PrintPreview
UserForm1.show
End Sub

 

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

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