Добрый день всем !

Вопрос такой:
В активную ячейку записываются значения даты вида  09.06.2018  8:00:00 либо 09.06.2018 16:00:00
те цифры и точки  + один или два пробела и последовательность всегда одинакова

Как оставить в ячейке первые 10 знаков (09.06.2018) и все что после этого стереть ?
ActiveCell.Value = ?