I am trying to create subtotals in Excel with multiple columns being subtotaled. I am unclear on how to use Excel arrays in Foxpro.

EXCEL HELP:
expression.Subtotal(GroupBy, Function, TotalList, Replace, PageBreaks, SummaryBelowData)

MY CODE:
oSheet = CreateObject("Excel.Application")
oSheet.workBooks.Open("C:\data\cob7\tmpmbr.xls")
oSheet.Selection.Subtotal (1, -4157,3)

With my code, the third column is subtotaled correctly. How would I subtotal both column three and four.