office assistant

wwbwb

Well-known Member
Joined
Oct 20, 2003
Messages
513
Hello all, using a code from the board I've gotten this far.
Code:
Sub Helper()

Dim rspns As Integer

    Set myballoon = Assistant.NewBalloon

    With myballoon
        .BalloonType = msoBalloonTypeButtons
        .Button = msoButtonSetNone
        .Text = "Do you need help?" _
            & Application.Rept(Chr(13), 2) & "What do you need help with?"
        .Labels(1).Text = "Part Numbers Sheet"
        .Labels(2).Text = "Marketing Inven Sheet"
        .Labels(3).Text = "Scanable Card Sheet"
        .Labels(4).Text = "Label Sheet"
        .Labels(5).Text = "Other"
        rspns = .Show
    End With

    Select Case rspns
        Case 1: MsgBox "howdy"
        Case 2: MsgBox "wuz up"
      End Select


End Sub
Now this works, but I like annoying my coworkers with the assistant and instead of the msgbox, want the information to continue to come from the assistant. But everytime I replace the Msgbox code with code to change the text in the assistant balloon, it tells me "case without select case" error. Ideas?
 

Excel Facts

Which came first: VisiCalc or Lotus 1-2-3?
Dan Bricklin and Bob Frankston debuted VisiCalc in 1979 as a Visible Calculator. Lotus 1-2-3 debuted in the early 1980's, from Mitch Kapor.

Forum statistics

Threads
1,148,216
Messages
5,745,440
Members
423,952
Latest member
EduardoM

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top