public void PasteToExcel(string data)
{
System.Windows.Forms.Clipboard.Clear();
System.Windows.Forms.Clipboard.SetDataObject(data);
xSheet.Activate();
Excel.Range xRange = (Excel.Range)xSheet.get_Range(xSheet.Cells[1, 1], xSheet.Cells[1, 1]);
int wait = 50 + data.Length / 100;
//MessageBox.Show(wait.ToString());
Application.DoEvents();
Thread.Sleep(wait);
xSheet.Paste(xRange, false);
System.Windows.Forms.Clipboard.Clear();
}
public void generarReporte(DataGridView tabla, string nombreHojaReporte, string tituloReporte, string celdaInicioTitulo, string celdaFinTitulo, int indexInicioTitulo, int indexFinTitulo)
{
////Para futura referencia, esta es una forma probable de obtener un rango de celdas basado en indices
////Excel.Range range = hoja.Ranges(hoja.Cells[1, 1], hoja.Cells[1, 2]);
string columnaOrdenamiento = "Filtro";
try
{
Cursor.Current = Cursors.WaitCursor;
exportar.Enabled = false;
Microsoft.Office.Interop.Excel.Application excel = new Microsoft.Office.Interop.Excel.Application();
Microsoft.Office.Interop.Excel.Workbook wb = excel.Application.Workbooks.Add();
Microsoft.Office.Interop.Excel.Worksheet hojaDatos = wb.ActiveSheet;
int IndiceColumna = 0;
foreach (DataGridViewColumn col in tabla.Columns) // Columnas
{
IndiceColumna++;
hojaDatos.Cells[1, IndiceColumna] = col.Name;
}
//agregar campo de ordenamiento
hojaDatos.Cells[1, IndiceColumna + 1] = columnaOrdenamiento;
int IndiceFila = 0;
foreach (DataGridViewRow row in tabla.Rows) // Filas
{
IndiceFila++;
IndiceColumna = 0;
foreach (DataGridViewColumn col in tabla.Columns)
{
IndiceColumna++;
hojaDatos.Cells[IndiceFila + 1, IndiceColumna] = "'" + row.Cells[col.Name].Value;
}
hojaDatos.Cells[IndiceFila + 1, IndiceColumna + 1] = columnaOrdenamiento;
}
Excel.Worksheet hojaReporte = excel.Sheets.Add();
hojaReporte.Name = nombreHojaReporte;
hojaReporte.Activate();
Excel.Range oRange = hojaDatos.UsedRange;
Excel.PivotCache oPivotCache = wb.PivotCaches().Create(Excel.XlPivotTableSourceType.xlDatabase, oRange, Type.Missing);
Excel.Range oRange2 = hojaReporte.Cells[5, 2];
Excel.PivotCaches pch = wb.PivotCaches();
pch.Add(Microsoft.Office.Interop.Excel.XlPivotTableSourceType.xlDatabase, oRange).CreatePivotTable(oRange2, "reportePersonas", Type.Missing, Type.Missing);
Excel.PivotTable pvt = hojaReporte.PivotTables("reportePersonas") as Excel.PivotTable;
//configuracion de la tabla dinamica
pvt.RowGrand = false; //Ocultar los totales y subtotales de la tabla dinamica
pvt.ColumnGrand = false; //Ocultar los totales y subtotales de la tabla dinamica
pvt.EnableFieldList = false; //desactivar la opcion para apagar o encender campos en la tabla dinamica
pvt.ShowDrillIndicators = false; //quitar los simbolos de + en cada celda
pvt.EnableDrilldown = false; //no permitir minimizar las filas
pvt.InGridDropZones = false; //no permitir drag&drop de las columnas
pvt.ShowTableStyleRowHeaders = false; //no mostrar columna de por medio en negrita/otro color, segun el estilo de tabla
pvt.TableStyle2 = "PivotStyleMedium9"; //settear estilo de tabla
foreach (DataGridViewColumn col in tabla.Columns) // Columnas
{
Excel.PivotField field = (Excel.PivotField)pvt.PivotFields(col.Name);
field.Orientation = Excel.XlPivotFieldOrientation.xlRowField;
field.Subtotals[1] = false;
}
//agregar el PivotField para el campo de ordenamiento
Excel.PivotField f = (Excel.PivotField)pvt.PivotFields(columnaOrdenamiento);
f.Orientation = Excel.XlPivotFieldOrientation.xlDataField;
f.Name = "No remover, ocultar solamente";
//hacer que las columnas tengan el tamaño adecuado
hojaReporte.UsedRange.Columns.AutoFit();
//int startIndex = indexColumnaOrdenamiento.IndexOfAny("0123456789".ToCharArray());
//string indicatedColumnLetter = indexColumnaOrdenamiento.Substring(0, startIndex);
string column = obtenerNombreColExcel(tabla.Columns.Count + 2); // se agregan mas dos por la posicion inicial de la tabla y la columna de ordenamiento extra
hojaReporte.Range[column + "1"].EntireColumn.Hidden = true; //ocultando la columna de sort
//agregar el dato de encabezado
hojaReporte.Cells[2, 3] = tituloReporte;
Excel.Range titulo = hojaReporte.Range[celdaInicioTitulo, celdaFinTitulo];
titulo.Merge();
titulo.Font.Bold = true;
titulo.HorizontalAlignment = Excel.XlHAlign.xlHAlignCenter;
titulo.Borders[Excel.XlBordersIndex.xlEdgeBottom].Color = Color.Black;
hojaReporte.Cells[3, indexInicioTitulo] = "Fecha:";
hojaReporte.Cells[3, indexInicioTitulo + 1] = DateTime.Today;
hojaReporte.Cells[3, indexFinTitulo - 1] = "Hora:";
hojaReporte.Cells[3, indexFinTitulo] = DateTime.Now.Hour.ToString() + ":" + DateTime.Now.Minute.ToString();
//eliminar la hoja de datos
excel.DisplayAlerts = false; //bypass del bug que evita que se elimine la hoja
hojaDatos.Activate();
hojaDatos.Delete();
hojaReporte.Activate();
excel.DisplayAlerts = true; //retornar la propiedad al valor original
MessageBox.Show("Infome generado exitosamente.", "Operación completa", MessageBoxButtons.OK, MessageBoxIcon.Information);
exportar.Enabled = true;
excel.Visible = true;
Cursor.Current = Cursors.Default;
}
catch (Exception e)
{
Console.WriteLine(e.StackTrace);
Cursor.Current = Cursors.Default;
exportar.Enabled = true;
MessageBox.Show("Ha ocurrido un error en la creación del documento, póngase en contacto con los desarrolladores del sistema.", "Error - AlbergueHN", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}
public void AddSheet()
{
xSheet = (Excel.Worksheet)xWorkBook.Sheets.Add(Type.Missing, xSheet, Type.Missing, Type.Missing);
xSheet.Activate();
}