title: Pivot Excel VBA, Error 438 "Object doesn't support this property or method"
body: <p>I am trying to create a Pivot Table using VBA, but I get an error in the following line:</p>
  
  <pre><code>Sheets("Done").PivotCaches.Add _
  (SourceType:=xlDatabase, _
  SourceData:=Range("A1").CurrentRegion).CreatePivotTable _
  TableDestination:="R4C" &amp; Range("A1").CurrentRegion.Columns.Count + 3
  </code></pre>
  
  <p>I get an error stating:</p>
  
  <blockquote>
    <p>Error 438 Object doesn't support this property or method</p>
  </blockquote>
  
  <p>Can anyone please help me out with this? </p>