What is the code to activate a previous workbook

[dpaton05]

I have some code that copies a worksheet and pastes it into a new document but I want to add in something to activate the sheet called "Home" in the file that the sheet was created from, once the new document has been finished with. This will mean that once the document is closed, the home sheet will be activated instead of the sheet that was copied. What is wrong with this code as it will not work. It says subscript out of range. It highlights this line of code Workbooks("wb").Worksheets("home").Activate

CODE]Private Sub cmdCopySheet_Click()

Dim CopyMonth As String
Dim wb As Workbook
Set wb = ThisWorkbook
CopyMonth = Range("J13").Value

Worksheets(CopyMonth).Activate
Worksheets(CopyMonth).Columns("A:E").Select
Call AddNew
Workbooks("wb").Worksheets("home").Activate

Sub AddNew()
Dim xWs As Worksheet
Dim Rng As Range
Set Rng = Application.Selection
Application.Workbooks.Add
Set xWs = Application.ActiveSheet
Rng.copy Destination:=xWs.Range("A1")
End Sub

End Sub[/CODE]

 

[My Aswer Is This]

I would think it should look like this:
Dim wb As Workbook
Set wb = ThisWorkbook
wb.Worksheets("home").Activate


This will activate the current workbook sheet not the new workbook sheet.

You never named the new Workbook or named the new workbook sheet.