Change backgroung before print

Can anyone help change colors in the following code:

Private Sub printcurent_Click()
On Error GoTo Err_printcurent_Click


'change background color on record to white


    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.PrintOut acSelection


Exit_printcurent_Click:
    Exit Sub


Err_printcurent_Click:
    MsgBox Err.Description
    Resume Exit_printcurent_Click


'change color back
    
End Sub

I tried to use some excel vba I know, but they are obviously not as interchangeable as I would wish.

Re: Change backgroung before print

So that is a great start, I have edited the line to

Forms("Refunds sorted by Property Name").Controls("section:Detail").ForeColor = vbWhite

I need to change the "Back Color" of the whole form. O am assuming that I would just change ForeColor to BackColor but I still cant seem to find how to call the form to be changed. I tried "Section" and "Detail" individually but cant seem to get it.

Re: Change backgroung before print

So where can I find a list of all the colors that can be used.
I want to change it back to the default light brown color after the print.

Private Sub printcurent_Click()
On Error GoTo Err_printcurent_Click


Me.Section(acDetail).BackColor = vbWhite


    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.PrintOut acSelection


Exit_printcurent_Click:
    Exit Sub


Err_printcurent_Click:
    MsgBox Err.Description
    Resume Exit_printcurent_Click
    
Me.Section(acDetail).BackColor = vbWhite 'Wish for the default color here
    
End Sub

I know the number is -2147483633

Re: Change backgroung before print

So I figured it out, thanks for all your help Scott.

I tried to put the number I wanted in place of the name and that didnt work earlier :? . The number of course does work. The problem was the place of my last line.

I wanted to
Change > Print > Change
I was actually
Change > Print > Close > Change
which it was of course to late to change back.
So here is the final code using both sort and long versions you gave me. :thanx:

Private Sub printcurent_Click()
On Error GoTo Err_printcurent_Click


Me.Section(acDetail).BackColor = vbWhite


    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.PrintOut acSelection


Forms("Refunds sorted by Property Name").Section(acDetail).BackColor = -2147483633


Exit_printcurent_Click:
    Exit Sub


Err_printcurent_Click:
    MsgBox Err.Description
    Resume Exit_printcurent_Click
    
End Sub

Re: Change backgroung before print

I could but I dont what the difference would really be. It still would have to go through all the same processes and the color of the form isnt going to change.

Re: Change backgroung before print

WOW! I havent been on in awhile, I see you went over the 6K mark. I know I have greatly benefited from your help.