Ver Mensaje Individual
  #117 (permalink)  
Antiguo 07/07/2005, 09:02
eagrella
 
Fecha de Ingreso: octubre-2003
Ubicación: Caracas, Venezuela
Mensajes: 92
Antigüedad: 21 años, 2 meses
Puntos: 0
De acuerdo Como Escribir Un Archivo de Excel Ya Existente

Aqui les va la solucion de como escribir en un archivo de excel ya existente y con cualquier tipo de datos TANTO ESTATICOS COMO DINAMICOS
Código:
Set appExcel = Server.CreateObject("Excel.Application")'Componente que se instala cuando posee office instalado sino NO SIRVE

appExcel.Workbooks.Open(nombre_de_tu_archivo)'abres el archivo de excel de tu maquina
appExcel.Range("B" & 2).Value = 1 'escribe 1 en la linea b2 de excel 
For i = 4 To 10 ' empiezo a escribir desde la linea 4 hasta la 10 
appExcel.Range("A" & i).Value = "PEPE"
appExcel.Range("B" & i).Value = 15
appExcel.Range("C" & i).Value = "Profecional"
appExcel.Range("D" & i).Value = 40
Next
appExcel.ActiveWorkbook.SaveAs (ruta_mas_nombre_nuevo) 'salvo elarchivo como quieras y donde quieras
appExcel.Workbooks.Close ' cierro el objeto y listo
Espero que les sirva de ayuda!!!

Última edición por eagrella; 07/07/2005 a las 09:09