=AVERAGE: How to exclude cell with errors completely?

[msword]

I have bunch of cell with #DIV/0! errors with should be excluded from beign used inside =AVARAGE function.
After trying the =AVERAGE(IFERROR(N33:N36, 0)) the expected result was not acieved since I am getting the "10" value (B2 cell) instead of the "40".
So, how to edit AVERAGE function to excude the #DIV/0! cells completely?

new.xlsx
	B	C	D	E	F	G
2	10.00		40.00 ₴		#REF!	#REF!
3			#REF!		#REF!	#REF!
4			#REF!		#REF!	#REF!
5			#REF!		#REF!	#REF!
Sheet1

Cell Formulas
Range	Formula
B2	B2	=AVERAGE(IFERROR(D2:D5, 0))
F2:F5	F2	=#REF!-#REF!
G2:G5	G2	=F2/#REF!
D3:D5	D3	=#REF!/#REF!

 

[etaf]

=AVERAGE(IF(ISNUMBER(D2:D5), D2:D5))

Book12
	A	B	C	D	E	F	G
1
2	40	D1:D4))		40		#REF!	#REF!
3				#REF!		#REF!	#REF!
4				#REF!		#REF!	#REF!
5				#REF!		#REF!	#REF!
6
7
Sheet2

Cell Formulas
Range	Formula
A2	A2	=AVERAGE(IF(ISNUMBER(D2:D5), D2:D5))
F2:F5	F2	=#REF!-#REF!
G2:G5	G2	=F2/#REF!
D3:D5	D3	=#REF!/#REF!

 

[Peter_SSs]

Or

24 03 01.xlsm
	B	C	D
2	40		40
3			#REF!
4			#REF!
5			#REF!
AVERAGE

Cell Formulas
Range	Formula
B2	B2	=AGGREGATE(1,6,D2:D5)
D3:D5	D3	=#REF!

 

[msword]

@etaf @Peter_SSs Both solutions worked for me. Many Thanks!

 

[etaf]

you are welcome