Ver Mensaje Individual
  #12 (permalink)  
Antiguo 07/07/2005, 08:56
eagrella
 
Fecha de Ingreso: octubre-2003
Ubicación: Caracas, Venezuela
Mensajes: 92
Antigüedad: 21 años, 6 meses
Puntos: 0
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
[QOUTE]
Set appExcel = Server.CreateObject("Excel.Application")'Component e que se instala cuando posee office instalado sino NO SIRVE

appExcel.Workbooks.Open(nombre_de_tu_archivo)
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
[/QOUTE]

Espero que les sirva de ayuda de todas formas lo voy a publicar en el FAQ de ASP