Office VBA教程:BalloonError属性

返回显示所记录的最后一条气球错误的值。MsoBalloonErrorType 类型,只读。

MsoBalloonErrorType 可为以下 MsoBalloonErrorType 常量之一:
msoBalloonErrorBadCharacter  该气球包含一个非 CR 或 LF 并小于 32 的 ASCII 控制字符。
msoBalloonErrorBadPictureRef  该气球包含一个无法显示的图形,原因可能是该文件不存在或该图形不是有效的 .BMP 或 .WMF 文件。
msoBalloonErrorBadReference  该气球包含一个无法被识别或支持的引用。
msoBalloonErrorButtonlessModal  要显示的气球是一个模态气球,但是其中不包含任何按钮。由于该气球不能被取消,所以无法将其显示出来。
要显示的气球是非模态的且包含按钮,并且没有为 Callback属性指定过程。由于非模态气球需要回调过程,所以无法显示该气球。
msoBalloonErrorCharNotTopmostForModal  一个非活动的应用程序需要模态气球。Microsoft Office 只为活动(最顶层)应用程序提供气球。
msoBalloonErrorCOMFailure  由于 COM 错误,无法显示该气球。
msoBalloonErrorNone  没有遇到错误。
msoBalloonErrorOther  由于发生了一些其他错误(例如另一个模态气球已经处于活动状态),无法显示该气球。
msoBalloonErrorOutOfMemory  由于没有足够的内存,无法显示该气球。
msoBalloonErrorTooBig  该气球太大,无法显示在屏幕上。
msoBalloonErrorTooManyControls  该气球包含超过二十个控件(复选框或标签)。

VBA示例

本示例创建一个气球,该气球将产生一个错误。错误原因是由于创建该气球时没有为其设置取消方法:由于该按钮的类型被设置为 msoButtonSetNone,并且默认气球模态为 msoModeModal,因此产生了一个无按钮的模态气球。注意:无法取消一个无按钮的模态气球。


With Application.Assistant
With .NewBalloon
    .Heading = "This will never show."
    .Text = "Imagine a balloon here."
    .Button = msoButtonSetNone
    .Show
End With
.Visible = True
If .BalloonError = msoBalloonErrorButtonlessModal Then
    MsgBox "You need a button to dismiss the balloon."
End If
End With

上页:Office VBA教程:AttachCertificate属性 下页:Office VBA教程:BalloonType属性

Office VBA教程:BalloonError属性

Office VBA教程:BalloonType属性 Office VBA教程:BeginGroup属性
Office VBA教程:BuiltIn属性 Office VBA教程:BuiltInFace属性
Office VBA教程:Button属性 Office VBA教程:ButtonName属性
Office VBA教程:Callback属性 Office VBA教程:Caption属性
Office VBA教程:Checkboxes属性 Office VBA教程:Checked属性
Office VBA教程:Column属性 Office VBA教程:Columns属性
Office VBA教程:CommandBar属性 Office VBA教程:CommandBars属性
Office VBA教程:CompareTo属性 Office VBA教程:Comparison属性
Office VBA教程:Condition属性 Office VBA教程:Conjunction属性
Office VBA教程:Connect属性 Office VBA教程:Connector属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号