para mvallejos

candela
20 de Septiembre del 2004
Hola mvallejos! Lo he hecho como me has dicho y me da el mismo error. Te escribo el codigo, a ver si ves algo raro:
Set miexcel = CreateObject("Excel.Application")
Set milibro = excel.Workbooks.Open("ruta")
miexcel.Visible = True
miexcel.Application.Range("C7").Value = Txtcliente.Text
miexcel.Application.Range("D8").Value = Txtlocalidad.Text
miexcel.Application.Range("E13").Value = Txtreferencia.Text
miexcel.Application.Range("E14").Value = Txtfecha.Text
miexcel.Application.Range("A16").Value = Txtdescripcion.Text
miexcel.Application.Range("A55").Value = Txtpersonal.Text
\'lo guardo en donde quiero con el nombre que quiero
ActiveWorkbook.SaveAs "nuevaruta"
\'asi se cierra
milibro.Close
pero yo quiero seguir viendo mi presupuesto y que me permita hacer varios seguidos. El error en tiempo de ejecucion me da exactamente igual si lo cierro o si no lo cierro milibro

Estoy un poquito desesperadita.. un poquito

Besos