Как выйти из режима редактирования текста?

Подскажите, пожалуйста, как программно выйти из режима редактирования текста, при этом оставить активное выделение текста.
Мне это нужно для макроса подгона надписи под размер рамки (если оставить в режиме редактирования происходит ошибка и сбой программы).
Сложный путь я и так представляю, но наверняка есть одна специальная команда.
Да, я работаю в Corel-12.
Спасибо.

Добавлено (11.06.2011, 17:59)
---------------------------------------------
Неточно написал "оставить активное выделение текста". Надо просто оставить выделенный текстовый объект. (Как обычное нажатие Pick Tool)

Добавлено (11.06.2011, 18:45)
---------------------------------------------
Всем спасибо, сам разобрался.

Application.ActiveTool = cdrToolPick