Jason,

Has your code created an excel object, open a workbook and referenced a sheet?
"xlToRight" and "xlDown" have worked for me. If you have excel visible, at this point you should see the cursur in cell B2.
>>with objsheet
>> .Range("A1").Select
>> .Selection.End(xlToRight).Select
>> .Selection.End(xlDown).Select
>>endwith
>
>Umm, I haven't used that command, sometimes you have to play with them, unless someone else can chime in with help. It looks like maybe too many Selects, is my first thought...you might try something like
>
>.Selection.End = xlToRight