Nouille need help

Bonjour every body, j'ai un peu honte de venir pour si peu, mais je debute en macro et j'en ai qu'un utilité temporaire:
j'ai ds une colonne des données , je désire copier une nouvelle donnée à la fin de cette colonne , donc dans la cellule vide qu'il rencontre , mais quand je cré une macro de fonctionement évidement elle copie ma donnée tjrs ds la meme cellule : voici le script :Range("F2").Select
Selection.Copy
Range("B14").Select
Selection.End(xlDown).Select
Selection.End(xlDown).Select
Range("B18").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
End Sub

si qqu'un a 1/4 de seconde pour me repondre merci d'avance