Как назначить сочетание клавиш встроенному стилю в MS Word 2010 с помощью vb.net

Я написал код для приложения MS Word Addin в соответствии с моими собственными требованиями для встроенных заголовков, теперь я хочу назначить им сочетание клавиш. Ниже приведен код. При использовании слова этого можно добиться, щелкнув стиль, например, заголовок 1-> изменить-> сочетание клавиш

With oDoc.Styles(word.WdBuiltinStyle.wdStyleHeading1)
.Font.Bold = False
.Font.Size = 12
.Font.Name = "Arial"
.Font.Spacing = 16
.NameLocal = "Heading1"
.BaseStyle = "Normal"
.ParagraphFormat.SpaceBefore = 6
.ParagraphFormat.OutlineLevel = 1
With .ParagraphFormat.TabStops
.Add(Position:=oWord.CentimetersToPoints(2),    Alignment:=word.WdAlignmentTabAlignment.wdCenter)
End With
.ParagraphFormat.KeepWithNext = True
.LinkToListTemplate(oTemplate1)
End With

Пожалуйста, объясните, как назначать сочетания клавиш с помощью кода. также как установить свойство Выровнено по: 0 см Отступ: 0 см


person webdeveloper    schedule 24.03.2015    source источник


Ответы (1)


Вы можете назначить сочетания клавиш с помощью KeyBindings, например:

KeyBindings.Add wdKeyCategoryStyle, "Heading 1", BuildKeyCode(wdKeyControl, wdKeyAlt, wdKeyH)

свяжет Heading 1 с комбинацией клавиш Ctrl-Alt-H.

person theduck    schedule 24.03.2015
comment
до сих пор не могу найти Выровнено по: 0 см Отступ по адресу: свойство 0 см - person webdeveloper; 30.03.2015
comment
Не совсем уверен, что вы подразумеваете под выравниванием и отступом. Есть ParagraphFormat.LeftIndent и ParagraphFormat.Alignment - person theduck; 30.03.2015