How to design a report ?

[Ucan]

I have probblems about the way to design this report:
I wish to print all or part of a document.
This document is built on a huge table divided into several tables. All these tables are connected by a 1/1 relationship as shown in the screen below


I do not need to print systematically all the chapters of the document. A chapter roughly corresponding to a linked table.
Through a form and checkboxes, I wish I could select either this or this chapter to print.




Unfortunately, I do not see how to perform this operation.
I think I would need a query (maybe many of them... ?) but how can I connect the checkbox with the elements of the selected tables to be printed?

Any suggestions would be greatly appreciated.
One last point I don't write code in VBA.

[ranman256]

Checkboxes and radios are a problem for this. You'd need to create many queries or reports to get it to work with these controls.
but, there are alternates:
1. use lists (and a table). These values can be added/removed without more programming. User picks items in a listbox, these are added to a 'picked' table, this table is joined
to the data table so that only these values show in the query. No code.

2. using some VB, you could collect the checkbox items selected then open the report with that filter:

'----------------
sub btnFilter_click()
'----------------
dim sWhere as string ,sWhere2 as string
sWhere = "1=1"
   'collect true checkboxes
if chkBrf.value  then sWhere2 = sWhere2 & " [Impress]='Brief' or "
if chkBM.value  then sWhere2 = sWhere2 & " [Impress]='BusModel' or "
if chkSynth.value  then sWhere2 = sWhere2 & " [Impress]='Synthetic' or "

   'add AND ,remove last OR
IF sWhere2 <> "" then  sWhere = " and " & left(sWhere2, Len(sWhere2)- 4)

If sWhere = "1=1" Then
  docmd.OpenReport "rMyReport",acViewPreview 
Else
  docmd.OpenReport "rMyReport",acViewPreview ,,sWhere 
End If
end sub

you can also use it on a form of all records using this filter:

If sWhere = "1=1" Then
  Me.FilterOn = False
Else
  Me.Filter = sWhere
  Me.FilterOn = True
End If
end sub

[Ucan]

Thx Ranman for these 2 hints.
I might give a try with the first one even though I don't see yet exactly how to do this: "these are added to a 'picked' table, this table is joined
to the data table so that only these values show in the query".
But I'm going to think about it...