>Hello again Cetin & Erik,
>
>The selection object also works:
>loExcel = CREATEOBJECT('excel.application')
>loSheet = loExcel.Application.Workbooks.Open(lcSpreadSheet, 0)
>DIMENSION laArray[1]
>laArray[1] = 14
>loSheet.Application.ActiveWindow.Selection.Subtotal(5, xlsum, @laArray, 1, 0, 1)
>
>Thanks!
Ohh. Now I understand very well why Michel orders messages as last one on top :) Just one side note : Activewindow is not necessary there.
Cetin