Method Range of Object Global Failed Error in With statement

[SBF12345]

Greetings,

I recently lost a bunch of macros to a PERSONAL file saved in the binary extension format (users caution/beware!) and am having to rebuild several macros.

I am running into a method range of object global failed error including the following lines of code. The macro to which these lines belong needs to first sort a group of cells by a date column.

Dim B as Range:   Set B = ActiveWorkbook.Activesheet.Cells(Rows.Count, "L").End(xlUp)

later in the code:

With ActiveWorkbook.ActiveSheet.Sort
     .SetRange Range("A1:" & B)

I need to select the range of cells so as to always include all cells in the range (the table grows each day). How can I format the .SetRange line so that I include the B variable range as the other cell to correctly set the range?

 

[Fluff]

Try

.SetRange Range("A1", B)

 

[SBF12345]

seems to be working, Thanks!

 

[mohadin]

deleted missing some thing

 

[Fluff]

You're welcome & thanks for the feedback