title: Copying from one cell to another cell on a different sheet?
body: <p>I'm new to Visual Basic on Excel and I've been struggling trying to copy one cell to another on a different sheet. For example, if <code>Sheet1</code> has the following:</p>
  
  <pre><code>Animal    Owner
  Dog       John
  Cat       Gabe
  </code></pre>
  
  <p>And <code>Sheet2</code> is simply blank, assuming <code>Animal</code> and <code>Owner</code> are in different columns and are in <code>columns A</code> and <code>B</code> respectively, I just wanted to copy <code>Dog</code> into A2 (Animal is in cell A1) onto sheet two, for example. </p>
  
  <p>I tried to look things up online and tried:</p>
  
  <pre><code>Dim dataSheet As Worksheet
  Set dataSheet = ThisWorkbook.Sheets("Sheet1")
  Dim DestinationSheet As Worksheet
  Set DestinationSheet = ThisWorkbook.Sheets("Sheet2")
  
  dataSheet.Range("A2").Copy DestinationSheet.Range("A2")
  </code></pre>
  
  <p>But I keep getting an error saying that:</p>
  
  <blockquote>
    <p>Run-time error '1004': Method 'Range' of object '_Worksheet' failed.</p>
  </blockquote>
  
  <p>I just want to copy from one cell to another onto a different worksheet. If anyone has any idea to do so, that would be great! Thanks!</p>