С Word ContentControl DatePicker, как мне получить значение?

Question

У меня есть ContentControl, который является DatePicker в текстовом документе. Я пытаюсь использовать его для заполнения некоторого значения в коде, но я не могу извлечь из него ценность.

Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, _ 
    Cancel As Boolean) 

Ни одно из свойств в ContentControl не является близким к .Value или .Text. Я видел другой контент управление использует:

ContentControl.DropdownListEntries(1).Text 
ContentControl.DropdownListEntries(1).Value 

Это, как и следовало ожидать для DatePicker, не работает, но это единственное свойство ContentControl, которая возвращает ничего близко к значению я хочу.

Как я могу получить дату из DatePicker ContentControl?

Answer 1

Это то, что вы пытаетесь?

Private Sub Document_ContentControlOnExit(ByVal ContentControl _ 
As ContentControl, Cancel As Boolean) 
    MsgBox ContentControl.Range.Text 
End Sub 

СНАПШОТ