BalloonCheckboxes 集合对象

优质
小牛编辑
130浏览
2023-12-01

本主题中的某些内容可能不适用于某些语言。

一个BalloonCheckbox 对象的集合。该对象代表“Office 助手”气球中所有的复选框。

使用 BalloonCheckboxes 集合

Checkboxes 属性可返回BalloonCheckboxes 集合。

Checkboxes(index) 可返回单个的BalloonCheckbox 对象,其中的index 是一个 1 到 5 之间的数字。一个气球中可有 1 到 5 个复选框,每个复选框在其Text 属性赋值后即可显示出来。如果指定的复选框超过五个,将发生运行时间错误。

下面的示例创建一个有标题、文字和三个区域选项的气球。当用户选中一个或多个复选框并单击“确定”按钮后,将调用指定的一个或多个过程。

With Assistant.NewBalloon
 .Heading = "Regional Sales Data"
 .Text = "Select your region"
 For i = 1 To 3
 .CheckBoxes(i).Text = "Region " & i
 Next
 .Button = msoButtonSetOkCancel
 .Show
 If .CheckBoxes(1).Checked Then
 runregion1
 End If
 If .CheckBoxes(2).Checked Then
 runregion2
 End If
 If .CheckBoxes(3).Checked Then
 runregion3
 End If
End With

显示气球后,将不能再向BalloonCheckBoxes 集合中添加或删除复选框。

说明

在用户清除气球之前,气球复选框将一直显示用户的选择。在用户单击标签旁的按钮后,使用气球标签连同Select 方法可返回与用户所选复选框相对应的数字。若要将用户选择的数字值传递给Select 方法,则必须将气球类型设置为msoBalloonTypeButtons

Assistant
Balloon
BalloonCheckBoxes (BalloonCheckBox)
BalloonLabels (BalloonLabel)