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!!!!!

The Assistant is gone from Office 2007: no getting it back...
http://en.wikipedia.org/wiki/Clippy


For choosing printer you could use a UserForm.
or
Application.Dialogs(xlDialogPrint).Show

Tim

"needurgenthelp" <(E-Mail Removed)> wrote in message
news:5F505FF3-A9F4-4435-B1EC-(E-Mail Removed)...
> 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!!!!!

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

"Tim Williams" wrote:

> The Assistant is gone from Office 2007: no getting it back...
> http://en.wikipedia.org/wiki/Clippy
>
>
> For choosing printer you could use a UserForm.
> or
> Application.Dialogs(xlDialogPrint).Show
>
> Tim
>
> "needurgenthelp" <(E-Mail Removed)> wrote in message
> news:5F505FF3-A9F4-4435-B1EC-(E-Mail Removed)...
> > 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!!!!!
>
>
>

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" wrote:

> 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!!!!!

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" wrote:

> 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" wrote:
>
> > 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!!!!!

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

"needurgenthelp" wrote:

> 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" wrote:
>
> > 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" wrote:
> >
> > > 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!!!!!

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" wrote:

> 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" wrote:
>
> > 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" wrote:
> >
> > > 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!!!!!