Risolto!
Il codice relativo alle linee l'ho posizionato sull'evento Format cosìccome lo avevo inserito in origine.
Il codice sintetico, perché ormai il problema l'avrei attribuito anche alla 3° dose del vaccino!
che normalmente scrivo per inviare a stampa un report è questo:
Dim PathStart As String, PathDestino As String
PathStart = Application.CurrentProject.Path & "\"
PathDestino = PathStart & "ProvaInfinita" & ".PDF"
DoCmd.OpenReport "RpFattPass1", acViewPreview, "", "IdPrimaNota=" & 2, acHidden
DoCmd.OutputTo acOutputReport, "RpFattPass1", "PDFFormat(*.pdf)", PathDestino, True, "", , acExportQualityPrint
Che in questo caso non ha funzionato, in quanto dopo 4 giorni di prove, naturalmente notti comprese, ho scoperto che nel caso vi siano delle linee (per ora solo queste) il report NON va aperto in modalità Hidden (Nascosta)
Torna tutto nella norma, le linee vengono disegnate i record del sottoreport tornano visibili con il codice scritto così:
Dim PathStart As String, PathDestino As String
PathStart = Application.CurrentProject.Path & "\"
PathDestino = PathStart & "ProvaInfinita" & ".PDF"
DoCmd.OpenReport "RpFattPass1", acViewPreview, "", "IdPrimaNota=" & 2, acNormal
DoCmd.OutputTo acOutputReport, "RpFattPass1", "PDFFormat(*.pdf)", PathDestino, True, "", , acExportQualityPrint
Grazie a tutti, alla prossima.