title: Copying autofilter data to another column
body: <p>The below code filtered the data based on column S &amp; T. Then it writes the "Resub UW" on visible data.
  Currently I am trying to copy the visible date data in column K to the visible empty data in column AO. If anyone can help me with this code.</p>
  
  <pre><code>`Sub ReSubmitted_UW()
  Rows("1:1").Select
  Selection.AutoFilter
  With ActiveSheet
  
  .Range("$A:$AN").AutoFilter Field:=19, Criteria1:="&lt;&gt;"
  .Range("$A:$AN").AutoFilter Field:=20, Criteria1:="="
  
  
  lastRow = .Range("F" &amp; Rows.Count).End(xlUp).Row
  
  If lastRow &gt; 2 Then
  .Range(.Range("E2"), .Range("E" &amp; lastRow)). _
  SpecialCells(xlCellTypeVisible).Value = "ReSub UW"
  End If
  .Range("$A:$AN").AutoFilter
  End With
  
  End Sub
  </code></pre>
  
  <p>`</p>