Print report command button

[Stika]

Hi,

I cant seem to get my head around this..I need to create a strWhere that will print the report if a checkbox isnt ticked.

This is my current command button code

Private Sub Command37_Click()
Dim strWhere As String


If Me.Dirty Then 'Save any edits.
Me.Dirty = False
End If


If Me.NewRecord Then 'Check there is a record to print


MsgBox "Select a record to print"
Else
strWhere = "[ID] = " & Me.[ID]
DoCmd.OpenReport "Connote1", acNormal, , strWhere
End If
DoCmd.GoToRecord acDataForm, "Connote", acNewRec
End Sub

The Control Source is Manifest and the form label is Check52

In the Table it come up yes if I tick it and no If I dont...I want it to only print if checkbox is not ticked otherwise save and goto new record

I hope that makes sense

[June7]

Manifest is the yes/no field that checkbox is bound to?

You only want to open the report if the checkbox is no?

How is a label relevant?

If Me.Manifest = False Then DoCmd.OpenReport "Connote1", acNormal, , "[ID] = " & Me.[ID]

[Stika]

Manifest is the yes/no field that checkbox is bound to?
Yes it is

You only want to open the report if the checkbox is no?
Thats correct

How is a label relevant?
I just havent given it a name yet

If Me.Manifest = False Then DoCmd.OpenReport "Connote1", acNormal, , "[ID] = " & Me.[ID]

Does that mean I get rid of the dim strwhere?

[Stika]

Ok, Now I have another problem but its along the same lines....

I Dont want it to open the report I just want it to print it and goto new record...But now I have built a navigation panel and it will print but wont goto new record

[June7]

Use strWhere variable if you want. I don't usually bother with variables if only using the value once.

The acNormal will cause report to open direct to printer.

You mean a navigation form? I don't use navigation form. Review https://www.accessforums.net/reports...ort-30886.html

[Stika]

Its alright...ive gone again doing navigation form from with wizzard and created a menu instead...Works well for me

Thanks