Добрый день,
Столкнулся со следующей проблемой:
В рабочей книге BEx 7, при установке курсора на поле открытое для ввода выскакивает ошибка
"Object variable or With block variable not set" в строке стандартной функции
Code:
pBallonn.BalloonType = 1
при комментировании ругается на следующую, при комментировании всего блока все работает.
Версия Excel 2007, Книга Excel 2003.
Похоже на какой то баг, книгу никто не трогал, просто перестала работать.
Поиск результатов не принес.
Буду признателен за любую помощь.
Код стандартной функции модуля Common BexAnalyzer.xla привожу:
Code:
Public Sub SetBalloonText(Optional ByVal iLabel1 As String = "", Optional ByVal iLabel2 As String = "", Optional ByVal iLabel3 As String = "", Optional ByVal iHeading As String = "")
If Not pBallonn Is Nothing Then
Assistant.Animation = msoAnimationCheckingSomething
pBallonn.Close
End If
Set pBallonn = Application.Assistant.NewBalloon
pBallonn.BalloonType = 1
pBallonn.Icon = 3
pBallonn.Mode = msoModeModeless
pBallonn.Button = 1
pBallonn.Callback = "CloseBalloon"
pBallonn.Heading = iHeading
pBallonn.Labels(1).Text = iLabel1
pBallonn.Labels(2).Text = iLabel2
pBallonn.Labels(3).Text = iLabel3
On Error Resume Next
Call pBallonn.Show
End Sub
Вход
Регистрация
FAQ пользователя
Поиск
