constant that represents whether a presentation is a merged author document, a reviewer document with base lines, or a regular Microsoft PowerPoint document. Read-only.
| PpRevisionInfo can be one of these PpRevisionInfo constants. |
| ppRevisionInfoBaseline The presentation has a baseline. |
| ppRevisionInfoMerged The presentation is a merged author presentation. |
| ppRevisionInfoNone The presentation has no reviewer information. |
expression.HasRevisionInfo
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
Comments are not considered reviewer information.
Example
The following example adds and removes baselines, reporting status to the user along the way.
Sub AddABaseline()
ActivePresentation.AddBaseline
Call ReportRevisionInfo(ActivePresentation)
ActivePresentation.RemoveBaseline
Call ReportRevisionInfo(ActivePresentation)
End Sub
Sub ReportRevisionInfo(pre As Presentation)
Select Case pre.HasRevisionInfo
Case ppRevisionInfoBaseline
MsgBox "The presentation has a base line."
Case ppRevisionInfoMerged
MsgBox "The presentation is a merged author presentation."
Case ppRevisionInfoNone
MsgBox "The presentation has no reviewer information."
Case Else
MsgBox "Couldn't determine revision information."
End Select
End Sub