Hi,
You're committing a cardinal sin by not putting your code in code tags. I'll change it for you but please remember for next time.
Then two module level procedures. Note that your original code can be much simplified. You rarely need to use .Select and .Activate. I've left it in place for note but it doesn't run because of the End instruction. Just remove your code.
In addition it's usually good practice to refer to objects with their complete name. As a minimum use the Sheetname.Range construction, and if several workbooks are involved the WorkbookName.SheetName.Range. That way the code will run correctly whichever sheet happens to be the active sheet. The problem with not specifying a sheet name is that the code will run but always on the currently active sheet which may have detrimental effects.
Lastly avoid using sheet tab names like "Formulas". Users often change these and in which case your macro will fall over. Always use the sheet Code name.
Bookmarks