If you are selecting cells on a worksheet you must have that as your activesheet you would be better off using a with statement i.e
[vba]
With Worksheets(CURwksname)
.Range(”A1:F1”).Merge
etc.....
[/vba]
If you are selecting cells on a worksheet you must have that as your activesheet you would be better off using a with statement i.e
[vba]
With Worksheets(CURwksname)
.Range(”A1:F1”).Merge
etc.....
[/vba]
Regards,
Simon
Please read this before cross posting!
In the unlikely event you didn't get your answer here try Microsoft Office Discussion @ The Code Cage
If I have seen further it is by standing on the shoulders of giants.
Isaac Newton, Letter to Robert Hooke, February 5, 1675 English mathematician & physicist (1642 - 1727)
Posting Permissions
Reply With Quote