Type Mismatch for Workbook declaration VBA
<p>Trying to values from one Workbook to another</p>

<pre><code>Sub CopyValues()

    'Current Workbook 1
    Dim B As Worksheet: Set bun = Sheets("Workbook1Sheet1")

    'Since Workbook 2 is open
    'Getting a type mismatch error on this line, please note the workbook is open
    Dim wkb2 As Workbook: Set wkb2 = "Workbook2.xls"   


    Dim x As Integer
    x = 3
    B.Range("E" &amp; x).Value = "=vlookup(D3,'wkb2'A!$D:$F,3,0)"

End Sub
</code></pre>