[AccessD] Show the print preview ribbon

Hi Dan. your code /hides the ribbon.  That is different to minimizing/maximizing it when it is 
not hidden.

-- 
Stuart

On 1 Mar 2014 at 10:15, Dan Waters wrote:

> Hi Rocky,
> 
> This is what I've been doing since Access 2007 was released.  
> 
> Whenever I open a report my code looks like this:
> 
>         '------------------------------------
>         DoCmd.OpenReport "rptReportName", acViewPreview
>         DoCmd.Maximize    ' -- This maximizes the entire access
>         window,
> every time, so the report is readable.
>                                    '      It also turned out that I
> needed to maximize here instead of in the Report_Open event,
>                                    '      but I don't remember
> exactly why.
>         '------------------------------------
> 
> In code on every report I have these two procedures:
> 
>         '------------------------------------
>         Private Sub Report_Open(Cancel As Integer)
> 
>             Call DisplayRibbon(True)  '-- See Below
> 
>         End Sub
> 
>         Private Sub Report_Close()
> 
>             Call DisplayRibbon(False)    '-- See Below
>             DoCmd.Restore    '-- This restores the entire access
>             screen.
> 
>         End Sub
>         '------------------------------------
> 
> This is the procedure which shows or hides the ribbon.  It is in a
> public module.
> 
>         '------------------------------------
>         Public Sub DisplayRibbon(blnDisplayRibbon As Boolean)
> 
>             If SysCmd(acSysCmdAccessVer) >= 12 Then  '-- Of course,
>             ribbons
> only exist in Access 2007+
> 
>                 If blnDisplayRibbon = True Then
>                     DoCmd.ShowToolbar "Ribbon", acToolbarYes    '--
>                     When the
> report opens, print preview is the ribbon which is automatically
> displayed.
>                 Else
>                     DoCmd.ShowToolbar "Ribbon", acToolbarNo
>                 End If
> 
>             End If
> 
>         End Sub
>         '------------------------------------
> 
> Hope this helps!
> Dan
> 
> 
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky
> Smolin Sent: Saturday, 1 March 2014 10:23 AM To: 'Access Developers
> discussion and problem solving' Subject: [AccessD] Show the print
> preview ribbon
> 
> Dear List:
> 
> In an mdb I have a custom toolbar for print previews which had just
> the close button and the magnifying glass.  In 2003 this works well
> but in 2007, 10 and 13 the custom toolbar does not show up.  Not
> surprising.
> 
> But in 2010 - my client's version - there is a print preview button at
> the top when you're in print preview, and when you click it, the print
> preview ribbon is displayed with the CLOSE in red.  Very good.  
> 
> But the client does not want to click Print Preview to open the
> ribbon.  He wants the ribbon displayed when the report opens in print
> preview.  
> 
> How is this done?
> 
> MTIA
> 
> Rocky
> 
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>