Mac용 Microsoft Word 2011에서 주석 영역의 너비를 변경하는 방법

Question 1

사용자 인터페이스에서는 이 작업을 수행할 수 있는 기능을 볼 수 없지만 코드에서는 수행할 수 있습니다. 평소와 같이 내가 원하는 것보다 더 많은 단계가 있습니다. 맨 아래에는 이제 익숙한 사용자를 위해 일반 템플릿에 삽입할 VBA를 추가했습니다.

VBA의 경우 개발자 탭을 활성화할 필요가 없는지 확실하지 않지만...

문서를 열고 변경하려는 보기를 활성화합니다(너비는 보기마다 다를 수 있음).

Word->도구->매크로->Visual Basic Editor를 클릭합니다.

이상적으로는 Word 및 VBE 창을 구성하여 둘 중 하나를 숨기지 않고 둘 다 클릭할 수 있도록 하십시오.

VBE에서 "즉시 창"이라는 제목의 창이 표시되지 않으면 VBE의 보기->즉시 창을 사용하여 표시하십시오.

바로가기 창에 다음을 입력하거나 여기에서 복사하여 붙여넣고 마지막에 return/enter를 누르세요.

?activewindow.view.revisionsballoonwidthtype

직접 실행 창에 "1"이라는 값이 표시되는 것을 볼 수 있을 것 같습니다. 그렇다면 명령을 다음과 같이 변경합니다("?"를 삭제하고 "=0" 추가).

activewindow.view.revisionsballoonwidthtype=0

그리고 그것을 실행

그런 다음 명령을 다음으로 변경하십시오.

activewindow.view.revisionsballoonwidth=10

(제가 "10"이라고 입력한 곳에 원하는 비율을 입력하세요) 그리고 실행하세요.

실제로 너비를 포인트 단위로 원하면 다음을 실행하십시오.

activewindow.view.revisionsballoonwidthtype=1

그런 다음 실행

activewindow.view.revisionsballoonwidth=200

너비를 "200" 대신 포인트 단위로 입력하는 경우

노트:

너비 값을 처음 변경하려고 시도했지만 작동하지 않았습니다. 저는 revisionsballoonwidthtype을 먼저 수정해야 할 것 같았습니다. 그러면 변경 사항이 "적용"될 것입니다. 그러나 아마도 도중에 제가 뭔가 잘못했을 수도 있습니다.
"ActiveDocument" 앞에 "ActiveWindow" 접두사를 붙여야 할 수도 있습니다. (인용 부호 제외) 이 작업을 수행합니다.

FWIW 동등한 사과 스크립트를 제공하고 싶지만 Word 2011용 사전에서 동등한 속성 이름을 볼 수 없습니다.

또는 일반 템플릿의 새 모듈에 다음 코드를 넣을 수 있습니다(VB 편집기에서 가능). 상단의 너비 값을 사용하려는 값으로 변경하세요. 그런 다음 빈 문서(즉, "Normal.dotm을 기반으로")를 사용하여 @@@ 루틴을 실행합니다. 그러면 Normal.dotm 자체가 수정되고 향후 기본 동작이 변경될 것입니다(내 생각에는!).

그러나 거기에는 AutoOpen 루틴도 있습니다.5월기존 문서의 설정을 변경해야 합니다. 이것이 필요한지 잘 모르겠습니다. 그렇지 않은 경우 AutoOpen 하위를 삭제하거나 이름을 바꾸십시오. 꼭 필요하고 Normal.dotm에 이미 AutoOpen이 있는 경우 기존 루틴을 수정한 다음 내 루틴을 제거하거나 이름을 바꿔야 합니다.

그 과정에서 나는 최소 너비가 있다는 것을 깨달았고, 이로 인해 값이 "취득"되지 않는다고 생각하게 되었습니다. 하지만 예를 들어 여기서 너비를 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