Are you running any on save macros?
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
As for the Range(rangeText).Select
Try adding the sheet name to the line.
Worksheet("Sheet1").Range(rangeText).Select
If you are on sheet1 when the macro is executed and rangeText is on sheet2 it
might give the error.