 |
Club Builder Foro de C++Builder en español
|
| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
pollo_c Cdt

Registrado: 21 Dic 2006Mensajes: 17
|
Publicado: Vie 17 Ago, 2007 6:46 pm Asunto: Como abrir y modificar un archivo de Excel en builder |
|
|
Hola amigos del club, tengo un problema quiero que me ayuden a desde buider abrir un archivo de Excel (que ya fue guardado anteriormente) para modificarlo, ya que quiero llenar un formato que ya esta hecho y la verdad prefiero insertarle los datos al formato desde builder, que darle formato desde builder a un archivo de Excel.
Ya he investigado en el foro pero lo único que encontré es el código para abrir un archivo nuevo de Excel y insertarle datos (aun que este codigo me ayuda un poco pero me falta saber abrir un archivo existente).
Variant Excel,Libro,Hoja,Celda;
Excel = CreateOleObject("Excel.Application");
Excel.OlePropertySet("Visible", true);
Libro=Excel.OlePropertyGet("Workbooks");
Libro.OleProcedure("Add");
Hoja=Libro.OlePropertyGet("Item",1);
Libro=Hoja.OlePropertyGet("Worksheets");
Libro.OlePropertyGet("Item",1).OlePropertySet("Name","The yellow book-keeping ");
Libro.OlePropertyGet("Item",2).OlePropertySet("Name","The red book-keeping ");
for (int j=1;j<3;j++)
{
Hoja=Libro.OlePropertyGet("Item",j);
for (int i=1;i<11;i++)
{
Hoja.OlePropertyGet("Cells").OlePropertyGet("Item",i,1).OlePropertySet("Value",i);
Hoja.OlePropertyGet("Cells").OlePropertyGet("Item",i,2).OlePropertySet("Value",i*5);
Celda=Hoja.OlePropertyGet("Cells").OlePropertyGet("Item",i,2);
Celda.OlePropertyGet("Font").OlePropertySet("Color",clBlue);
Celda.OlePropertyGet("Font").OlePropertySet("Bold",true);
Celda.OlePropertyGet("Interior").OlePropertySet("ColorIndex",9-3*j);
}
Hoja.OlePropertyGet("Cells").OlePropertyGet("Item",11,1).OlePropertySet("Value","=SUM(A1:A10)");
Hoja.OlePropertyGet("Cells").OlePropertyGet("Item",11,2).OlePropertySet("Value","=SUM(B1:B10)");
}
Excel.OlePropertySet("DisplayAlerts",false); //suppress the warning dialog on closing the server
Excel.OlePropertyGet("Workbooks").OlePropertyGet("Item",1).OleProcedure("SaveAs","test.xls");
//Excel.OleProcedure("Quit");
Excel=Unassigned;
Espero de su ayuda amigos del club gracias.  _________________ quiero aprender |
|
| Volver arriba |
|
 |
Cesar C. Salazar Gonzalez Master


Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
Publicado: Sab 18 Ago, 2007 12:46 am Asunto: |
|
|
Existen muchas manera de Abrir un archivo,
1.- cuando no esta habierto Excel, puedes usar la sentencia ShellExecute, de la siguiente manera, claro esta con el nombre y la ruta del archivo
| Código: | ShellExecute(0,"open","Ruta_y_nombre_del_Archivo.xls","",0,SW_SHOW); |
La opción anterior te permite abrir un archivo, con la extencion xls, y obio con Excel Instaldo.
la otra opcion es teniendo a Excel Abierto.
2.- Esta forma lleva el siguiente codigo.
| Código: | Variant Excel;
String Ruta= "El_Archivo_de_Excel.xls";
Excel = CreateOleObject("Excel.Application");
Excel.OlePropertySet("Visible", true);
Excel.OlePropertyGet("WorkBooks").OleProcedure("Open",Ruta.c_str()); |
_________________
 |
|
| Volver arriba |
|
 |
pollo_c Cdt

Registrado: 21 Dic 2006Mensajes: 17
|
Publicado: Sab 18 Ago, 2007 4:53 am Asunto: ya casi lo tengo gracias me falta lo ultimo |
|
|
muchas gracias César C. Salazar González entendí mas o meno pero como le ago para trabajar con los libros del archivo que quiero modificar?  _________________ quiero aprender |
|
| Volver arriba |
|
 |
pollo_c Cdt

Registrado: 21 Dic 2006Mensajes: 17
|
Publicado: Sab 18 Ago, 2007 4:56 am Asunto: perdon con el codigo de cesar |
|
|
muchas gracias César C. Salazar González entendí mas o meno pero como puedo trabajar con las hojas del archivo que quiero modificar? _________________ quiero aprender |
|
| Volver arriba |
|
 |
|
|
No puedes publicar temas nuevos en este foro No puedes responder a temas en este foro No puedes editar tus mensajes en este foro No puedes borrar tus mensajes en este foro No puedes votar en las encuestas de este foro
|
© 2002–2026 Club Builder · Funciona con phpBB.
|