Need help with macro to copy and paste data from multiple ranges to new sheet

The following macro will only work for ranges within either column c or f but not both. I need it to work for all the ranges specified in the c and f columns. As it sits I get the error "That command cannot be used on multiple selections." In the debugger it is getting hung up on the r.copy line. Here is my macro:

Please Login or Register  to view this content.

Any suggestions?
Moderator's edit: Use code tags when posting code. To do so in future, select the code and click on the # icon at the top of your post window.

I've never tried to paste a non-continuous range. You might have to paste each specific range separately.

Is it working properly now? I looked at the output and it transposes the two columns into two rows. Is that what you need?

Just change the offset values for the second range paste:

Please Login or Register  to view this content.

Let me know if that works for you.