[Access 2003] problema Report

[luigice]

Scusatemi, vorrei sapere se esiste la possibilita` ,in una Routine Evento di un report, assegnare ad una variabile il valore di un campo della Query o table in quel momento attiva nel Report.
Ho provato con :

Private Sub Report_Open(Cancel As Integer)
Dim Y As Integer
DoCmd.OpenQuery "Query Stampa", acViewNormal, acEdit
Y = Query![Query Stampa]!N1
End Sub
oppure con :

DoCmd.OpenForm "Maschera Lettura Calcolo", acNormal, , , , acHidden
Y = Forms![Maschera Lettura Calcolo]!N1