本主题中的某些内容可能不适用于某些语言。
新建一个“Office 助手”气球。返回一个Balloon 对象。
本示例创建并显示一个有标题、文字和三条区域选项的气球。
With Assistant.NewBalloon
.Heading = "Regional Sales Data"
.Text = "Select one or more regions"
For i = 1 To 3
.CheckBoxes(i).Text = "Region " & i
Next
.Show
End With