Datum und Uhrzeit trennen

Hallo,
ich habe eine Spalte C in der in jeder Zeile ein Datum mit Uhrzeit steht "05.12.2014 18:42:34". In Spalte A soll nur das Datum ausgegeben werden.
Ist in Spalte A noch kein Datum eingetragen, soll das Datum aus Spalte C dann in eine "Hilfszelle" C2 kopiert werden> dort soll dann umgewandelt werden in nur-Datum und dann soll dieses Ergebnis in Spalte A kopiert werden...
Ich habe schon viel versucht, aber nichts funktioniert :(
Hab einen Anfang...

Sub Datum_u_Uhrzeit_trennen ()
Dim ganzunten as Long
Dim x as Long
ganzunten = Range("B65536").End(xlUp).Row
For x = ganzunten To 2 Step -1
If Cells(x, 1) = "" Then
Cells(x, 3).Select
Selection.Copy Destination:=ActiveSheet.Range("C2")
''' hier fehlt jetzt das Umwandeln in Nur-Datum''''
Range("C2").Select
Selection.Copy Destination:=ActiveSheet.Cells(x, 1)
End If
Next x
End Sub