title: Copy/Paste/Calculate Visible Cells from One Column of a Filtered Table
body: <p>I am using <code>AutoFilter</code> to sort through a table in VBA, which results in a smaller table of data. I only want to copy/paste the visible cells of one column after the filter is applied. Also, I would like to average the filtered values of one column and put the result in a different cell.</p>
  
  <p>I've found this snippet on Stack which allows me to copy/paste the entire visible results of the filter, but I don't know how to modify it or another way to get only one column's worth of data (without the header) from it.</p>
  
  <pre><code>Range("A1",Cells(65536,Cells(1,256).End(xlToLeft).Column).End(xlUp)).SpecialCells(xlCellTypeVisible).Copy
  Sheets("Sheet2").Range("A1").PasteSpecial xlPasteValuesAndNumberFormats
  Application.CutCopyMode = False
  </code></pre>
  
  <p><strong>Addition to answer (to calculate with the filtered values):</strong></p>
  
  <pre><code>tgt.Range("B2").Value =WorksheetFunction.Average(copyRange.SpecialCells(xlCellTypeVisible))
  </code></pre>