xlsortnormal

Among many inexplicable problems is this. I recorded a macro to sort a spreadsheet using Column A as the first key. The pertinent code that Excel generated is ActiveWorkbook.Worksheets("CurrentWines").Sort.SortFields.Add Key:=Range( _ "A2:A237"), SortOn:=xlSortOnValues...

Hi all, I am working on this sheet and I need a lot of data to be sorted in a specific manner. The only issue is that the data I use changes. One week I may have 5000 rows of data in Excel, and others I may have 6000. Is there a way to make the sorta range in this code here change based on how...

Hi all, I am trying to add a sort function to a spreadsheet that varies in length, however the code stops when it gets to the .Apply section, does anyone know how to fix this? See the code below: LastRow = sht.Range("A1").CurrentRegion.Rows.Countsht.Range("A2", sht.Range("k" & LastRow)).Select...

Hi All, I've recorded a macro that sorts about 19 tables (used to create charts). I was wondering if there is a more efficient way to write this code? And if someone could have a crack at it? Sub SortZoneCharts() ' ' SortZoneCharts Macro ' ' Sheets("Chart_Tables").Select...