Range Error in sort - Range of Object _Global failed

[IREALLYambatman]

So I used this code to find the last column letter...

With ActiveWorkbook.Worksheets("Edit Here")
    LastCol = .Cells(4, .Columns.Count).End(xlToLeft).Column
End With
ColumnLetter = Split(Cells(1, LastCol).Address, "$")(1)

And then when I tried to sort, using that in a range, I get an error.. Is Range("A11", ColumnLetter & 11) not a valid way to define a range? It works for the rest of my script..?
I get the error: Method: Range of Object _Global failed. Is that a bad way to call that range? Is there a better way I should be using?

    ActiveWorkbook.Worksheets("Edit Here").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Edit Here").Sort.SortFields.Add Key:=Range("A11", ColumnLetter & 11), SortOn:=xlSortOnValues, Order:=xlAscending, CustomOrder:= _
        "salted,SampleID,CCV,ccv,CCB,ccb,MB-,mb-,LCS-,lcs-,LCSD-,lcsd-", DataOption:= _
        xlSortNormal
    ActiveWorkbook.Worksheets("Edit Here").Sort.SortFields.Add Key:=Range("A13", ColumnLetter & 13), SortOn:=xlSortOnValues, Order:=xlAscending, CustomOrder:= _
        "salted,Dilution", DataOption:=xlSortNormal
'    With ActiveWorkbook.Worksheets("Edit Here").Sort
'        .SetRange Range("A1:", ColumnLetter & 1)
'        .Header = xlGuess
'        .MatchCase = False
'        .Orientation = xlLeftToRight
'        .SortMethod = xlPinYin
'        .Apply
'    End With

 

[NdNoviceHlp]

Maybe....

ColumnLetter = Split(Cells(1, LastCol).Address, "$")(0)

HTH. Dave

 

[Fluff]

Try it like

Range("A11:" & ColumnLetter & "11")

 

[IREALLYambatman]

I got it.. finally, I realized that it wasn't the column that was causing the error but the row count.. I should have included all the rows in the sort, so it worked when I used:

.SetRange Range("A11:" & ColumnLetter & LASTROW)

 

[Fluff]

Glad you sorted it thanks for the feedback