Are you trying to get a value of what is in cell "A1" if so
try just this one command

obSheet.Range("A1").Value

or

obSheet.Cells("A1").Value


I don't have vfp on this machine at home and did not bring my laptop with me.

If this does not work you can direct e-mail me at work at dmcdowel@nasco.com

Thanks
Darren Mc Dowell