If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Objects not showing in Print Preview, but appear when actually pri
Hello,
I need to have some items appear only on the last page of my report, at the bottom of the page. I used some code to accomplish this, and in the print preview everything looks good. The bottom of every page is blank except the last page, which is the way I want it. However, when I actually print the report, the objects print on every page. I created text boxes and labels in the Page Footer section and set the visibile to No. I then used this code (at the On Format event in the Page Footer properties) to display on the last page: Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer) If [Page] = [Pages] Then [TotalDue].Visible = True [Label143].Visible = True End If End Sub Any ideas how I can get these objects to only print on the last page? Thank you. Ryan |
#2
|
|||
|
|||
Objects not showing in Print Preview, but appear when actually pri
On Mon, 17 Aug 2009 09:25:01 -0700, Ryan T wrote:
Hello, I need to have some items appear only on the last page of my report, at the bottom of the page. I used some code to accomplish this, and in the print preview everything looks good. The bottom of every page is blank except the last page, which is the way I want it. However, when I actually print the report, the objects print on every page. I created text boxes and labels in the Page Footer section and set the visibile to No. I then used this code (at the On Format event in the Page Footer properties) to display on the last page: Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer) If [Page] = [Pages] Then [TotalDue].Visible = True [Label143].Visible = True End If End Sub Any ideas how I can get these objects to only print on the last page? Thank you. Ryan If [Page] = [Pages] Then [TotalDue].Visible = True [Label143].Visible = True Else [TotalDue].Visible = False [Label143].Visible = False End If Or to simplify the above code: [TotalDue].Visible = [Page] = [Pages] [Label143].Visible = [Page] = [Pages] -- Fred Please respond only to this newsgroup. I do not reply to personal e-mail |
#3
|
|||
|
|||
Objects not showing in Print Preview, but appear when actually
"fredg" wrote: On Mon, 17 Aug 2009 09:25:01 -0700, Ryan T wrote: Hello, I need to have some items appear only on the last page of my report, at the bottom of the page. I used some code to accomplish this, and in the print preview everything looks good. The bottom of every page is blank except the last page, which is the way I want it. However, when I actually print the report, the objects print on every page. I created text boxes and labels in the Page Footer section and set the visibile to No. I then used this code (at the On Format event in the Page Footer properties) to display on the last page: Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer) If [Page] = [Pages] Then [TotalDue].Visible = True [Label143].Visible = True End If End Sub Any ideas how I can get these objects to only print on the last page? Thank you. Ryan If [Page] = [Pages] Then [TotalDue].Visible = True [Label143].Visible = True Else [TotalDue].Visible = False [Label143].Visible = False End If Or to simplify the above code: [TotalDue].Visible = [Page] = [Pages] [Label143].Visible = [Page] = [Pages] -- Fred Please respond only to this newsgroup. I do not reply to personal e-mail I tried fredg's suggestion and it still prints on all pages. Test boxes and labels aren't visible when viewing the report on your monitor but they do show up when printed. I've searched the posts and there doesn't seem to be a solution. Why is it so difficult to have a report footer print at the bottom of the page? |
#4
|
|||
|
|||
Objects not showing in Print Preview, but appear when actually
Fred,
I used the Else code below and it worked perfectly. Thank you so much for your help. Ryan "fredg" wrote: On Mon, 17 Aug 2009 09:25:01 -0700, Ryan T wrote: Hello, I need to have some items appear only on the last page of my report, at the bottom of the page. I used some code to accomplish this, and in the print preview everything looks good. The bottom of every page is blank except the last page, which is the way I want it. However, when I actually print the report, the objects print on every page. I created text boxes and labels in the Page Footer section and set the visibile to No. I then used this code (at the On Format event in the Page Footer properties) to display on the last page: Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer) If [Page] = [Pages] Then [TotalDue].Visible = True [Label143].Visible = True End If End Sub Any ideas how I can get these objects to only print on the last page? Thank you. Ryan If [Page] = [Pages] Then [TotalDue].Visible = True [Label143].Visible = True Else [TotalDue].Visible = False [Label143].Visible = False End If Or to simplify the above code: [TotalDue].Visible = [Page] = [Pages] [Label143].Visible = [Page] = [Pages] -- Fred Please respond only to this newsgroup. I do not reply to personal e-mail |
Thread Tools | |
Display Modes | |
|
|