Office Assistant went away w/2007 - Now What?

S

Steady-Stedis

I am not a proggrammer but what one would call a super user. Over the years,
I have created over 50 spreadsheets for my accounting department using macros
/ VBA coding. Many of these call up the office assistant to ask the user a
question or for the user to select from a choice of options. A sample is :

With Assistant.NewBalloon
.Heading = "Selecting Customer and Product"
.Text = "Select the Product Grouping you wish to view."
.CheckBoxes(1).Text = "Gasoline"
.CheckBoxes(2).Text = "Diesel"
.Button = msoButtonSetOkCancel

If .Show = msoBalloonButtonOK Then

If .CheckBoxes(1).Checked = True And .CheckBoxes(2).Checked =
False Then
Group = "Gasoline"
GoTo Line1:
ElseIf .CheckBoxes(1).Checked = False And .CheckBoxes(2).Checked
= True Then
Group = "Diesel"
GoTo Line1:
Else
Set MyBalloon = Assistant.NewBalloon

With MyBalloon
.BalloonType = msoBalloonTypeBullets
.Heading = "Selecting Customer and Product"
.Text = "You Must select only one product grouping."
.Show

End With
GoTo Line0:

End If
End If
Set MyBalloon = Assistant.NewBalloon

With MyBalloon
.BalloonType = msoBalloonTypeBullets
.Heading = "Selecting Customer and Product"
.Text = "The process has been canceled."
.Show

End With

This coding does not seem to work in Excel 2007. The good news is that we
are slowly rolling out Excel 2007. The bad news is in about six months - We
will no longer have access to Excel 2003. I can't believe that they removed
this functionility completely.

Any thought on How I can keep / create something very close to what I have?

Thanks in Advance!!
 
M

Mike H

Not really help because I've no experience of 2007 but if Microsoft have
killed off that annoying pest then that's the first good reason I've heard of
for upgrading to to it.

Mike
 
J

Jim Cone

You can use a built-in Message box or built-in Inputbox or
create a custom UserForm.
Rough examples follow for Msgbox and Input box...
'--
MsgBox "Gasoline This Time?", vbQuestion + vbYesNoCancel, "Blame Stedis"
'--
Dim strResponse As String
strResponse = InputBox("Enter G for Gasoline or D for Diesel.", "Blame the Other Guy", "Gasoline")
--
Jim Cone
Portland, Oregon USA



"Steady-Stedis"
wrote in message
I am not a proggrammer but what one would call a super user. Over the years,
I have created over 50 spreadsheets for my accounting department using macros
/ VBA coding. Many of these call up the office assistant to ask the user a
question or for the user to select from a choice of options. A sample is :

With Assistant.NewBalloon
.Heading = "Selecting Customer and Product"
.Text = "Select the Product Grouping you wish to view."
.CheckBoxes(1).Text = "Gasoline"
.CheckBoxes(2).Text = "Diesel"
.Button = msoButtonSetOkCancel

If .Show = msoBalloonButtonOK Then

If .CheckBoxes(1).Checked = True And .CheckBoxes(2).Checked =
False Then
Group = "Gasoline"
GoTo Line1:
ElseIf .CheckBoxes(1).Checked = False And .CheckBoxes(2).Checked
= True Then
Group = "Diesel"
GoTo Line1:
Else
Set MyBalloon = Assistant.NewBalloon

With MyBalloon
.BalloonType = msoBalloonTypeBullets
.Heading = "Selecting Customer and Product"
.Text = "You Must select only one product grouping."
.Show

End With
GoTo Line0:

End If
End If
Set MyBalloon = Assistant.NewBalloon

With MyBalloon
.BalloonType = msoBalloonTypeBullets
.Heading = "Selecting Customer and Product"
.Text = "The process has been canceled."
.Show

End With

This coding does not seem to work in Excel 2007. The good news is that we
are slowly rolling out Excel 2007. The bad news is in about six months - We
will no longer have access to Excel 2003. I can't believe that they removed
this functionility completely.

Any thought on How I can keep / create something very close to what I have?

Thanks in Advance!!
 
J

JLGWhiz

Excellent opportunity to expand your programming skills. The demise of
MACRO4.0 froced me to learn VBA. You can do things with drawing objects,
word art and the things other responders have mentioned. It can be a fun
learning experience, or a pain in the posterior, depending on the individual
attitude. Good riddance to the Office Assistant.
 

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

Top