diff --git a/Acumuladores/EntradasUsadosResumenRep.aspx.vb b/Acumuladores/EntradasUsadosResumenRep.aspx.vb index 6a4077447..fb134f4fb 100644 --- a/Acumuladores/EntradasUsadosResumenRep.aspx.vb +++ b/Acumuladores/EntradasUsadosResumenRep.aspx.vb @@ -117,7 +117,7 @@ Partial Class Acumuladores_RepEntradasUsados SpreadsheetInfo.SetLicense(ModExtensiones.SerialGemBoxSpreadsheet) Dim workbook As New ExcelFile() - Dim worksheet = workbook.Worksheets.Add("Sabana de ventas") + Dim worksheet = workbook.Worksheets.Add("DATOS") worksheet.InsertDataTable(dt, New InsertDataTableOptions() With { .ColumnHeaders = True, @@ -129,6 +129,10 @@ Partial Class Acumuladores_RepEntradasUsados Dim columnCount = worksheet.CalculateMaxUsedColumns() For i = 0 To columnCount + 'COLUMNA DE FECHA + If i = 1 Then + worksheet.Columns(i).Style.NumberFormat = "dd/MM/yyyy" + End If worksheet.Columns(i).AutoFit(1, worksheet.Rows(0), worksheet.Rows(worksheet.Rows.Count - 1)) Next