Cetin,
Since there is only one workbook in this instance the two are equivalent... but even making the change doesn't solve the no paint problem.
>loRow = loExcel.ActiveSheet.Rows( 1 )
>would be :
>loRow = loExcel.ActiveWorkBook.ActiveSheet.Rows( 1 )