Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Программирование, связанное с MS Office > VBA. Установить флажок.

Автор: Фолко 18.9.2008, 14:34

Всем добрый день!

Подскажите пожалуйста, как решить такую задачку:

Документ Word 2003. В нем есть поле типа "Закладка", с именем ZZZ. Это поле настроено как флажок - т.е. в его свойствах можно установить вкл/выкл и в поле соответственно будет крестик или не будет крестика.
Требуется написать макрос, который бы программно устанавливал/сбрасывал это свойство.

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

Записанный мной макрос выглядит так:

Код


Sub Макрос3()
'
' Макрос3 Макрос
' Макрос записан 18.09.2008 leonid.k
'
    With Selection.FormFields(1)
        .Name = "ZZZ"
        .Enabled = True
        End With
    End With
End Sub

т.е. он выполняется по отношению к выделенном фрагменту.

А как можно передать в макрос имя ZZZ и затем по этому имени обратиться к свойствам закладки ?

Заранее спасибо всем!

P.S. Извеняюсь за ламерский вопрос. Сам я программирую на ABAP для SAP'a и VBA совершенно не знаю.

Автор: Фолко 18.9.2008, 15:30

Я кажется понял как обратиться к моей закладке, но не пойму как установить ей свойство Enabled = true, подскажите пожалуйста. Мой код (не работает):

Код


Sub Macro1()
Dim bmRange   As Range

Set bmRange = ActiveDocument.Bookmarks("ZZZ").Range

 'Что здесь должно быть ???
    With bmRange.FormFields(1)
 'Что здесь должно быть ???

        .Enabled = True
    End With

End Sub