Help copying one sheet to another workbook using VBA

[rosscortb]

Hello

I want to copy sheet1( at the moment it copies all sheets,1,2,3) to another workbook. I want it to copy Sheet 1 and either paste into sheet called Data or create a sheet called Data at the end. So far I have.

sheet()
    Dim Importsheet As Worksheet 'Imports worksheet from a closed workbook
    Sheets.Add Type:= _
    "F:\my documents\Source.xlsx"
End Sub

Thanks

Ross