title: Using variables in Sourcedata
body: <p>How can i do this code works right, I need to use a variable</p>
  
  <p><code>Act = InputBox("Today", "Now", Thisday)</code> </p>
  
  <p>Here i need to write: 10513 (sheet name).</p>
  
  <p><code>Range("AA2").Select</code></p>
  
  <p>This works OK</p>
  
  <pre><code>ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, _
  SourceData:="'10513'!R1C23:R117C23").CreatePivotTable TableDestination:="'[Control LE.xls]10513'!R4C27", _
  TableName:="Tabla dinámica3", DefaultVersion:=xlPivotTableVersion10
  </code></pre>
  
  <p>This doesn't...</p>
  
  <pre><code>ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, _
  SourceData:="' Act '!R1C23:R117C23").CreatePivotTable _
  TableDestination:="'[Control LE.xls]&amp; Act '!R4C27", TableName:="Tabla dinámica3", _
  DefaultVersion:=xlPivotTableVersion10
  </code></pre>