Welcome to SPN

Register and Join the most happening forum of Sikh community & intellectuals from around the world.

Sign Up Now!

Change Report to open 100%

Discussion in 'Information Technology' started by Bob, Jul 28, 2006.

  1. Bob

    Bob
    Expand Collapse
    Guest

    Report opens to fit can I change the option to open at 100% View???

    Thanks in advance.........Bob Vance
     
  2. Loading...


  3. Al Camp

    Al Camp
    Expand Collapse
    Guest

    Bob,
    The code to zoom the report has to go with the OpenReport method.
    DoCmd.OpenReport "YourReport", acViewPreview
    DoCmd.RunCommand acCmdZoom100
    --
    hth
    Al Camp
    Candia Computer Consulting - Candia NH
    http://home.comcast.net/~cccsolutions
    There are 10 types of people in the world.
    Those who understand binary, and those who don't.

    "Bob" <xxx@xx.xx> wrote in message news:e9umaa$gnl$1@lust.ihug.co.nz...
    >
    >
    > Report opens to fit can I change the option to open at 100% View???
    >
    > Thanks in advance.........Bob Vance
    >
     
  4. Bob

    Bob
    Expand Collapse
    Guest

    Al I got this error: The command or action "Zoom 100%"isn't available now
    Thanks Bob

    "Al Camp" <anon@anon.net> wrote in message
    news:OctPCCgrGHA.5108@TK2MSFTNGP02.phx.gbl...
    > Bob,
    > The code to zoom the report has to go with the OpenReport method.
    > DoCmd.OpenReport "YourReport", acViewPreview
    > DoCmd.RunCommand acCmdZoom100
    > --
    > hth
    > Al Camp
    > Candia Computer Consulting - Candia NH
    > http://home.comcast.net/~cccsolutions
    > There are 10 types of people in the world.
    > Those who understand binary, and those who don't.
    >
    > "Bob" <xxx@xx.xx> wrote in message news:e9umaa$gnl$1@lust.ihug.co.nz...
    >>
    >>
    >> Report opens to fit can I change the option to open at 100% View???
    >>
    >> Thanks in advance.........Bob Vance
    >>

    >
    >
     
  5. Al Camp

    Al Camp
    Expand Collapse
    Guest

    Bob,
    >> The code to zoom the report has to go with the OpenReport method.


    The code I posted is placed in the form module of the form that calls the report. It
    doesn't go anywhere in the report itself.

    Ex. a form called frmMenu... with a button called cmdOpenReport...
    In the module of that form, against the button Click event...

    Private Sub cmdOpenReport_Click()
    DoCmd.OpenReport "YourReport", acViewPreview
    DoCmd.RunCommand acCmdZoom100
    End Sub

    --
    hth
    Al Camp
    Candia Computer Consulting - Candia NH
    http://home.comcast.net/~cccsolutions

    "Bob" <xxx@xx.xx> wrote in message news:ea0uuq$k9q$1@lust.ihug.co.nz...
    > Al I got this error: The command or action "Zoom 100%"isn't available now
    > Thanks Bob
    >
    > "Al Camp" <anon@anon.net> wrote in message news:OctPCCgrGHA.5108@TK2MSFTNGP02.phx.gbl...
    >> Bob,
    >> The code to zoom the report has to go with the OpenReport method.
    >> DoCmd.OpenReport "YourReport", acViewPreview
    >> DoCmd.RunCommand acCmdZoom100
    >> --
    >> hth
    >> Al Camp
    >> Candia Computer Consulting - Candia NH
    >> http://home.comcast.net/~cccsolutions
    >> There are 10 types of people in the world.
    >> Those who understand binary, and those who don't.
    >>
    >> "Bob" <xxx@xx.xx> wrote in message news:e9umaa$gnl$1@lust.ihug.co.nz...
    >>>
    >>>
    >>> Report opens to fit can I change the option to open at 100% View???
    >>>
    >>> Thanks in advance.........Bob Vance
    >>>

    >>
    >>

    >
    >
     
  6. Bob

    Bob
    Expand Collapse
    Guest

    Al, The form is called frmInvoice and the button on it is to open
    rptViewExpenses.....Just not sure how to get to Module!
    Thanks Bob
    "Al Camp" <anon@anon.net> wrote in message
    news:ewWv90qrGHA.3828@TK2MSFTNGP03.phx.gbl...
    > Bob,
    >>> The code to zoom the report has to go with the OpenReport method.

    >
    > The code I posted is placed in the form module of the form that calls
    > the report. It doesn't go anywhere in the report itself.
    >
    > Ex. a form called frmMenu... with a button called cmdOpenReport...
    > In the module of that form, against the button Click event...
    >
    > Private Sub cmdOpenReport_Click()
    > DoCmd.OpenReport "YourReport", acViewPreview
    > DoCmd.RunCommand acCmdZoom100
    > End Sub
    >
    > --
    > hth
    > Al Camp
    > Candia Computer Consulting - Candia NH
    > http://home.comcast.net/~cccsolutions
    >
    > "Bob" <xxx@xx.xx> wrote in message news:ea0uuq$k9q$1@lust.ihug.co.nz...
    >> Al I got this error: The command or action "Zoom 100%"isn't available now
    >> Thanks Bob
    >>
    >> "Al Camp" <anon@anon.net> wrote in message
    >> news:OctPCCgrGHA.5108@TK2MSFTNGP02.phx.gbl...
    >>> Bob,
    >>> The code to zoom the report has to go with the OpenReport method.
    >>> DoCmd.OpenReport "YourReport", acViewPreview
    >>> DoCmd.RunCommand acCmdZoom100
    >>> --
    >>> hth
    >>> Al Camp
    >>> Candia Computer Consulting - Candia NH
    >>> http://home.comcast.net/~cccsolutions
    >>> There are 10 types of people in the world.
    >>> Those who understand binary, and those who don't.
    >>>
    >>> "Bob" <xxx@xx.xx> wrote in message news:e9umaa$gnl$1@lust.ihug.co.nz...
    >>>>
    >>>>
    >>>> Report opens to fit can I change the option to open at 100% View???
    >>>>
    >>>> Thanks in advance.........Bob Vance
    >>>>
    >>>
    >>>

    >>
    >>

    >
    >
     
  7. Bob

    Bob
    Expand Collapse
    Guest

    GOT IT Thanks for your help AL :)

    Private Sub View_All_Expenses_Click()
    On Error GoTo Err_View_All_Expenses_Click

    Dim stDocName As String

    stDocName = "rptViewExpenses"
    DoCmd.OpenReport stDocName, acViewPreview
    DoCmd.OpenReport "rptViewExpenses", acViewPreview
    DoCmd.RunCommand acCmdZoom100
    Exit_View_All_Expenses_Click:
    Exit Sub


    Err_View_All_Expenses_Click:
    MsgBox Err.Description
    Resume Exit_View_All_Expenses_Click

    End Sub
    "Bob" <xxx@xx.xx> wrote in message news:ea12bu$ql8$1@lust.ihug.co.nz...
    > Al, The form is called frmInvoice and the button on it is to open
    > rptViewExpenses.....Just not sure how to get to Module!
    > Thanks Bob
    > "Al Camp" <anon@anon.net> wrote in message
    > news:ewWv90qrGHA.3828@TK2MSFTNGP03.phx.gbl...
    >> Bob,
    >>>> The code to zoom the report has to go with the OpenReport method.

    >>
    >> The code I posted is placed in the form module of the form that calls
    >> the report. It doesn't go anywhere in the report itself.
    >>
    >> Ex. a form called frmMenu... with a button called cmdOpenReport...
    >> In the module of that form, against the button Click event...
    >>
    >> Private Sub cmdOpenReport_Click()
    >> DoCmd.OpenReport "YourReport", acViewPreview
    >> DoCmd.RunCommand acCmdZoom100
    >> End Sub
    >>
    >> --
    >> hth
    >> Al Camp
    >> Candia Computer Consulting - Candia NH
    >> http://home.comcast.net/~cccsolutions
    >>
    >> "Bob" <xxx@xx.xx> wrote in message news:ea0uuq$k9q$1@lust.ihug.co.nz...
    >>> Al I got this error: The command or action "Zoom 100%"isn't available
    >>> now
    >>> Thanks Bob
    >>>
    >>> "Al Camp" <anon@anon.net> wrote in message
    >>> news:OctPCCgrGHA.5108@TK2MSFTNGP02.phx.gbl...
    >>>> Bob,
    >>>> The code to zoom the report has to go with the OpenReport method.
    >>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>> DoCmd.RunCommand acCmdZoom100
    >>>> --
    >>>> hth
    >>>> Al Camp
    >>>> Candia Computer Consulting - Candia NH
    >>>> http://home.comcast.net/~cccsolutions
    >>>> There are 10 types of people in the world.
    >>>> Those who understand binary, and those who don't.
    >>>>
    >>>> "Bob" <xxx@xx.xx> wrote in message news:e9umaa$gnl$1@lust.ihug.co.nz...
    >>>>>
    >>>>>
    >>>>> Report opens to fit can I change the option to open at 100% View???
    >>>>>
    >>>>> Thanks in advance.........Bob Vance
    >>>>>
    >>>>
    >>>>
    >>>
    >>>

    >>
    >>

    >
    >
     
  8. Al Camp

    Al Camp
    Expand Collapse
    Guest

    Good deal Bob.

    Code looks OK... just one point...
    > DoCmd.OpenReport stDocName, acViewPreview
    > DoCmd.OpenReport "rptViewExpenses", acViewPreview


    The second line is not needed, it's just a repeat of the first line, but using the real
    name of the report rather than stDocName.

    --
    hth
    Al Camp
    Candia Computer Consulting - Candia NH
    http://home.comcast.net/~cccsolutions
    There are 10 types of people in the world.
    Those who understand binary, and those who don't.

    "Bob" <xxx@xx.xx> wrote in message news:ea14nd$ur8$1@lust.ihug.co.nz...
    > GOT IT Thanks for your help AL :)
    >
    > Private Sub View_All_Expenses_Click()
    > On Error GoTo Err_View_All_Expenses_Click
    >
    > Dim stDocName As String
    >
    > stDocName = "rptViewExpenses"
    > DoCmd.OpenReport stDocName, acViewPreview
    > DoCmd.OpenReport "rptViewExpenses", acViewPreview
    > DoCmd.RunCommand acCmdZoom100
    > Exit_View_All_Expenses_Click:
    > Exit Sub
    >
    >
    > Err_View_All_Expenses_Click:
    > MsgBox Err.Description
    > Resume Exit_View_All_Expenses_Click
    >
    > End Sub
    > "Bob" <xxx@xx.xx> wrote in message news:ea12bu$ql8$1@lust.ihug.co.nz...
    >> Al, The form is called frmInvoice and the button on it is to open
    >> rptViewExpenses.....Just not sure how to get to Module!
    >> Thanks Bob
    >> "Al Camp" <anon@anon.net> wrote in message
    >> news:ewWv90qrGHA.3828@TK2MSFTNGP03.phx.gbl...
    >>> Bob,
    >>>>> The code to zoom the report has to go with the OpenReport method.
    >>>
    >>> The code I posted is placed in the form module of the form that calls the report.
    >>> It doesn't go anywhere in the report itself.
    >>>
    >>> Ex. a form called frmMenu... with a button called cmdOpenReport...
    >>> In the module of that form, against the button Click event...
    >>>
    >>> Private Sub cmdOpenReport_Click()
    >>> DoCmd.OpenReport "YourReport", acViewPreview
    >>> DoCmd.RunCommand acCmdZoom100
    >>> End Sub
    >>>
    >>> --
    >>> hth
    >>> Al Camp
    >>> Candia Computer Consulting - Candia NH
    >>> http://home.comcast.net/~cccsolutions
    >>>
    >>> "Bob" <xxx@xx.xx> wrote in message news:ea0uuq$k9q$1@lust.ihug.co.nz...
    >>>> Al I got this error: The command or action "Zoom 100%"isn't available now
    >>>> Thanks Bob
    >>>>
    >>>> "Al Camp" <anon@anon.net> wrote in message
    >>>> news:OctPCCgrGHA.5108@TK2MSFTNGP02.phx.gbl...
    >>>>> Bob,
    >>>>> The code to zoom the report has to go with the OpenReport method.
    >>>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>>> DoCmd.RunCommand acCmdZoom100
    >>>>> --
    >>>>> hth
    >>>>> Al Camp
    >>>>> Candia Computer Consulting - Candia NH
    >>>>> http://home.comcast.net/~cccsolutions
    >>>>> There are 10 types of people in the world.
    >>>>> Those who understand binary, and those who don't.
    >>>>>
    >>>>> "Bob" <xxx@xx.xx> wrote in message news:e9umaa$gnl$1@lust.ihug.co.nz...
    >>>>>>
    >>>>>>
    >>>>>> Report opens to fit can I change the option to open at 100% View???
    >>>>>>
    >>>>>> Thanks in advance.........Bob Vance
    >>>>>>
    >>>>>
    >>>>>
    >>>>
    >>>>
    >>>
    >>>

    >>
    >>

    >
    >
     
  9. Bob

    Bob
    Expand Collapse
    Guest

    AL it seems to open up out of alignment you can only see the bottom right
    hand corner when it first opens at 100%...Thanks Bob
    "Al Camp" <anon@anon.net> wrote in message
    news:%239sm7NyrGHA.4296@TK2MSFTNGP02.phx.gbl...
    > Good deal Bob.
    >
    > Code looks OK... just one point...
    >> DoCmd.OpenReport stDocName, acViewPreview
    >> DoCmd.OpenReport "rptViewExpenses", acViewPreview

    >
    > The second line is not needed, it's just a repeat of the first line, but
    > using the real name of the report rather than stDocName.
    >
    > --
    > hth
    > Al Camp
    > Candia Computer Consulting - Candia NH
    > http://home.comcast.net/~cccsolutions
    > There are 10 types of people in the world.
    > Those who understand binary, and those who don't.
    >
    > "Bob" <xxx@xx.xx> wrote in message news:ea14nd$ur8$1@lust.ihug.co.nz...
    >> GOT IT Thanks for your help AL :)
    >>
    >> Private Sub View_All_Expenses_Click()
    >> On Error GoTo Err_View_All_Expenses_Click
    >>
    >> Dim stDocName As String
    >>
    >> stDocName = "rptViewExpenses"
    >> DoCmd.OpenReport stDocName, acViewPreview
    >> DoCmd.OpenReport "rptViewExpenses", acViewPreview
    >> DoCmd.RunCommand acCmdZoom100
    >> Exit_View_All_Expenses_Click:
    >> Exit Sub
    >>
    >>
    >> Err_View_All_Expenses_Click:
    >> MsgBox Err.Description
    >> Resume Exit_View_All_Expenses_Click
    >>
    >> End Sub
    >> "Bob" <xxx@xx.xx> wrote in message news:ea12bu$ql8$1@lust.ihug.co.nz...
    >>> Al, The form is called frmInvoice and the button on it is to open
    >>> rptViewExpenses.....Just not sure how to get to Module!
    >>> Thanks Bob
    >>> "Al Camp" <anon@anon.net> wrote in message
    >>> news:ewWv90qrGHA.3828@TK2MSFTNGP03.phx.gbl...
    >>>> Bob,
    >>>>>> The code to zoom the report has to go with the OpenReport method.
    >>>>
    >>>> The code I posted is placed in the form module of the form that calls
    >>>> the report. It doesn't go anywhere in the report itself.
    >>>>
    >>>> Ex. a form called frmMenu... with a button called cmdOpenReport...
    >>>> In the module of that form, against the button Click event...
    >>>>
    >>>> Private Sub cmdOpenReport_Click()
    >>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>> DoCmd.RunCommand acCmdZoom100
    >>>> End Sub
    >>>>
    >>>> --
    >>>> hth
    >>>> Al Camp
    >>>> Candia Computer Consulting - Candia NH
    >>>> http://home.comcast.net/~cccsolutions
    >>>>
    >>>> "Bob" <xxx@xx.xx> wrote in message news:ea0uuq$k9q$1@lust.ihug.co.nz...
    >>>>> Al I got this error: The command or action "Zoom 100%"isn't available
    >>>>> now
    >>>>> Thanks Bob
    >>>>>
    >>>>> "Al Camp" <anon@anon.net> wrote in message
    >>>>> news:OctPCCgrGHA.5108@TK2MSFTNGP02.phx.gbl...
    >>>>>> Bob,
    >>>>>> The code to zoom the report has to go with the OpenReport method.
    >>>>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>>>> DoCmd.RunCommand acCmdZoom100
    >>>>>> --
    >>>>>> hth
    >>>>>> Al Camp
    >>>>>> Candia Computer Consulting - Candia NH
    >>>>>> http://home.comcast.net/~cccsolutions
    >>>>>> There are 10 types of people in the world.
    >>>>>> Those who understand binary, and those who don't.
    >>>>>>
    >>>>>> "Bob" <xxx@xx.xx> wrote in message
    >>>>>> news:e9umaa$gnl$1@lust.ihug.co.nz...
    >>>>>>>
    >>>>>>>
    >>>>>>> Report opens to fit can I change the option to open at 100% View???
    >>>>>>>
    >>>>>>> Thanks in advance.........Bob Vance
    >>>>>>>
    >>>>>>
    >>>>>>
    >>>>>
    >>>>>
    >>>>
    >>>>
    >>>
    >>>

    >>
    >>

    >
    >
     
  10. Al Camp

    Al Camp
    Expand Collapse
    Guest

    Bob,
    Couldn't reproduce your problem, no matter what I tried.
    Nor have I ever heard of this odd behavior in regards to opening a report at any Zoom
    factor.

    Does this happen with all your reports? Try some others.
    Is this 8 1/2 by 11, portrait?

    All I can offer is....
    Drop the error code from the OpenReport coding, just for now... just use...
    DoCmd.OpenReport "rptViewExpenses", acViewPreview
    DoCmd.RunCommand acCmdZoom100

    Make a copy of the report (rename it). Test that usinmg the same "open" code above.
    Remove all your code from that copy of the report and test.
    Create a new form with just some labels on it, and test that
    Also, can't hurt to Compact and Repair...

    Otherwise try a brand new post with that question (include your Access version no),
    but... like I say, I couldn't find anything on that bug in the google groups, nor could I
    duplicate it.
    --
    hth
    Al Camp
    Candia Computer Consulting - Candia NH
    http://home.comcast.net/~cccsolutions
    There are 10 types of people in the world.
    Those who understand binary, and those who don't.


    "Bob" <xxx@xx.xx> wrote in message news:ea3fon$961$1@lust.ihug.co.nz...
    > AL it seems to open up out of alignment you can only see the bottom right hand corner
    > when it first opens at 100%...Thanks Bob
    > "Al Camp" <anon@anon.net> wrote in message
    > news:%239sm7NyrGHA.4296@TK2MSFTNGP02.phx.gbl...
    >> Good deal Bob.
    >>
    >> Code looks OK... just one point...
    >>> DoCmd.OpenReport stDocName, acViewPreview
    >>> DoCmd.OpenReport "rptViewExpenses", acViewPreview

    >>
    >> The second line is not needed, it's just a repeat of the first line, but using the real
    >> name of the report rather than stDocName.
    >>
    >> --
    >> hth
    >> Al Camp
    >> Candia Computer Consulting - Candia NH
    >> http://home.comcast.net/~cccsolutions
    >> There are 10 types of people in the world.
    >> Those who understand binary, and those who don't.
    >>
    >> "Bob" <xxx@xx.xx> wrote in message news:ea14nd$ur8$1@lust.ihug.co.nz...
    >>> GOT IT Thanks for your help AL :)
    >>>
    >>> Private Sub View_All_Expenses_Click()
    >>> On Error GoTo Err_View_All_Expenses_Click
    >>>
    >>> Dim stDocName As String
    >>>
    >>> stDocName = "rptViewExpenses"
    >>> DoCmd.OpenReport stDocName, acViewPreview
    >>> DoCmd.OpenReport "rptViewExpenses", acViewPreview
    >>> DoCmd.RunCommand acCmdZoom100
    >>> Exit_View_All_Expenses_Click:
    >>> Exit Sub
    >>>
    >>>
    >>> Err_View_All_Expenses_Click:
    >>> MsgBox Err.Description
    >>> Resume Exit_View_All_Expenses_Click
    >>>
    >>> End Sub
    >>> "Bob" <xxx@xx.xx> wrote in message news:ea12bu$ql8$1@lust.ihug.co.nz...
    >>>> Al, The form is called frmInvoice and the button on it is to open
    >>>> rptViewExpenses.....Just not sure how to get to Module!
    >>>> Thanks Bob
    >>>> "Al Camp" <anon@anon.net> wrote in message
    >>>> news:ewWv90qrGHA.3828@TK2MSFTNGP03.phx.gbl...
    >>>>> Bob,
    >>>>>>> The code to zoom the report has to go with the OpenReport method.
    >>>>>
    >>>>> The code I posted is placed in the form module of the form that calls the report.
    >>>>> It doesn't go anywhere in the report itself.
    >>>>>
    >>>>> Ex. a form called frmMenu... with a button called cmdOpenReport...
    >>>>> In the module of that form, against the button Click event...
    >>>>>
    >>>>> Private Sub cmdOpenReport_Click()
    >>>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>>> DoCmd.RunCommand acCmdZoom100
    >>>>> End Sub
    >>>>>
    >>>>> --
    >>>>> hth
    >>>>> Al Camp
    >>>>> Candia Computer Consulting - Candia NH
    >>>>> http://home.comcast.net/~cccsolutions
    >>>>>
    >>>>> "Bob" <xxx@xx.xx> wrote in message news:ea0uuq$k9q$1@lust.ihug.co.nz...
    >>>>>> Al I got this error: The command or action "Zoom 100%"isn't available now
    >>>>>> Thanks Bob
    >>>>>>
    >>>>>> "Al Camp" <anon@anon.net> wrote in message
    >>>>>> news:OctPCCgrGHA.5108@TK2MSFTNGP02.phx.gbl...
    >>>>>>> Bob,
    >>>>>>> The code to zoom the report has to go with the OpenReport method.
    >>>>>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>>>>> DoCmd.RunCommand acCmdZoom100
    >>>>>>> --
    >>>>>>> hth
    >>>>>>> Al Camp
    >>>>>>> Candia Computer Consulting - Candia NH
    >>>>>>> http://home.comcast.net/~cccsolutions
    >>>>>>> There are 10 types of people in the world.
    >>>>>>> Those who understand binary, and those who don't.
    >>>>>>>
    >>>>>>> "Bob" <xxx@xx.xx> wrote in message news:e9umaa$gnl$1@lust.ihug.co.nz...
    >>>>>>>>
    >>>>>>>>
    >>>>>>>> Report opens to fit can I change the option to open at 100% View???
    >>>>>>>>
    >>>>>>>> Thanks in advance.........Bob Vance
    >>>>>>>>
    >>>>>>>
    >>>>>>>
    >>>>>>
    >>>>>>
    >>>>>
    >>>>>
    >>>>
    >>>>
    >>>
    >>>

    >>
    >>

    >
    >
     
  11. Bob

    Bob
    Expand Collapse
    Guest

    It seem to be working ok, then I changed the font from 8 to 10 and it
    starting doing the same thing so I deleted that copy db went to original and
    it started show the bottom right corner on all my 100% codes I had
    entered...Thanks Bob
    "Al Camp" <anon@anon.net> wrote in message
    news:%23r0lmM6rGHA.4272@TK2MSFTNGP03.phx.gbl...
    > Bob,
    > Couldn't reproduce your problem, no matter what I tried.
    > Nor have I ever heard of this odd behavior in regards to opening a
    > report at any Zoom factor.
    >
    > Does this happen with all your reports? Try some others.
    > Is this 8 1/2 by 11, portrait?
    >
    > All I can offer is....
    > Drop the error code from the OpenReport coding, just for now... just
    > use...
    > DoCmd.OpenReport "rptViewExpenses", acViewPreview
    > DoCmd.RunCommand acCmdZoom100
    >
    > Make a copy of the report (rename it). Test that usinmg the same "open"
    > code above.
    > Remove all your code from that copy of the report and test.
    > Create a new form with just some labels on it, and test that
    > Also, can't hurt to Compact and Repair...
    >
    > Otherwise try a brand new post with that question (include your Access
    > version no), but... like I say, I couldn't find anything on that bug in
    > the google groups, nor could I duplicate it.
    > --
    > hth
    > Al Camp
    > Candia Computer Consulting - Candia NH
    > http://home.comcast.net/~cccsolutions
    > There are 10 types of people in the world.
    > Those who understand binary, and those who don't.
    >
    >
    > "Bob" <xxx@xx.xx> wrote in message news:ea3fon$961$1@lust.ihug.co.nz...
    >> AL it seems to open up out of alignment you can only see the bottom right
    >> hand corner when it first opens at 100%...Thanks Bob
    >> "Al Camp" <anon@anon.net> wrote in message
    >> news:%239sm7NyrGHA.4296@TK2MSFTNGP02.phx.gbl...
    >>> Good deal Bob.
    >>>
    >>> Code looks OK... just one point...
    >>>> DoCmd.OpenReport stDocName, acViewPreview
    >>>> DoCmd.OpenReport "rptViewExpenses", acViewPreview
    >>>
    >>> The second line is not needed, it's just a repeat of the first line, but
    >>> using the real name of the report rather than stDocName.
    >>>
    >>> --
    >>> hth
    >>> Al Camp
    >>> Candia Computer Consulting - Candia NH
    >>> http://home.comcast.net/~cccsolutions
    >>> There are 10 types of people in the world.
    >>> Those who understand binary, and those who don't.
    >>>
    >>> "Bob" <xxx@xx.xx> wrote in message news:ea14nd$ur8$1@lust.ihug.co.nz...
    >>>> GOT IT Thanks for your help AL :)
    >>>>
    >>>> Private Sub View_All_Expenses_Click()
    >>>> On Error GoTo Err_View_All_Expenses_Click
    >>>>
    >>>> Dim stDocName As String
    >>>>
    >>>> stDocName = "rptViewExpenses"
    >>>> DoCmd.OpenReport stDocName, acViewPreview
    >>>> DoCmd.OpenReport "rptViewExpenses", acViewPreview
    >>>> DoCmd.RunCommand acCmdZoom100
    >>>> Exit_View_All_Expenses_Click:
    >>>> Exit Sub
    >>>>
    >>>>
    >>>> Err_View_All_Expenses_Click:
    >>>> MsgBox Err.Description
    >>>> Resume Exit_View_All_Expenses_Click
    >>>>
    >>>> End Sub
    >>>> "Bob" <xxx@xx.xx> wrote in message news:ea12bu$ql8$1@lust.ihug.co.nz...
    >>>>> Al, The form is called frmInvoice and the button on it is to open
    >>>>> rptViewExpenses.....Just not sure how to get to Module!
    >>>>> Thanks Bob
    >>>>> "Al Camp" <anon@anon.net> wrote in message
    >>>>> news:ewWv90qrGHA.3828@TK2MSFTNGP03.phx.gbl...
    >>>>>> Bob,
    >>>>>>>> The code to zoom the report has to go with the OpenReport method.
    >>>>>>
    >>>>>> The code I posted is placed in the form module of the form that
    >>>>>> calls the report. It doesn't go anywhere in the report itself.
    >>>>>>
    >>>>>> Ex. a form called frmMenu... with a button called cmdOpenReport...
    >>>>>> In the module of that form, against the button Click event...
    >>>>>>
    >>>>>> Private Sub cmdOpenReport_Click()
    >>>>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>>>> DoCmd.RunCommand acCmdZoom100
    >>>>>> End Sub
    >>>>>>
    >>>>>> --
    >>>>>> hth
    >>>>>> Al Camp
    >>>>>> Candia Computer Consulting - Candia NH
    >>>>>> http://home.comcast.net/~cccsolutions
    >>>>>>
    >>>>>> "Bob" <xxx@xx.xx> wrote in message
    >>>>>> news:ea0uuq$k9q$1@lust.ihug.co.nz...
    >>>>>>> Al I got this error: The command or action "Zoom 100%"isn't
    >>>>>>> available now
    >>>>>>> Thanks Bob
    >>>>>>>
    >>>>>>> "Al Camp" <anon@anon.net> wrote in message
    >>>>>>> news:OctPCCgrGHA.5108@TK2MSFTNGP02.phx.gbl...
    >>>>>>>> Bob,
    >>>>>>>> The code to zoom the report has to go with the OpenReport method.
    >>>>>>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>>>>>> DoCmd.RunCommand acCmdZoom100
    >>>>>>>> --
    >>>>>>>> hth
    >>>>>>>> Al Camp
    >>>>>>>> Candia Computer Consulting - Candia NH
    >>>>>>>> http://home.comcast.net/~cccsolutions
    >>>>>>>> There are 10 types of people in the world.
    >>>>>>>> Those who understand binary, and those who don't.
    >>>>>>>>
    >>>>>>>> "Bob" <xxx@xx.xx> wrote in message
    >>>>>>>> news:e9umaa$gnl$1@lust.ihug.co.nz...
    >>>>>>>>>
    >>>>>>>>>
    >>>>>>>>> Report opens to fit can I change the option to open at 100%
    >>>>>>>>> View???
    >>>>>>>>>
    >>>>>>>>> Thanks in advance.........Bob Vance
    >>>>>>>>>
    >>>>>>>>
    >>>>>>>>
    >>>>>>>
    >>>>>>>
    >>>>>>
    >>>>>>
    >>>>>
    >>>>>
    >>>>
    >>>>
    >>>
    >>>

    >>
    >>

    >
    >
     
  12. Bob

    Bob
    Expand Collapse
    Guest

    Ah Ha, When I open Report Design and close out it comes up showing bottom
    right Corner but when I close the programme completely and re open it, it
    corrects its self Hmmmm......Access 2002, thanks for your help,,,Bob
    "Bob" <xxx@xx.xx> wrote in message news:ea4dua$vnu$1@lust.ihug.co.nz...
    > It seem to be working ok, then I changed the font from 8 to 10 and it
    > starting doing the same thing so I deleted that copy db went to original
    > and it started show the bottom right corner on all my 100% codes I had
    > entered...Thanks Bob
    > "Al Camp" <anon@anon.net> wrote in message
    > news:%23r0lmM6rGHA.4272@TK2MSFTNGP03.phx.gbl...
    >> Bob,
    >> Couldn't reproduce your problem, no matter what I tried.
    >> Nor have I ever heard of this odd behavior in regards to opening a
    >> report at any Zoom factor.
    >>
    >> Does this happen with all your reports? Try some others.
    >> Is this 8 1/2 by 11, portrait?
    >>
    >> All I can offer is....
    >> Drop the error code from the OpenReport coding, just for now... just
    >> use...
    >> DoCmd.OpenReport "rptViewExpenses", acViewPreview
    >> DoCmd.RunCommand acCmdZoom100
    >>
    >> Make a copy of the report (rename it). Test that usinmg the same
    >> "open" code above.
    >> Remove all your code from that copy of the report and test.
    >> Create a new form with just some labels on it, and test that
    >> Also, can't hurt to Compact and Repair...
    >>
    >> Otherwise try a brand new post with that question (include your Access
    >> version no), but... like I say, I couldn't find anything on that bug in
    >> the google groups, nor could I duplicate it.
    >> --
    >> hth
    >> Al Camp
    >> Candia Computer Consulting - Candia NH
    >> http://home.comcast.net/~cccsolutions
    >> There are 10 types of people in the world.
    >> Those who understand binary, and those who don't.
    >>
    >>
    >> "Bob" <xxx@xx.xx> wrote in message news:ea3fon$961$1@lust.ihug.co.nz...
    >>> AL it seems to open up out of alignment you can only see the bottom
    >>> right hand corner when it first opens at 100%...Thanks Bob
    >>> "Al Camp" <anon@anon.net> wrote in message
    >>> news:%239sm7NyrGHA.4296@TK2MSFTNGP02.phx.gbl...
    >>>> Good deal Bob.
    >>>>
    >>>> Code looks OK... just one point...
    >>>>> DoCmd.OpenReport stDocName, acViewPreview
    >>>>> DoCmd.OpenReport "rptViewExpenses", acViewPreview
    >>>>
    >>>> The second line is not needed, it's just a repeat of the first line,
    >>>> but using the real name of the report rather than stDocName.
    >>>>
    >>>> --
    >>>> hth
    >>>> Al Camp
    >>>> Candia Computer Consulting - Candia NH
    >>>> http://home.comcast.net/~cccsolutions
    >>>> There are 10 types of people in the world.
    >>>> Those who understand binary, and those who don't.
    >>>>
    >>>> "Bob" <xxx@xx.xx> wrote in message news:ea14nd$ur8$1@lust.ihug.co.nz...
    >>>>> GOT IT Thanks for your help AL :)
    >>>>>
    >>>>> Private Sub View_All_Expenses_Click()
    >>>>> On Error GoTo Err_View_All_Expenses_Click
    >>>>>
    >>>>> Dim stDocName As String
    >>>>>
    >>>>> stDocName = "rptViewExpenses"
    >>>>> DoCmd.OpenReport stDocName, acViewPreview
    >>>>> DoCmd.OpenReport "rptViewExpenses", acViewPreview
    >>>>> DoCmd.RunCommand acCmdZoom100
    >>>>> Exit_View_All_Expenses_Click:
    >>>>> Exit Sub
    >>>>>
    >>>>>
    >>>>> Err_View_All_Expenses_Click:
    >>>>> MsgBox Err.Description
    >>>>> Resume Exit_View_All_Expenses_Click
    >>>>>
    >>>>> End Sub
    >>>>> "Bob" <xxx@xx.xx> wrote in message
    >>>>> news:ea12bu$ql8$1@lust.ihug.co.nz...
    >>>>>> Al, The form is called frmInvoice and the button on it is to open
    >>>>>> rptViewExpenses.....Just not sure how to get to Module!
    >>>>>> Thanks Bob
    >>>>>> "Al Camp" <anon@anon.net> wrote in message
    >>>>>> news:ewWv90qrGHA.3828@TK2MSFTNGP03.phx.gbl...
    >>>>>>> Bob,
    >>>>>>>>> The code to zoom the report has to go with the OpenReport
    >>>>>>>>> method.
    >>>>>>>
    >>>>>>> The code I posted is placed in the form module of the form that
    >>>>>>> calls the report. It doesn't go anywhere in the report itself.
    >>>>>>>
    >>>>>>> Ex. a form called frmMenu... with a button called cmdOpenReport...
    >>>>>>> In the module of that form, against the button Click event...
    >>>>>>>
    >>>>>>> Private Sub cmdOpenReport_Click()
    >>>>>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>>>>> DoCmd.RunCommand acCmdZoom100
    >>>>>>> End Sub
    >>>>>>>
    >>>>>>> --
    >>>>>>> hth
    >>>>>>> Al Camp
    >>>>>>> Candia Computer Consulting - Candia NH
    >>>>>>> http://home.comcast.net/~cccsolutions
    >>>>>>>
    >>>>>>> "Bob" <xxx@xx.xx> wrote in message
    >>>>>>> news:ea0uuq$k9q$1@lust.ihug.co.nz...
    >>>>>>>> Al I got this error: The command or action "Zoom 100%"isn't
    >>>>>>>> available now
    >>>>>>>> Thanks Bob
    >>>>>>>>
    >>>>>>>> "Al Camp" <anon@anon.net> wrote in message
    >>>>>>>> news:OctPCCgrGHA.5108@TK2MSFTNGP02.phx.gbl...
    >>>>>>>>> Bob,
    >>>>>>>>> The code to zoom the report has to go with the OpenReport
    >>>>>>>>> method.
    >>>>>>>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>>>>>>> DoCmd.RunCommand acCmdZoom100
    >>>>>>>>> --
    >>>>>>>>> hth
    >>>>>>>>> Al Camp
    >>>>>>>>> Candia Computer Consulting - Candia NH
    >>>>>>>>> http://home.comcast.net/~cccsolutions
    >>>>>>>>> There are 10 types of people in the world.
    >>>>>>>>> Those who understand binary, and those who don't.
    >>>>>>>>>
    >>>>>>>>> "Bob" <xxx@xx.xx> wrote in message
    >>>>>>>>> news:e9umaa$gnl$1@lust.ihug.co.nz...
    >>>>>>>>>>
    >>>>>>>>>>
    >>>>>>>>>> Report opens to fit can I change the option to open at 100%
    >>>>>>>>>> View???
    >>>>>>>>>>
    >>>>>>>>>> Thanks in advance.........Bob Vance
    >>>>>>>>>>
    >>>>>>>>>
    >>>>>>>>>
    >>>>>>>>
    >>>>>>>>
    >>>>>>>
    >>>>>>>
    >>>>>>
    >>>>>>
    >>>>>
    >>>>>
    >>>>
    >>>>
    >>>
    >>>

    >>
    >>

    >
    >
     
  13. Al Camp

    Al Camp
    Expand Collapse
    Guest

    Yes... Hmmmm is right!
    I tried everything in 97... and I really didn't think Preview/Zoom would be any diffrerent
    in any other version.
    But, I rarely use 2002... like Acess95 it seems to be the "lost" version.
    --
    Al Camp
    Candia Computer Consulting - Candia NH
    http://home.comcast.net/~cccsolutions
    There are 10 types of people in the world.
    Those who understand binary, and those who don't.

    "Bob" <xxx@xx.xx> wrote in message news:ea4emq$1n6$1@lust.ihug.co.nz...
    > Ah Ha, When I open Report Design and close out it comes up showing bottom right Corner
    > but when I close the programme completely and re open it, it corrects its self
    > Hmmmm......Access 2002, thanks for your help,,,Bob
    > "Bob" <xxx@xx.xx> wrote in message news:ea4dua$vnu$1@lust.ihug.co.nz...
    >> It seem to be working ok, then I changed the font from 8 to 10 and it starting doing
    >> the same thing so I deleted that copy db went to original and it started show the
    >> bottom right corner on all my 100% codes I had entered...Thanks Bob
    >> "Al Camp" <anon@anon.net> wrote in message
    >> news:%23r0lmM6rGHA.4272@TK2MSFTNGP03.phx.gbl...
    >>> Bob,
    >>> Couldn't reproduce your problem, no matter what I tried.
    >>> Nor have I ever heard of this odd behavior in regards to opening a report at any
    >>> Zoom factor.
    >>>
    >>> Does this happen with all your reports? Try some others.
    >>> Is this 8 1/2 by 11, portrait?
    >>>
    >>> All I can offer is....
    >>> Drop the error code from the OpenReport coding, just for now... just use...
    >>> DoCmd.OpenReport "rptViewExpenses", acViewPreview
    >>> DoCmd.RunCommand acCmdZoom100
    >>>
    >>> Make a copy of the report (rename it). Test that usinmg the same "open" code above.
    >>> Remove all your code from that copy of the report and test.
    >>> Create a new form with just some labels on it, and test that
    >>> Also, can't hurt to Compact and Repair...
    >>>
    >>> Otherwise try a brand new post with that question (include your Access version no),
    >>> but... like I say, I couldn't find anything on that bug in the google groups, nor
    >>> could I duplicate it.
    >>> --
    >>> hth
    >>> Al Camp
    >>> Candia Computer Consulting - Candia NH
    >>> http://home.comcast.net/~cccsolutions
    >>> There are 10 types of people in the world.
    >>> Those who understand binary, and those who don't.
    >>>
    >>>
    >>> "Bob" <xxx@xx.xx> wrote in message news:ea3fon$961$1@lust.ihug.co.nz...
    >>>> AL it seems to open up out of alignment you can only see the bottom right hand corner
    >>>> when it first opens at 100%...Thanks Bob
    >>>> "Al Camp" <anon@anon.net> wrote in message
    >>>> news:%239sm7NyrGHA.4296@TK2MSFTNGP02.phx.gbl...
    >>>>> Good deal Bob.
    >>>>>
    >>>>> Code looks OK... just one point...
    >>>>>> DoCmd.OpenReport stDocName, acViewPreview
    >>>>>> DoCmd.OpenReport "rptViewExpenses", acViewPreview
    >>>>>
    >>>>> The second line is not needed, it's just a repeat of the first line, but using the
    >>>>> real name of the report rather than stDocName.
    >>>>>
    >>>>> --
    >>>>> hth
    >>>>> Al Camp
    >>>>> Candia Computer Consulting - Candia NH
    >>>>> http://home.comcast.net/~cccsolutions
    >>>>> There are 10 types of people in the world.
    >>>>> Those who understand binary, and those who don't.
    >>>>>
    >>>>> "Bob" <xxx@xx.xx> wrote in message news:ea14nd$ur8$1@lust.ihug.co.nz...
    >>>>>> GOT IT Thanks for your help AL :)
    >>>>>>
    >>>>>> Private Sub View_All_Expenses_Click()
    >>>>>> On Error GoTo Err_View_All_Expenses_Click
    >>>>>>
    >>>>>> Dim stDocName As String
    >>>>>>
    >>>>>> stDocName = "rptViewExpenses"
    >>>>>> DoCmd.OpenReport stDocName, acViewPreview
    >>>>>> DoCmd.OpenReport "rptViewExpenses", acViewPreview
    >>>>>> DoCmd.RunCommand acCmdZoom100
    >>>>>> Exit_View_All_Expenses_Click:
    >>>>>> Exit Sub
    >>>>>>
    >>>>>>
    >>>>>> Err_View_All_Expenses_Click:
    >>>>>> MsgBox Err.Description
    >>>>>> Resume Exit_View_All_Expenses_Click
    >>>>>>
    >>>>>> End Sub
    >>>>>> "Bob" <xxx@xx.xx> wrote in message news:ea12bu$ql8$1@lust.ihug.co.nz...
    >>>>>>> Al, The form is called frmInvoice and the button on it is to open
    >>>>>>> rptViewExpenses.....Just not sure how to get to Module!
    >>>>>>> Thanks Bob
    >>>>>>> "Al Camp" <anon@anon.net> wrote in message
    >>>>>>> news:ewWv90qrGHA.3828@TK2MSFTNGP03.phx.gbl...
    >>>>>>>> Bob,
    >>>>>>>>>> The code to zoom the report has to go with the OpenReport method.
    >>>>>>>>
    >>>>>>>> The code I posted is placed in the form module of the form that calls the
    >>>>>>>> report. It doesn't go anywhere in the report itself.
    >>>>>>>>
    >>>>>>>> Ex. a form called frmMenu... with a button called cmdOpenReport...
    >>>>>>>> In the module of that form, against the button Click event...
    >>>>>>>>
    >>>>>>>> Private Sub cmdOpenReport_Click()
    >>>>>>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>>>>>> DoCmd.RunCommand acCmdZoom100
    >>>>>>>> End Sub
    >>>>>>>>
    >>>>>>>> --
    >>>>>>>> hth
    >>>>>>>> Al Camp
    >>>>>>>> Candia Computer Consulting - Candia NH
    >>>>>>>> http://home.comcast.net/~cccsolutions
    >>>>>>>>
    >>>>>>>> "Bob" <xxx@xx.xx> wrote in message news:ea0uuq$k9q$1@lust.ihug.co.nz...
    >>>>>>>>> Al I got this error: The command or action "Zoom 100%"isn't available now
    >>>>>>>>> Thanks Bob
    >>>>>>>>>
    >>>>>>>>> "Al Camp" <anon@anon.net> wrote in message
    >>>>>>>>> news:OctPCCgrGHA.5108@TK2MSFTNGP02.phx.gbl...
    >>>>>>>>>> Bob,
    >>>>>>>>>> The code to zoom the report has to go with the OpenReport method.
    >>>>>>>>>> DoCmd.OpenReport "YourReport", acViewPreview
    >>>>>>>>>> DoCmd.RunCommand acCmdZoom100
    >>>>>>>>>> --
    >>>>>>>>>> hth
    >>>>>>>>>> Al Camp
    >>>>>>>>>> Candia Computer Consulting - Candia NH
    >>>>>>>>>> http://home.comcast.net/~cccsolutions
    >>>>>>>>>> There are 10 types of people in the world.
    >>>>>>>>>> Those who understand binary, and those who don't.
    >>>>>>>>>>
    >>>>>>>>>> "Bob" <xxx@xx.xx> wrote in message news:e9umaa$gnl$1@lust.ihug.co.nz...
    >>>>>>>>>>>
    >>>>>>>>>>>
    >>>>>>>>>>> Report opens to fit can I change the option to open at 100% View???
    >>>>>>>>>>>
    >>>>>>>>>>> Thanks in advance.........Bob Vance
    >>>>>>>>>>>
    >>>>>>>>>>
    >>>>>>>>>>
    >>>>>>>>>
    >>>>>>>>>
    >>>>>>>>
    >>>>>>>>
    >>>>>>>
    >>>>>>>
    >>>>>>
    >>>>>>
    >>>>>
    >>>>>
    >>>>
    >>>>
    >>>
    >>>

    >>
    >>

    >
    >
     

Share This Page