.setrange

The following bit of code brings up the above 1004 error when it gets to .Apply, but for the life of me I can't work out why! Sub DataSort() Dim wsRes As Worksheet, wsPoi As Worksheet Set wsRes = ThisWorkbook.Sheets("Results") Set wsPoi = ThisWorkbook.Sheets("Title Points")...

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...

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...

Hello, I have recorded a macro to sort each column alphabetically in a workbook. It works perfectly on our 2 computers that are windows 10 but not on the windows 7 computer. Below is the macro. Is this a common problem? Sub SuburbSort() ' ' SuburbSort Macro ' ' Columns("A:A").Select...

Hello: I have read some ways to make this work but when I try them it doesn't. I want the macro below to be part of my file, then weekly I have to save the data into a new file and the tab where this data is located gets a new name. So I would like the macro to work on the active sheet, but it...