excel app.range().sort()

[Gintaras]

this works
Macro Macro2230

Code:

Copy      Help

ExcelSheet es1.Init
Excel.Application app=es1.ws.Application
app.Range("A:D").Sort(app.Range("A:A") Excel.xlAscending app.Range("B:B") @ Excel.xlAscending @ 1 Excel.xlGuess @ 0 Excel.xlSortColumns 0 0 0 0)