关于vba怎么获得提取摘要的结果

关于vba如何获得提取摘要的结果。
Sub Macro1()

  ActiveWindow.ActivePane.View.ShowAll = False
  ActiveDocument.AutoSummarize Length:=wd10Percent, Mode:=wdSummaryModeHideAllButSummary, UpdateProperties:=True
  MsgBox(显示摘要)  
End Sub

如何获得这段代码的结果，就是如果获得提取的摘要然后用msgbox()来显示出来.

[解决办法]
???表达
[解决办法]
有侍高人。