Hopefully the title is specific enough....

So I'm trying to write code to search through a file I've loaded, which will never be the same in terms of data (width, length, whats actually in it). I want it to find the title of a column of data, copy the title all the way to the last row of data for that column and then paste it into another sheet of the workbook. I've tried many different ways of searching, copying, pasting but I can never get it to go past just finding the title and copying/pasting only the title into the next spreadsheet. In the following code I've specified a column to pull the data from but I am unsure if it will always be the same column. This is my nth time of rewriting multiple different codes, unfortunately I haven't saved any of my previous attempts (you live and learn) so this one is just basic....anyone have any ideas?

Sub FindCopyPaste()

Dim ws1 As Worksheet
Dim ws2 As Worksheet
Dim dest As Range

Set ws1 = Sheets("Sheet1")
Set ws2 = Sheets("Sheet2")
Set dest = ws2.Range("B2").End(xlDown).Offset(1)


Sheets("Sheet1").Select
Selection.AutoFilter Field:=3, Criteria1:="<>"
ws1.Range("C:C").Copy
dest.PasteSpecial xlPasteValues
Application.CutCopyMode = False
Sheets("Sheet2").Select

End Sub