Trasfondo
Estoy desarrollando una funcionalidad que permite la creación de un archivo Excel, el cual debe construirse con un cierto número de hojas.
El archivo Excel a construir se compone de 5 hojas, de las cuales 3 deben ser creadas a partir de otro archivo Excel.
Para efectos de comprensión de esta pregunta, he nombrado a los archivos de esta manera:
- Nuevo Archivo.xlsx: Archivo Excel a armar.
- Plantilla.xlsx: Archivo Excel que contiene las hojas que se usarán para agregar al archivo (Nuevo Archivo.xlsx)
Adjunto los enlaces de los archivos Plantilla.xlsx y Nuevo Archivo.xlsx en caso de que deseen revisar su contenido.
Del archivo Plantilla.xlsx solo se usarán estas hojas:
- H3 Custom
- VENTAS
- DATOS
Implementación
Luego de buscar cómo puedo copiar y pegar otra una hoja de Excel a otro archivo Excel, encontré esta respuesta, la cual provee un código fuente que he modificado para mis propósitos:
#region INTENTO #3.1
// Fuente: http://www.codeproject.com/Questions/695539/How-to-copy-data-from-one-excel-sheet-to-another
bool hasErrors = false;
try
{
string ruta_plantilla = @"C:\Plantilla.xlsx";
string ruta_archivo_final = @"C:\Nuevo Archivo.xlsx";
// Instancia de Excel.
Microsoft.Office.Interop.Excel.Application excel
= new Microsoft.Office.Interop.Excel.Application();
// Abrir el excel-plantilla:
Workbook wbSource = excel.Workbooks.Open(ruta_plantilla, 0, false, 1, "", "", false,
XlPlatform.xlWindows, 9, true, false, 0, true, false, false);
// Abrir el archivo donde se guardará todos los datos.
Workbook wbDestination = excel.Workbooks.Open(ruta_archivo_final, 0, false, 1, "", "", false,
XlPlatform.xlWindows, 9, true, false, 0, true, false, false);
// Detectar cuántas hojas tiene.
int cantHojas = wbDestination.Sheets.Count;
// Si son menores a 5...
if (cantHojas < 5)
{
// Agregar las hojas faltantes.
Sheets hojas = null;
Worksheet wrkSh = null;
for (int i = cantHojas; i < 5; i++)
{
hojas = wbDestination.Sheets;
wrkSh = hojas.Add(Type.Missing, wbDestination.Worksheets[i], Type.Missing, Type.Missing);
releaseObject(hojas);
}
}
// Obtener la plantilla de la hoja #3.
Worksheet wkrSh_src_pl3 = wbSource.Sheets[3];
wkrSh_src_pl3.UsedRange.Copy(Type.Missing);
// Copiar en estas hojas.
// Copiarla en la hoja #4 del archivo final.
Worksheet wrkSh_pl3 = wbDestination.Sheets[3]; // Hoja que contiene la plantilla.
wrkSh_pl3.UsedRange.PasteSpecial(XlPasteType.xlPasteAll, XlPasteSpecialOperation.xlPasteSpecialOperationNone, Type.Missing, Type.Missing);
wrkSh_pl3.Name = wkrSh_src_pl3.Name;
wrkSh_pl3.Columns.AutoFit();
// Obtener la plantilla de la hoja #4.
Worksheet wkrSh_src_pl4 = wbSource.Sheets[4];
wkrSh_src_pl4.UsedRange.Copy(Type.Missing);
// Copiarla en la hoja #4 del archivo final.
Worksheet wrkSh_pl4 = wbDestination.Sheets[4]; // Hoja que contiene la plantilla.
wrkSh_pl4.UsedRange.PasteSpecial(XlPasteType.xlPasteAll, XlPasteSpecialOperation.xlPasteSpecialOperationNone, Type.Missing, Type.Missing);
wrkSh_pl4.Name = wkrSh_src_pl4.Name;
wrkSh_pl4.Columns.AutoFit();
// Obtener la plantilla de la hoja #5.
Worksheet wkrSh_src_pl5 = wbSource.Sheets[5];
wkrSh_src_pl5.UsedRange.Copy(Type.Missing);
// Copiarla en la hoja #5 del archivo final.
Worksheet wrkSh_pl5 = wbDestination.Sheets[5]; // Hoja que contiene la plantilla.
wrkSh_pl5.UsedRange.PasteSpecial(XlPasteType.xlPasteAll, XlPasteSpecialOperation.xlPasteSpecialOperationNone, Type.Missing, Type.Missing);
wrkSh_pl5.Name = wkrSh_src_pl5.Name;
wrkSh_pl5.Columns.AutoFit();
// Establecer la primera hoja como "activa".
wbDestination.Sheets[1].Activate();
wbDestination.Save();
wbSource.Close();
excel.Quit();
hasErrors = false;
}
catch (Exception ex)
{
MessageBox.Show("Error: " + SALTO_DE_LINEA + ex.Message, TITULO, MessageBoxButtons.OK, MessageBoxIcon.Error);
RegistrarEventosDelPrograma(DateTime.Now, "Error al copiar hoja a otro excel: " + ex.ToString());
hasErrors = true;
}
#endregion
El problema con este código es que, al copiar la hoja 3 llamada VENTAS no la pega igual a como se muestra en la plantilla.
La captura de pantalla #1 muestra la hoja VENTAS contenida en el archivo Plantilla.xlsx:
La captura de pantalla #2 muestra la hoja VENTAS generada con el código anterior en el archivo Nuevo Archivo.xlsx:
Las demás hojas es decir H3 Custom yy DATOS se generan correctamente en el archivo nuevo de Excel; pero no es el caso de la hoja VENTAS.
Mis preguntas son:
- ¿Cómo copiar y pegar una hoja de un archivo Excel a otro archivo Excel en construcción?
- ¿Qué otra manera puedo emplear para por programación copiar y pegar una hoja de Excel a otro archivo Excel?
RESUMEN DIARIO CAJA F116.xlsx