title: Copying a worksheet to another workbook using VBA
body: <p>I am trying to copy a worksheet from the workbook that the VBA is in (ThisWorkbook) and past it into another workbook that the user has open (ActiveWorkbook). I have written a function but I cannot get it to work. I have done something similar before and I have searched the internet but I cannot find a solution or why it is failing me. What am I doing wrong?</p>
  
  <pre><code> Function workBooks() As String
      aWbkName = ActiveWorkbook.Name
      tWbkName = ThisWorkbook.Name
  
      Dim wbk1 As Workbook
      Dim wbk2 As Workbook
  
      Set wbk1 = tWbkName
      Set wbk2 = aWbkName
  
      wbk1.Sheet2.Copy After:=wbk2.Sheets(7)
  
  End Function
  </code></pre>