Как получить текст из текстового поля, по которому щелкают, используя VBA?

Question

Я работаю над презентацией, в которой у меня есть табличная форма информации, где в каждой первой ячейке столбца есть текст, какая функция, и я хочу получить этот текст из ячейки, чтобы я мог что-то сделать на основе текста.

Вот функция, которая может помочь мне получить имя объекта, по которому щелкают.

Sub getText(oShape)
MsgBox oShape.Name
End Sub

Вот

Вы увидите текстПоле с текстом Один Два Три , каждому слову присвоена функция VBA.Теперь я хочу, чтобы, когда кто-то щелкает по любому слову, он сообщает, какое слово щелкнуло.