 <p>I'm not sure what your code is doing but you can adapt it to this. Here is the general code that a recorded macro will show you.</p> <pre><code>'Selects everything on the current sheet and copies it Cells.Select Selection.Copy 'Add a new workbook. 'Adding a new workbook makes it the active workbook so you can paste to it. Workbooks.Add 'Paste the date using Paste:=xlPasteValues Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("C8").Select </code></pre>