Printing Records From A Form 1

[MelissaT]

I have a database that users are going to be searching thru. They select a search criteria and a screen comes up with the results. I would like to able to print that list of results. The problem is, the users can actually view ALL of the records if they want, and I don't want them to be able to print that whole list. It would just be too big of a report. Is there a way, for example, that I can say on load of the form if there is more than 50 records, don't show my Print button? Melissa
Designing Access databases since 1999

 

[KenReay]

Hi

If Mr.RecordCount > 50 Then
cmdPrint.Visible = false
Else
cmdPrint.Visible = True
End If

in form load event
Regards

Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
UK

 

[KenReay]

Hi

OOPS! should have been

Hi

If Me.RecordCount > 50 Then
cmdPrint.Visible = false
Else
cmdPrint.Visible = True
End If

in form load event
Regards

Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
UK

 

[hwkranger]

You can also make it so that your user only prints the current record if you like with the following:

Private Sub PrintForm_Click()
On Error GoTo Err_Print_Click


    DoCmd.PrintOut acSelection 'prints current record

Exit_Print_Click:
    Exit Sub

Err_Print_Click:
    MsgBox Err.Description
    Resume Exit_Print_Click
    
End Sub

 

[MelissaT]

Ken,

I tried that, but I get a compiler error saying "Method or data member not found.", on the RecordCount. Melissa
Designing Access databases since 1999

 

[KenReay]

Hi

OK my apologies

make it

If Me.recordsetclone.RecordCount > 50 Then
cmdPrint.Visible = false
Else
cmdPrint.Visible = True
End If

Regards

Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
UK

 

[MelissaT]

Works! Great!

Thanks Melissa
Designing Access databases since 1999