Сейчас я проверяю таким образом:
Попытка
    WordApp = Новый COMОбъект("Word.Application");
Исключение
    WordApp = Неопределено;    
КонецПопытки;    
Если WordApp = Неопределено Тогда
    Возврат Ложь;
Иначе
    WordApp = Неопределено;
    Возврат Истина;
КонецЕсли;

я бы также проверял

(1) Эх, я думал есть другой способ - менее затратный

(2) можно в реестре пошариться на предмет ProgId "Word.Application", но это кажется за рамками возможностей платформы, да и ответ будет не "да, возможно", а "скорее всего да, если нет других проблем" :-)

(3) это слишком сложный для меня вариант)
Буду продолжать использовать (0) тогда

(2) сколько времени занимает создание кома?
отлуп, кажется, очень быстро приходит

(2) проверь в фоне при запуске сеанса и выстави где-нибудь галочку, чтоб каждый раз не проверять

(0) А какой смысл проверять, если тебе в данным момент не нужно создавать ком?

(4) Вынеси это в общий модуль повторного использования.

(5) 5 секунд
(7) Если ком доступен тогда делаю так иначе делаю по-другому без ком. Приоритет при этом делать с ком
(6), (8) хорошие варианты