Dear BeExceller,

ane mau tanya nich...kenapa macro ane tidak jalan dan keluar error ini

Run-Time Error '1004':

The sort reference is not valid. Make sure that it's within the data you 
want to sort, and the first Sort By box isn't the sameor blank.


dan ini vba nya :

Sub Macro2()
'
' Macro2 Macro
'
    Range("A6").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection,
 Selection.End(xlDown)).Select
    ActiveWorkbook.Worksheets("Rank Error").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Rank Error").Sort.SortFields.Add Key:=Range( _
    "T6:T233"), SortOn:=xlSortOnValues, Order:=xlAscending, 
DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Rank Error").Sort
        .SetRange Range("A6:S233")
        .Header = xlGuess
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply --------------->>>> Error
    End With
    Range("T6").Select
End
 Sub

ane udah browsing google sana sini namun tetap gak ketemu jawabannya 
mohon bantuannya BeExceller...

terima kasih atas bantuannya.... 


regards,
.: Alu :.

Kirim email ke