This example creates a balloon with an “Alert” icon that instructs the user to select a printer.
With Assistant.NewBalloon
.Heading = "Select A Printer"
.Text = "You must select a printer before printing."
.Icon = msoIconAlert
.CheckBoxes(1).Text = "Local printer"
.CheckBoxes(2).Text = "Network printer"
.Show
End With