من وقتی از UserForm که دارم پرینت میگیرم فونت های فارسی رو هرچی انتخاب کنم باز درهنگام پرینت گرفتن بهم ریخته پرینت میشه کد من هم برای پرینت اینه:
Private Sub CommandButton1_Click()
Dim RetStat
RetStat = Application.Dialogs(xlDialogPrinterSetup).Show
If RetStat Then Me.PrintForm
End Sub
ممنون میشم کمکم کنید خیلی گیرم
مرسی



کامنت