title: VBA Run-time error 438 appears when "paste" runs
body: <p>I'm just getting familiar with VBA and my code</p>
  
  <pre><code>For k = 3 To ThisWorkbook.Sheets.Count
  ThisWorkbook.Sheets(k).Activate
  ActiveSheet.Cells(11, 2).Select
  
  lLastRow = Cells(Rows.Count, 1).End(xlUp).Row
  ActiveSheet.Range("A5:" &amp; "A" &amp; CStr(lLastRow)).Copy
  ' ThisWorkbook.Sheets(1).Cells("B" &amp; CStr(lFirstRow) &amp; ":B" &amp; CStr(lLastRow)).Select
  ThisWorkbook.Sheets(1).Activate
  ActiveSheet.Cells(lFirstRow, 2).Select
  Selection.Paste
  'Selection.PasteSpecial Paste:=xlPasteValues
  'Selection.PasteSpecial Paste:=xlPasteFormats
  lFirstRow = lFirstRow + lLastRow
  Next k
  </code></pre>
  
  <p>makes "Run-time error 438. Object doesn't support this porperty or method" to appear when the line "Selection.Paste" goes. What's the problem?:(
  I've tried to use paste special, to activate sheet and to select cell (not range), to use Cstr, but nothing changed</p>