diff --git a/Bancos/FluctuacionCambiaria.aspx.vb b/Bancos/FluctuacionCambiaria.aspx.vb
index 5a62e3fc0..8b2fe1754 100644
--- a/Bancos/FluctuacionCambiaria.aspx.vb
+++ b/Bancos/FluctuacionCambiaria.aspx.vb
@@ -1285,25 +1285,31 @@ Partial Class Bancos_FluctuacionCambiaria
 
 #Region "  EXPORTA EXCEL  "
     Protected Sub LnkExportar_Click(sender As Object, e As EventArgs) Handles LnkExportar.Click
+        Dim StrFiltro As New StringBuilder
+        'If DdlProveedor.SelectedValue.ToEntero > 0 Then
+        StrFiltro.AppendFormat("{0} ", DdlMes.SelectedItem.ToString)
+        StrFiltro.AppendFormat("{0}  ", DdlAnio.SelectedValue)
+        StrFiltro.AppendFormat("TC: {0}", LtTipoCambioActual.Text)
+
         If (T.ActiveTabIndex = 0) Then
             'GvProveedores.ExportToExcelGembox("FluctuacionCambiariaProveedores_" & Now.ToShortDateString)
-            GvProveedores.ExportToExcelGembox("FCProveedores_" & Now.ToShortDateString, UsuarioActual, "Fluctuación Cambiaria - Proveedores")
+            GvProveedores.ExportToExcelGembox("Fluctuacion." + T.ActiveTab.HeaderText + "." + DdlMes.SelectedItem.ToString + "." + DdlAnio.SelectedValue, UsuarioActual, "Fluctuación Cambiaria - Proveedores", DatosFiltros:=StrFiltro.ToString())
         ElseIf (T.ActiveTabIndex = 1) Then
-            GvProveedoresAnt.ExportToExcelGembox("FCProveedoresAnt_" & Now.ToShortDateString, UsuarioActual, "Fluctuación Cambiaria - Proveedores Anticipos")
+            GvProveedoresAnt.ExportToExcelGembox("Fluctuacion." + T.ActiveTab.HeaderText + "." + DdlMes.SelectedItem.ToString + "." + DdlAnio.SelectedValue, UsuarioActual, "Fluctuación Cambiaria - Proveedores Anticipos", DatosFiltros:=StrFiltro.ToString())
         ElseIf (T.ActiveTabIndex = 2) Then
-            GvVentas.ExportToExcelGembox("FCClientes_" & Now.ToShortDateString, UsuarioActual, "Fluctuación Cambiaria - Clientes")
+            GvVentas.ExportToExcelGembox("Fluctuacion." + T.ActiveTab.HeaderText + "." + DdlMes.SelectedItem.ToString + "." + DdlAnio.SelectedValue, UsuarioActual, "Fluctuación Cambiaria - Clientes", DatosFiltros:=StrFiltro.ToString())
         ElseIf (T.ActiveTabIndex = 3) Then
-            GvClientesAnt.ExportToExcelGembox("FCClientesAnt_" & Now.ToShortDateString, UsuarioActual, "Fluctuación Cambiaria - Clientes Anticipos")
+            GvClientesAnt.ExportToExcelGembox("Fluctuacion." + T.ActiveTab.HeaderText + "." + DdlMes.SelectedItem.ToString + "." + DdlAnio.SelectedValue, UsuarioActual, "Fluctuación Cambiaria - Clientes Anticipos", DatosFiltros:=StrFiltro.ToString())
         ElseIf (T.ActiveTabIndex = 4) Then
-            GvAcreedores.ExportToExcelGembox("FCComprasAcreedores_" & Now.ToShortDateString, UsuarioActual, "Fluctuación Cambiaria - Compras Acreedores")
+            GvAcreedores.ExportToExcelGembox("Fluctuacion." + T.ActiveTab.HeaderText + "." + DdlMes.SelectedItem.ToString + "." + DdlAnio.SelectedValue, UsuarioActual, "Fluctuación Cambiaria - Compras Acreedores", DatosFiltros:=StrFiltro.ToString())
         ElseIf (T.ActiveTabIndex = 5) Then
-            GvAcreedoresAnt.ExportToExcelGembox("FCAcreedoresAnt_" & Now.ToShortDateString, UsuarioActual, "Fluctuación Cambiaria - Acreedores Anticipos")
+            GvAcreedoresAnt.ExportToExcelGembox("Fluctuacion." + T.ActiveTab.HeaderText + "." + DdlMes.SelectedItem.ToString + "." + DdlAnio.SelectedValue, UsuarioActual, "Fluctuación Cambiaria - Acreedores Anticipos", DatosFiltros:=StrFiltro.ToString())
         ElseIf (T.ActiveTabIndex = 6) Then
-            GvCuentas.ExportToExcelGembox("FCBancos_" & Now.ToShortDateString, UsuarioActual, "Fluctuación Cambiaria - Bancos")
+            GvCuentas.ExportToExcelGembox("Fluctuacion." + T.ActiveTab.HeaderText + "." + DdlMes.SelectedItem.ToString + "." + DdlAnio.SelectedValue, UsuarioActual, "Fluctuación Cambiaria - Bancos", DatosFiltros:=StrFiltro.ToString())
         ElseIf (T.ActiveTabIndex = 7) Then
-            GvFiliales.ExportToExcelGembox("FCFilial_" & Now.ToShortDateString, UsuarioActual, "Fluctuación Cambiaria - Filiales")
+            GvFiliales.ExportToExcelGembox("Fluctuacion." + T.ActiveTab.HeaderText + "." + DdlMes.SelectedItem.ToString + "." + DdlAnio.SelectedValue, UsuarioActual, "Fluctuación Cambiaria - Filiales", DatosFiltros:=StrFiltro.ToString())
         ElseIf (T.ActiveTabIndex = 8) Then
-            GvDeudores.ExportToExcelGembox("FCDeudores_" & Now.ToShortDateString, UsuarioActual, "Fluctuación Cambiaria - Deudores")
+            GvDeudores.ExportToExcelGembox("Fluctuacion." + T.ActiveTab.HeaderText + "." + DdlMes.SelectedItem.ToString + "." + DdlAnio.SelectedValue, UsuarioActual, "Fluctuación Cambiaria - Deudores", DatosFiltros:=StrFiltro.ToString())
         End If
 
         ' ImprimirReportePdf("Excel")