Condensing Repetitive Code Distributed to Multiple Sheets

I need help condensing this repeating code. Thanks.

Please Login or Register  to view this content.

Try this.

Please Login or Register  to view this content.

By the way do you really need the formulas?

If you just want the values this could be done with a simple copy and paste special using the transpose option.

Or like this:

Please Login or Register  to view this content.

Thank you, Norie--

Your code worked to perfection. In fact, I did need the formulas in this case.

inwalkedbud

Thanks shg--your code worked wonderful too.