Свое меню в WebBrowser - VB

Формулировка задачи:

Загружаю в WebBrowser документ Word
Все пока что нравится, но вот только WebBrowser в упор отказывается отображать моё меню (CommandBar) (т.е. вообще какое-то меню).
Причем следующий код отрабатывается без ошибок

DocWord  Word.Document

 DocWord = .WebBrowser1.Document

DocWord.Application.CommandBars.Add :=, _
        Position:=, Temporary:=True
DocWord.Application.CommandBars().Visible = True

Открываю параллельно Word, смотрю, меню создается, а вот галочка на отображение = False
Пробовал даже записать макрос в Wordе и запускать из VB –эффект тот же.(False)
Единственное что получилось отобразить в WebBrowser это «Стандартное меню», но мне такой вариант не подходит:

WebBrowser1.ExecWB OLECMDID_HIDETOOLBARS, OLECMDEXECOPT_DONTPROMPTUSER

Может кто-то сталкивался с данной проблемой?
Дайте, пожалуйста, совет что делать.
Спасибо

Решение задачи: «Свое меню в WebBrowser»

textual
                            Листинг программы 
                        

                            WebBrowser1.Navigate2 ………<font color="#00AA00">'- здесь WB начинает смену шаблона и появляется диалог </font>
<font color="blue">SendKeys</font> <font color="teal">"{RIGHT}"</font>
<font color="blue">SendKeys</font> <font color="teal">"{ENTER}"</font>  '-То есть отменяем сохранения в шаблоне 
                        