Values Property

Microsoft Publisher Visual Basic

collection representing all the valid values for a wizard property.

expression.Values

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

Example

The following example displays the current value for the first wizard property in the active publication and then lists all the other possible values.

Dim valAll As WizardValues
Dim valLoop As WizardValue

With ActiveDocument.Wizard
    Set valAll = .Properties(1).Values

    MsgBox "Wizard: " & .Name & vbLf & _
        "Property: " & .Properties(1).Name & vbLf & _
        "Current value: " & .Properties(1).CurrentValueId

    For Each valLoop In valAll
        MsgBox "Possible value: " & valLoop.ID & " (" & valLoop.Name & ")"
    Next valLoop
End With