Change Report to open 100%

#10 (**permalink**) 28-Jul-2006, 08:41 AM

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" 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.
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/information-technology/13765-change-report-to-open-100-a.html
>
> 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" 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" 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" 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" 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" 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" 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" 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.
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=13765
>>>>>>>> Those who understand binary, and those who don't.
>>>>>>>>
>>>>>>>> "Bob" 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 (**permalink**) 28-Jul-2006, 08:41 AM

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" 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
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=13765
> 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" 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" 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" 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.
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=13765
>>>>
>>>> "Bob" 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" 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" 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" 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" 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" 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 (**permalink**) 28-Jul-2006, 08:41 AM

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" 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
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=13765
> Hmmmm......Access 2002, thanks for your help,,,Bob
> "Bob" 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" 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" 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" 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" 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" 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" 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
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=13765
>>>>>>>> DoCmd.RunCommand acCmdZoom100
>>>>>>>> End Sub
>>>>>>>>
>>>>>>>> --
>>>>>>>> hth
>>>>>>>> Al Camp
>>>>>>>> Candia Computer Consulting - Candia NH
>>>>>>>> http://home.comcast.net/~cccsolutions
>>>>>>>>
>>>>>>>> "Bob" 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" 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" 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
>>>>>>>>>>>
>>>>>>>>>>
>>>>>>>>>>
>>>>>>>>>
>>>>>>>>>
>>>>>>>>
>>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>
>>>>>>
>>>>>
>>>>>
>>>>
>>>>
>>>
>>>
>>
>>
>
>