Sorting in Excel using VBScript

[bstewart]

I am new to VBScript but impressed with its the power.
I am trying to sort three columns of data in Excel using VB Script. By cheating using Excel, I recorded a marco and viewed the results in the VB Editor. I get these results

Rows("1:1&quot.Select
Selection.Sort Key1:=Range("B2&quot, Order1:=xlAscending, Key2:=Range("C2&quot _
, Order2:=xlAscending, Key3:=Range("D2&quot, Order3:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

I think in VBScript the sort starts something like this

objXL.Rows(1, 1).Select
objXL.Selection.Sort

Stuck after this

Thanks

 

[JohnYingling]

I would go back into the VB editor, edit the macro, start a Sub and
start typing
objXL.Rows(1, 1).Select and then a blank or left paren
and let Intellisense give me the argument list.
Try the same thing with
objXL.Selection.Sort

P.S. It "ain't cheatin'", it is called working smart.

http://www.VBCompare.com

Compare Code (Text)

http://www.VBSortGen.com

Generate Sort in VB or VBScript