WizardValues Collection



Represents the complete set of valid values for a wizard property.
Using the WizardValues collection
Use the Values property of the WizardProperty object to return a WizardValues collection. 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