Checked Property
From Microsoft Office Object Model
Checked Property
Some of the content in this topic may not be applicable to some languages.
True if the specified check box in the Office Assistant balloon is checked. Read/write Boolean.
Example
This example creates a balloon with a heading, text, and three region choices. When the user clicks OK in the balloon, data for the selected region or regions is printed.
With Assistant.NewBalloon
.Heading = "Regional Sales Data"
.Text = "Select the region(s) you want to print."
For i = 1 To 3
.CheckBoxes(i).Text = "Region " & i
Next
.Button = msoButtonSetOkCancel
If .Show = msoBalloonButtonOK Then
dataPrinted = 0
For i = 1 To 3
If .CheckBoxes(i).Checked = True Then
' Code to print region data.
dataPrinted = dataPrinted + 1
MsgBox "Region " & i & " data printed."
End If
Next
If dataPrinted = 0 Then MsgBox "No data printed."
End If
End With