In the Report Footer section, add a text box.
Set its Control Source property to something like this:
=Avg( IIf([Amount] = 0, Null, [Amount]) )
Substitute your own field name for Amount.
This solution uses the fact that Access ignores nulls when calculating
averages.