Edgar,
I am not sure what are you trying to do, but see if this changes to your code help you:
oExcel=CREATEOBJECT("Excel.Application")
With oExcel
.DisplayAlerts= .F.
.WorkBooks.Open(XLSFile,0)
for each loSheet in .WorkSheets
loSheet.Select()
endfor
endwith
"The five senses obstruct or deform the apprehension of reality."
Jorge L. Borges?
"Premature optimization is the root of all evil in programming."
Donald Knuth, repeating C. A. R. Hoare
"To die for a religion is easier than to live it absolutely"
Jorge L. Borges