Change Recorded Range To Used Range.

[Dazzawm]

I have this section of code that I recorded, how do I change it to the used range so it can be used on different files that have different amount of rows and columns please?

Cells.Select
    Sheets("Sheet1").Activate
    ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add(Range("C2:C611582"), _
        xlSortOnCellColor, xlAscending, , xlSortNormal).SortOnValue.Color = RGB(255, _
        255, 0)
    ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add key:=Range( _
        "A2:A611582"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
        xlSortNormal
    With ActiveWorkbook.Worksheets("Sheet1").Sort
        .SetRange Range("A1:AZ611582")
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With

 

[Dazzawm]

I need it for work and I haven't the time or knowhow trying to work it out. Thanks anyway.

 

[Joe4]

I literally showed you exactly how to do it. You just need to plug-and-play it in. It would literally take minutes.
But I cannot make you want to learn it...

 

[Dazzawm]

I have said I have no idea what I am doing and requested the complete code, if you're not willing to do it for me then that's up to you.