[SOLUCIONADO] Dsum, problema con cálculo de año en fecha

[Isotz]

Buenos días:

Necesito ayuda con la función suma.

Necesito sumar los valores del campo "Ventas" de la tabla "Ingresos" en un año concreto. Para ello he creado la variable Var_AñoN y la variable Var_Ventas_AñoN.

Dim Var_AñoN As String
Dim Var_Ventas_AñoN As Currency

Var_Ventas_AñoN = Nz(DSum("[Ventas]", "Ingresos", "year([Fecha Ingreso])=Var_AñoN"))

He puesto nz() para evitar errores por valores null, pero me da problemas la condición "year([Fecha Ingreso])=Var_AñoN"

¿Me puede ayudar alguien?, por favor

Gracias

[jchuk]

Hola,

Prueba así:

Código:

Var_Ventas_AñoN = Nz(DSum("[Ventas]", "Ingresos", "year([Fecha Ingreso])='" & Var_AñoN & "'"))

Saludos!

[Isotz]

Gracias Jchuk, lo he resuelto con tu ayuda.

He definido la variable Var_AñoN como Integer y la funcion como sigue:

Var_Ventas_AñoN = Nz(DSum("[Ventas]", "Ingresos", "year([Fecha Ingreso])='" & Var_AñoN & "'"), 0)

Ahora quiero calcular las Ventas para el año_N pero sólo de Enero. He puesto lo siguiente

Var_Ventas_AñoN = Nz(DSum("[Ventas]", "Ingresos", "year([Fecha Ingreso])='" & Var_AñoN & "'") and "month([Fecha Ingreso])= '1'"), 0)


pero me da error de ejecución '13' - No coinciden los tipos

Échame una mano por favor.

Gracias