Macro that will copy values in Column J and paste values to Column B in new sheet

I have a macro that will copy Sheet, Create & name a new Sheet & Paste sheet to the new Sheet.

When it copies Sheet I need it to move the values in column J and Paste them into Column B.

Here is my module code: (Shown in Red is what I've been trying)

Please Login or Register  to view this content.

Below is the form code to call the module above:

Please Login or Register  to view this content.

I have a crosspost here & nobody has answered.

Any ideas on how this can be accomplished?

How about simply,

Please Login or Register  to view this content.

Thanks a bunch!
This did it!