VBA в Word

Что надо написать в макросе чтобы данный код это запрет изменений определенного раздела в документе, по условию, например когда пользователь нажал на любое место в документе word

ActiveDocument.Sections(2).ProtectedForForms = True

в документ вставляется таблица, ее надо сразу защитить от изменений
сразу скажу, что шаблон "головной" хранится на сетевом ресурсе, а пользователь будет работать с копией

SAS2014
в документ вставляется таблица, ее надо сразу защитить от изменений

Вставь картинкой...

может кто поможет, с проблемой вообщем есть таблица в нее поступают данные и причем гарантировано в одну ячейку точно
вот как написать условия если в этой ячейки есть данные, (а там есть формула расчетов) то выполнить дальнейшее действия

код условия которое работает не верно

If Trim(Eeno3!A2.Value2) = "" Then
ActiveWindow.SelectedSheets.Visible = False

действия которое надо выполнить

Sheets("Eeno3").Select
Sheets("Eeno3").Visible = True
Set InputRng2 = Range("Eeno3!A1:Eeno3!B50")
For Each Rng2 In InputRng2
    '----------
    If Trim(Rng2.Value2) <> "" Then
    '----------
    If OutRng2 Is Nothing Then
    Set OutRng2 = Rng2
    Else
    Set OutRng2 = Application.Union(OutRng2, Rng2)
    End If
    End If
    
Next
If Not (OutRng2 Is Nothing) Then
Worksheets("Eeno3").Activate
OutRng2.Select
Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture
ActiveWindow.SelectedSheets.Visible = False
Set objWrdApp2 = CreateObject("Word.Application")
objWrdApp2.Visible = False
Set objWrdDoc2 = objWrdApp2.documents.Open("C:\TEMP\CREATE_USERS_K1.dotm")
objWrdDoc2.Bookmarks("k1").Range.Paste
Set islp_k1 = Range("Eeno1!B6")
objWrdDoc2.Bookmarks("islp_k1").Range.Text = ispl
objWrdApp2.Visible = True
    Sheets("Eeno3").Select
    ActiveWindow.SelectedSheets.Visible = False
End If

End If

Eeno -- это Лист просто при копирование кодировка слетела

пояснения кода выделяет все заполненные ячейки .... в диапазоне, далее выделяет и выполняет копирование как рисунок, потом этот рисунок вставляет в нужный фрагмент текста в word файле

просто я только только начал изучать VBA

От меня ускользает, откуда в Word взялись Sheet'ы