Как изменить ширину области комментариев в Microsoft Word 2011 для Mac

Question

Я пишу отчет с помощью Microsoft Word 2011 for mac используя функцию комментариев.

Можно ли изменить ширину области комментариев?

Эта область слишком велика для моего предпочтения.

Обновить

В моей предварительной панели "Отслеживание изменений" нет опции, позволяющей изменить ширину панели разметки.

Answer 1

Я не вижу возможности сделать это в пользовательском интерфейсе, но вы можете сделать это в коде. Как обычно, есть намного больше шагов, чем я хотел бы. Внизу я добавил немного VBA для вставки в ваш шаблон Normal для тех, кто знаком с этим.

Для VBA, не совсем уверен, что вам не нужно включать вкладку Разработчик, но ...

Откройте документ и включите вид, который вы хотите изменить (ширина может быть разной для разных видов).

Нажмите Word-> Инструменты-> Макрос-> Редактор Visual Basic.

В идеале, попытайтесь организовать окна Word и VBE, чтобы вы могли щелкнуть обоими, не скрывая ни того, ни другого.

Если вы не видите окно с названием "Немедленное окно" в VBE, используйте VBE View-> Immediate Window, чтобы отобразить его

Введите следующее в непосредственном окне или скопируйте / вставьте его отсюда и нажмите возврат / ввод в конце

?activewindow.view.revisionsballoonwidthtype

Я думаю, вы увидите значение "1", отображаемое в "Немедленном окне". Если это так, измените команду на следующую (удалите "?"and append" = 0 ")

activewindow.view.revisionsballoonwidthtype=0

и выполнить его

Затем измените команду на

activewindow.view.revisionsballoonwidth=10

(поместите процент, который вы хотите, где я поставил "10") и выполните это.

Если вы действительно хотите ширину в точках, выполните

activewindow.view.revisionsballoonwidthtype=1

затем выполнить

activewindow.view.revisionsballoonwidth=200

где вы положили ширину в точках вместо "200"

Заметки:

• когда я впервые попробовал изменить значение ширины, это не сработало. Мне казалось, что сначала нужно изменить тип ревизии balloonwidth, а затем мои изменения "возьмут", но, возможно, по пути я что-то сделал не так.
• вам может понадобиться добавить префикс "ActiveWindow" к "ActiveDocument". (без кавычек), чтобы заставить это работать.

Я хотел бы дать вам эквивалентный appleScript, но я не вижу эквивалентные имена свойств в Словаре для Word 2011.

Кроме того, вы можете поместить следующий код в новый модуль в шаблоне Normal (вы можете сделать это в редакторе VB). Измените значения ширины в зависимости от того, что вы хотите использовать. Затем с пустым документом (т. Е. «На основе« Normal.dotm ») запустите процедуру @@@. Это должно исправить сам файл normal.dotm и изменить поведение по умолчанию в будущем (я думаю!).

Тем не менее, есть также процедура AutoOpen, в которой вам может потребоваться изменить настройки для существующих документов. Я не уверен, что вам это нужно. Если нет, удалите или переименуйте подпункт AutoOpen. Если вам это нужно, и у вас уже есть AutoOpen в вашем Normal.dotm, вам нужно будет изменить существующую процедуру, а затем удалить / переименовать мою.

Попутно я понял, что есть минимальная ширина, которая заставила меня думать, что значения не "берут". Но, например, установка ширины 5%, 10%, 15% здесь имеет точно такой же эффект, и мне нужно перейти на 21% или около того, чтобы увеличить его. Word не сообщает ширину, которую он установил при проверке значений - он сообщает ширину, которую вы пытались установить. Если вы хотите "минимум", я полагаю, что использование значения "1" может быть достаточно для очков или процентов.

' set your preferred measurement type and width here.
' NB, there seems to be a minimum anyway, but that may depend on things I have
' not looked at such as screen size and so on.
' The numbers Word reports are the numbers you have set, not the values
' it has actually set the width to.
'Const preferredBalloonWidthType As Integer = WdRevisionsBalloonWidthType.wdBalloonWidthPoints
'Const preferredBalloonWidth As Single = 300
Const preferredBalloonWidthType As Integer = WdRevisionsBalloonWidthType.wdBalloonWidthPercent
Const preferredBalloonWidth As Single = 25

Sub autoopen()
Call changeBalloonSettings
End Sub

Sub changeBalloonSettings()
  With ActiveWindow.View
    .RevisionsBalloonWidthType = preferredBalloonWidthType
    .RevisionsBalloonWidth = preferredBalloonWidth
    ' debug check
    'If .RevisionsBalloonWidthType = WdRevisionsBalloonWidthType.wdBalloonWidthPercent Then
    '  MsgBox "Percent: " & .RevisionsBalloonWidth
    'Else
    '  MsgBox "Points: " & .RevisionsBalloonWidth
    'End If
  End With
End Sub

Sub fixupNormaldotm()
' Sets the Normal template to have the settings we would like
' for future documents
' to run this, start word and ensure that a single blank doument,
' based on Normal.dotm, is open (this is by default what you get
' when you start the Word application without e.g. double-clicking
' on a doument in Finder)
Dim d As Word.Document
Dim t As Word.Template
Set t = ActiveDocument.AttachedTemplate

Set d = Documents.Open(t.FullName)
' autoopen should run, so that's all we need. If you removeed
' autoopen, uncomment the following line:
call changeBalloonSettings
d.Save
d.Close
Set d = Nothing
Set t = Nothing
End Sub

Answer 2

Для ПК: изменить ширину раздела комментариев на правой стороне документа.

Для Word 2016 перейдите к пункту «Обзор», в поле «Отслеживание изменений» нажмите нижнюю стрелку вправо, затем нажмите кнопку «Дополнительные параметры» и укажите предпочитаемую ширину. Я изменил мой на 2,5 ".