Subscript out of range- sheet naming error?

Here is the code, and the bolded portion is returning a subscript out of range error. I'm thinking that the preceeding code giving the "sheetDSR" another name is messing it up. Any suggestions on how to correct this?

Please Login or Register  to view this content.

Hello catccc,

Welcome to the Forum!

To make your posts easier to read, copy, and edit please wrap your code. I did it for you this time. Here is how you can do it next time.

How to wrap your Code using the # icon

1. Select all your code using the mouse.
2. Click on the # icon on the toolbar in the Message window. This will automatically wrap the text you selected with the proper Code tags to create a Code Window in your post.

To manually wrap your code, use these Bulletin Board Code Tags

[code]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/code] After the last line.