Cesar Enrique Yamunaque Baca respondió:
Me parece que el error esta al inicio prueba con XLApp=CREATEOBJECT("Excel.application") XLApp.Workbooks.Add() XLApp.visible=.T. En lugar de TmpSheet=GetObject('','Excel.Sheet') XLApp=TmpSheet.Application XLApp.visible=.T. XLApp.workbooks.add()...