הדפסת דוח מעוצב באקסס

[רושם]

אני מבקש להדפיס דוח מאקסס באמצעות פקודה VBA - ישירות למדפסת.
הבעיה היא שהעיצוב - פונט, גודל וכו' לא חל על הטקסט, למרות שבהצגה רואים את העיצוב כי הוא מוחל "בעת טעינה".
איזה אירוע יחיל את העיצוב בהדפסה? או איזה רעיון אחר?
עיצוב של פקדי הדוח עצמו לא עוזר.

תודה לכולם!

 

[קצת סדר...]

בעיה ידועה באקסס
פתרון אחרת היא להעמיד בוורד ולהדפיס דרך הוורד או להכניס תמונה עם כל הפריטים הלא מתחלפים, ועם עיצוב שיתאים לתאים או שדות שיוחלפו במשך הזמן

 

[קצת סדר...]

אם יש למשהו פתרון אחרון שיגיב בבקשה הרבה מתקשים עם הבעיה זו

 

[FullTime]

תשים את זה באירוע בעת פתיחה. אמור לעבוד

    Dim ctl As Control

    For Each ctl In Me.Controls    'Me.Controls
        If ctl.ControlType = acTextBox Then
         
         
           ctl.FontName = ctl.FontName
        End If
    Next

 

[moishy]

הפתרון פשוט בתכלית.
לפתוח את הדוח בתצוגה נסתרת, להדפיס, לסגור.

 

[רושם]

תודה רבה למשיבים!

ל-a26955: כשאני מדפיס את הדוח מבלי לפתוח (בVBA) הוא לא מבצע אירועי "בעת פתיחה". לכן שאלתי איזה אירוע יתבצע.

ל-moishy:
1. מה הפקודה של תצוגה נסתרת? האם echo=false?
2. מה הפקודה שמדפיסה את הדוח הפתוח כבר (ומעוצב) בתצוגה נסתרת?

 

[moishy]

1. DoCmd.OpenReport "ReportName", acViewPreview, , , acHidden
2. קוד שלך להדפסת הדוח
   
3. DoCmd.Close acReport, "ReportName", acSaveNo

כמובן, ReportName הוא שם הדוח.