Quando Salvi il PDF non chiudi il Report... e di solito si apre in Modalità acHidden, poi dopo il PrintOut, si esegue il Close.
Tu apri in modalità Preview... quindi poi devi chiuderlo a mano... e non minimizzarlo...
Prova questo:
DoCmd.OpenReport "Contratto nuovo", acViewPreview, , "ID =" & Me!ID
' ALTERNATIVA
' DoCmd.OpenReport "Contratto nuovo",acViewPreview , , "ID =" & Me!ID, acHidden
Contratto = [ID] & " - " & [Cognome] & " " & [Nome]
MsgBox (Contratto)
DoCmd.OutputTo acOutputReport,"Contratto nuovo", acFormatPDF, "indirizzo dove salvare" & Contratto & ".pdf"
DoCmd.Close acReport, "Contratto nuovo"
Fai attenzione che i NOMI degli oggetti è bene non abbiano caratteri speciali come lo spazio ecc... è un rischio... nemmeno nel NomeContratto non mettere quello spazio prima di Nome.