diff --git a/Contabilidad/RepGastosCC.aspx.vb b/Contabilidad/RepGastosCC.aspx.vb
index 02fab7b7f..492a0beaf 100644
--- a/Contabilidad/RepGastosCC.aspx.vb
+++ b/Contabilidad/RepGastosCC.aspx.vb
@@ -145,7 +145,10 @@ Partial Class RepGastosCC
     End Sub
 
     Private Sub ImgExcel_Click(sender As Object, e As EventArgs) Handles ImgExcel.Click
-        GvDatos.ExportToExcelG("ReporteGastos" & Now.ToShortDateString & ".xlsx")
+        Dim StrFiltro As New StringBuilder
+        If txtFechaI.Text <> "" Then StrFiltro.AppendFormat(" Fecha Inicio: {0}", txtFechaI.Text)
+        If txtFechaF.Text <> "" Then StrFiltro.AppendFormat(" Fecha Fin: {0}", txtFechaF.Text)
+        GvDatos.ExportToExcelG("ReporteGastos" & Now.ToShortDateString, "Gastos Acumulados", UsuarioActual, StrFiltro.ToString, 100, 200)
     End Sub
     ' Note, it is important to override the form verification in order to successfully call a GridView1.RenderControl method.
     Public Overrides Sub VerifyRenderingInServerForm(control As Control)