If you're just doing this as a one time shot, (You don't mean doing it programatically do you?), you can simply copy from the module in Book1 & paste it in the module of Book2. (ie.)
Open both workbooks.
Open the VB editor and locate both workbooks in the project explorer.
Locate the module the code is in, in Book1
Create a module if necessary in Book2.
Go into the module in book1, highlight & copy the entire routine, select the (new?) module in book2 and paste the code in there.