title: How to copy paste all formats AND values without using select in vba
body: <p>How can I copy a range without using select. I need everything, not only the values.
  Current bulky code:</p>
  
  <pre><code>Function Template(x As Integer)
      Sheets("Sheet1").Select
      Sheets("Sheet1").Range("E1:H5").Select
      Selection.Copy
      Sheets("Sheet2").Select
      Sheets("Sheet2").Cells(1, x).Select
      ActiveSheet.Paste
  End Function
  </code></pre>
  
  <p>Thanks!!</p>