RemovePersonalInformation Property

expression.RemovePersonalInformation

expression    Required. An expression that returns one of the objects in the Applies To list.

Example

In this example, Microsoft Excel determines if personal information can be removed from the specified workbook and notifies the user.

Sub UsePersonalInformation()

    Dim wkbOne As Workbook

    Set wkbOne = Application.ActiveWorkbook

    ' Determine settings and notify user.
    If wkbOne.RemovePersonalInformation = True Then
        MsgBox "Personal information can be removed."
    Else
        MsgBox "Personal information cannot be removed."
    End If

End Sub