Cambios en sabana de ventas
This commit is contained in:
@@ -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
|
||||
|
||||
|
||||
Reference in New Issue
Block a user