Сам спросил сам отвечаю :
Открыть любой документ doc и создать пустой макрос назвав его к примеру FullScreen потом открыть в редакторе и внести содержимое :
Sub FullScreen()
ActiveWindow.View.FullScreen = True
CommandBars("Full Screen").Visible = False
End Sub
закрыть редактор (не документ) и запустить макрос . Больше не побеспокоит .