How can i use Office Assistant and Balloons in 2007?

N

needurgenthelp

Hey folks, can anyone tell me how to re-activate the office assistant in
Excel 2007-I mean the Assistant has only been deprecated (hidden) so there
must be a way to 'unhide' that thing. Alternatively, can anyone shed any
light on what else can be used instead of balloons to let users make a
selection (i.e. chose printer) ?!?! Any help would be highly appreciated!!!!!
 
N

needurgenthelp

Hi Tim,

thanks for that but it is not exactly what I'm looking for- i need something
that returns different values based on the user's decision similar to the
balloons on earlier excel versions
 
V

vqthomf

Hi I use this
Public Function ErrAssistant(strError As String)
'
With Application.Assistant
.On = True
.Visible = True
.FileName = "Merlin.acs"
.Sounds = True
.Animation = msoAnimationBeginSpeaking
End With

Set bln = Application.Assistant.NewBalloon
With bln
.Heading = "VQ Error Reporting"
.Text = strError
.Show
End With
Application.Assistant.Visible = False
[A1].Select
End Function
Sub test()

With Application.Assistant
.FileName = "Merlin.acs"
.On = True
.Animation = msoAnimationGreeting
.AssistWithHelp = True
.GuessHelp = True
.FeatureTips = False
.Visible = True
End With

End Sub

Public Function myAssistant()
'
Dim bln
With Application.Assistant
.On = True
.Visible = True
.FileName = "Merlin.acs"
.Sounds = True
.Animation = msoAnimationBeginSpeaking
.Top = 650
.Left = 910
End With

Set bln = Application.Assistant.NewBalloon
With bln
.Heading = "PUR Menu"
.Text = "Link has been Re-established"

.Show
End With
Application.Assistant.Visible = False
End Function
 
N

needurgenthelp

Hey mate, thanks! Unfortunatelly, it doesn't work or I'm doing something
wrong- it always comes up with

run-tine error' -2147467259(80004005)
Automation Error
Unspecified Error

any leads on that?!?!

Greets
Pat

vqthomf said:
Hi I use this
Public Function ErrAssistant(strError As String)
'
With Application.Assistant
.On = True
.Visible = True
.FileName = "Merlin.acs"
.Sounds = True
.Animation = msoAnimationBeginSpeaking
End With

Set bln = Application.Assistant.NewBalloon
With bln
.Heading = "VQ Error Reporting"
.Text = strError
.Show
End With
Application.Assistant.Visible = False
[A1].Select
End Function
Sub test()

With Application.Assistant
.FileName = "Merlin.acs"
.On = True
.Animation = msoAnimationGreeting
.AssistWithHelp = True
.GuessHelp = True
.FeatureTips = False
.Visible = True
End With

End Sub

Public Function myAssistant()
'
Dim bln
With Application.Assistant
.On = True
.Visible = True
.FileName = "Merlin.acs"
.Sounds = True
.Animation = msoAnimationBeginSpeaking
.Top = 650
.Left = 910
End With

Set bln = Application.Assistant.NewBalloon
With bln
.Heading = "PUR Menu"
.Text = "Link has been Re-established"

.Show
End With
Application.Assistant.Visible = False
End Function



needurgenthelp said:
Hey folks, can anyone tell me how to re-activate the office assistant in
Excel 2007-I mean the Assistant has only been deprecated (hidden) so there
must be a way to 'unhide' that thing. Alternatively, can anyone shed any
light on what else can be used instead of balloons to let users make a
selection (i.e. chose printer) ?!?! Any help would be highly appreciated!!!!!
Click to expand...
Click to expand...
 
V

vqthomf

Hi if you search the help file for NewBalloon or Balloon you should get all
the help you need.
Regards

needurgenthelp said:
Hey mate, thanks! Unfortunatelly, it doesn't work or I'm doing something
wrong- it always comes up with

run-tine error' -2147467259(80004005)
Automation Error
Unspecified Error

any leads on that?!?!

Greets
Pat

vqthomf said:
Hi I use this
Public Function ErrAssistant(strError As String)
'
With Application.Assistant
.On = True
.Visible = True
.FileName = "Merlin.acs"
.Sounds = True
.Animation = msoAnimationBeginSpeaking
End With

Set bln = Application.Assistant.NewBalloon
With bln
.Heading = "VQ Error Reporting"
.Text = strError
.Show
End With
Application.Assistant.Visible = False
[A1].Select
End Function
Sub test()

With Application.Assistant
.FileName = "Merlin.acs"
.On = True
.Animation = msoAnimationGreeting
.AssistWithHelp = True
.GuessHelp = True
.FeatureTips = False
.Visible = True
End With

End Sub

Public Function myAssistant()
'
Dim bln
With Application.Assistant
.On = True
.Visible = True
.FileName = "Merlin.acs"
.Sounds = True
.Animation = msoAnimationBeginSpeaking
.Top = 650
.Left = 910
End With

Set bln = Application.Assistant.NewBalloon
With bln
.Heading = "PUR Menu"
.Text = "Link has been Re-established"

.Show
End With
Application.Assistant.Visible = False
End Function



needurgenthelp said:
Hey folks, can anyone tell me how to re-activate the office assistant in
Excel 2007-I mean the Assistant has only been deprecated (hidden) so there
must be a way to 'unhide' that thing. Alternatively, can anyone shed any
light on what else can be used instead of balloons to let users make a
selection (i.e. chose printer) ?!?! Any help would be highly appreciated!!!!!
Click to expand...
Click to expand...
Click to expand...
 
V

vqthomf

I use this to show comments from a column in a listview when the record is
clicked.
Private Sub chkViewSIP_Click()
'

With Application.Assistant
.FileName = "Merlin.acs"
.FileName = "Merlin.acs"
.On = chkViewSIP.Value
.Animation = msoAnimationGreeting
.AssistWithHelp = True
.GuessHelp = True
.FeatureTips = False
.Visible = chkViewSIP.Value 'Put your text here
End With

End Sub
Try this

needurgenthelp said:
Hey mate, thanks! Unfortunatelly, it doesn't work or I'm doing something
wrong- it always comes up with

run-tine error' -2147467259(80004005)
Automation Error
Unspecified Error

any leads on that?!?!

Greets
Pat

vqthomf said:
Hi I use this
Public Function ErrAssistant(strError As String)
'
With Application.Assistant
.On = True
.Visible = True
.FileName = "Merlin.acs"
.Sounds = True
.Animation = msoAnimationBeginSpeaking
End With

Set bln = Application.Assistant.NewBalloon
With bln
.Heading = "VQ Error Reporting"
.Text = strError
.Show
End With
Application.Assistant.Visible = False
[A1].Select
End Function
Sub test()

With Application.Assistant
.FileName = "Merlin.acs"
.On = True
.Animation = msoAnimationGreeting
.AssistWithHelp = True
.GuessHelp = True
.FeatureTips = False
.Visible = True
End With

End Sub

Public Function myAssistant()
'
Dim bln
With Application.Assistant
.On = True
.Visible = True
.FileName = "Merlin.acs"
.Sounds = True
.Animation = msoAnimationBeginSpeaking
.Top = 650
.Left = 910
End With

Set bln = Application.Assistant.NewBalloon
With bln
.Heading = "PUR Menu"
.Text = "Link has been Re-established"

.Show
End With
Application.Assistant.Visible = False
End Function



needurgenthelp said:
Hey folks, can anyone tell me how to re-activate the office assistant in
Excel 2007-I mean the Assistant has only been deprecated (hidden) so there
must be a way to 'unhide' that thing. Alternatively, can anyone shed any
light on what else can be used instead of balloons to let users make a
selection (i.e. chose printer) ?!?! Any help would be highly appreciated!!!!!
Click to expand...
Click to expand...
Click to expand...
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Office Assistant and Balloons 4
Working on birthday "book" for my wife and having layout/editing trouble 0
Office Assistant 0
Out of Office Assistant in Outlook Express 3
Office Assistant 2007 1
Showing office custom balloon assistant 1
Office 2007 1
Office 2007 hidden properties - threat or menace? 2

Top