كيف اجعل الخلفية السوداء للفورم تكون بيضاء عند الطباعة

[skyblue]

السادة المشرفين  والاعضاء الافاضل        المحترمين 

 

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

الكود المرفق خاص بطباعة  الفورم . علما ان الفورم  خلفيته سوداء 

فهل يمكن التعديل على كود الطباعة هذذا بحيث يجعل الخلفية بيضاء عند الطباعة .

 

تحياتي 

 

 

 Private Sub CommandButton6_Click()

CommandButton2.Visible = False

CommandButton5.Visible = False

Me.PrintForm

CommandButton2.Visible = True

CommandButton5.Visible = True

End Sub

 

[إبراهيم ابوليله]

اخى

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

 Private Sub CommandButton6_Click()
CommandButton2.Visible = False
CommandButton5.Visible = False
UserForm1.BackColor = &H80000014
Me.PrintForm
CommandButton2.Visible = True
CommandButton5.Visible = True
UserForm1.BackColor = &H80000001
End Sub

تقبل تحياتى

[skyblue]

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

 لقد جربت  كود الطباعة  ممتاز جدا 

وفقك الله للخير دائما 

تم تعديل ديسمبر 2, 2014 بواسطه skyblue

[إبراهيم ابوليله]

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

 لقد جربت  كود الطباعة  ممتاز جدا 

وفقك الله للخير دائما 

اشكرك اخى

واتمنى لك التوفيق

تقبل تحياتى