obtengo el error '438 el objeto (el objeto de excel) no admite la propiedad o método (save as....)' al intentar grabar un fichero de excel.....


Set objWorksheet = CreateObject("Excel.APPLICATION")


...


objWorksheet.SaveAs FileName:="C:\fichero1.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False


....


muchas gracias!!!!

Ponlo así, a ver si funciona:

Código:

Dim xlNormal As Long
xlNormal = -4143
objWorksheet.ActiveWorkbook.SaveAs FileName:="C:\fichero1.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False

Saludos

muchas gracias anibal, funcionó OK.


aun que alguien sabe como hacer que EXCEL.EXE no se quede activo en las tareas de windows? muchas gracias!