Сортировка листа Excel из WSH-скрипта

[Fktrc]

Как выполнить сабж на VBScript или JScript? Вот этот код я нашел на каком то забугорном сайте и синтаксически он верен, но скрипт выдает при выполнении ошибку "Метод Sort из класса Range завершен неверно".

ExSh.Range("A1:H7874").Sort ExSh.Range("A1"), _
xlAscending, _
ExSh.Range("B1"), _
, _
xlDescending, _
, _
, _
xlGuess, _
1, _
False, _
xlTopToBottom

PS: Записью макросов в Excel пользоваться умею. Не помогает.

[Fktrc]

Тьфу, блин. Час маялся, даже в форум написал. А через полчаса после отправки все получилось!!
Вот, может кому и пригодится

На JScript

var ExcelApp = WScript.CreateObject("Excel.Application")
ExcelApp.Workbooks.Open ("C:\\Мои документы\\ProbeScript.xls");
var ExBook = ExcelApp.ActiveWorkBook;
var ExSheet = ExBook.ActiveSheet;
var r = ExSheet.Range("A1:H7000");
r.Sort (r.Columns(1), xlAscending, null, null, null, null, null, xlGuess, 1, false, xlTopToBottom)

На VBScript (сокращено)

Dim r
Set r = ExSheet.Range("A1:H7000")
r.Sort r.Columns(1), xlAscending, , , , , , xlGuess, 1, false, xlTopToBottom


Естественно, сначала в скрипте надо объявить использованные константы.