How can subtotal excel sheet through powerbuilder

I am using powerbuilder 11.2  and I am looking for the excel subtotal function to run through PB. Please any help very appreciate
Please can u help  to subtotal my excel sheet. code is given below:

ole_excel = CREATE OLEObject
li_rtn = ole_excel.ConnectToNewObject("excel.application")
IF li_rtn  = 0  THEN
   l_str_dir = is_filename
   li_nextrow = l_lng_rowcnt +
   li_lastrow = li_nextrow + 1
   ole_excel.visible = false
   ole_excel.Application.DisplayAlerts = False
   ole_excel.WorkBooks.Open(l_str_dir)
   ole_workbook = ole_excel.application.workbooks(1)
   ole_worksheet = ole_workbook.worksheets(1)
   ole_excel.Application.Visible = True
   ole_worksheet.Columns("A:L").EntireColumn.AutoFit
END IF

Message was edited by: Robert Nestor