| O | |
|---|---|
| OK | WordBasic.OK | 
| OKButton | 命令按钮控件 | 
| On Error | On Error | 
| OnTime | Application.OnTime | 
| Open | Open | 
| OpenSubdocument | ActiveDocument.Subdocuments(name).Open | 
| OpenUpPara | Selection.Paragraphs.OpenUp | 
| 选项按钮 | 选项按钮控件 | 
| OptionGroup | 框架控件 | 
| Organizer | Application.OrganizerCopy  Application.OrganizerDelete Application.OrganizerRename  | 
| OtherPane | ActiveWindow.ActivePane.Next.Activate | 
| Outline, Outline() | Selection.Font.Outline = True  x = Selection.Font.Outline  | 
| OutlineCollapse | ActiveWindow.View.CollapseOutline | 
| OutlineDemote | Selection.Paragraphs.OutlineDemote | 
| OutlineExpand | ActiveWindow.View.ExpandOutline | 
| OutlineLevel() | aLevel = Selection.Paragraphs.OutlineLevel | 
| OutlineMoveDown | Selection.Range.Relocate Direction:=wdRelocateDown | 
| OutlineMoveUp | Selection.Range.Relocate Direction:=wdRelocateUp | 
| OutlinePromote | Selection.Paragraphs.OutlinePromote | 
| OutlineShowFirstLine, OutlineShowFirstLine() | ActiveWindow.View.ShowFirstLineOnly = True  x = ActiveWindow.View.ShowFirstLineOnly  | 
| OutlineShowFormat | AcitveWindow.View.ShowFormat = True | 
| Overtype | Options.Overtype = True | 
| P | |
|---|---|
| PageDown, PageDown() | Selection.MoveDown Unit:=wdScreen, Count:=1, Extend:=wdMove | 
| PageUp, PageUp() | Selection.MoveUp Unit:=wdScreen, Count:=1, Extend:=wdMove | 
| ParaDown, ParaDown() | Selection.MoveDown Unit:=wdParagraph, Count:=1, Extend:=wdMove | 
| ParaKeepLinesTogether, ParaKeepLinesTogether() | ActiveDocument.Paragraphs(1).KeepTogether = True  x = ActiveDocument.Paragraphs(1).KeepTogether  | 
| ParaKeepWithNext, ParaKeepWithNext() | ActiveDocument.Paragraphs(1).KeepWithNext = True  x = ActiveDocument.Paragraphs(1).KeepWithNext  | 
| ParaPageBreakBefore, ParaPageBreakBefore() | ActiveDocument.Paragraphs(1).PageBreakBefore = True  x = ActiveDocument.Paragraphs(1).PageBreakBefore  | 
| ParaUp, ParaUp() | Selection.MoveUp Unit:=wdParagraph, Count:=1, Extend:=wdMove | 
| ParaWidowOrphanControl, ParaWidowOrphanControl() | ActiveDocument.Paragraphs(1).WidowControl = True  x = ActiveDocument.Paragraphs(1).WidowControl  | 
| PasteButtonImage | CommandBars(name).Controls(1).PasteFace | 
| PasteFormat | Selection.PasteFormat | 
| PathFromMacPath$() | x = WordBasic.[PathFromMacPath$](path) | 
| PathFromWinPath$() | x = WordBasic.[PathFromWinPath$](path) | 
| PauseRecorder | WordBasic.PauseRecorder | 
| Picture | 图像控件 | 
| PrevCell, PrevCell() | Selection.Move Unit:=wdCell, Count:=-1  '或 Selection.Cells(1).Previous.Select  | 
| PrevField, PrevField() | Selection.GoToPrevious What:=wdGoToField  '或 Selection.PreviousField  | 
| PrevObject | Selection.GoToPrevious What:=wdGoToObject  '或 Selection.MoveLeft Unit:=wdItem  | 
| PrevPage, PrevPage() | Selection.GoToPrevious What:=wdGoToPage  '或 ActiveWindow.View.Type = wdPrintView ActiveWindow.PageScroll Up:=1  | 
| PrevTab() | x = ActiveDocument.Paragraphs(1).TabStops(1).Previous.Position | 
| PrevWindow | ActiveWindow.Previous.Activate | 
| PromoteList | Selection.Range.ListFormat.ListIndent | 
| PushButton | 命令按钮控件 | 
| PutFieldData | ActiveDocument.Fields(1).Data = text |