By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
435,255 Members | 2,575 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 435,255 IT Pros & Developers. It's quick & easy.

Balloons in Word

P: 74
Does anyone know how to make a Balloon pop-up over a certain text when you mouse over it? The ballon would contain predetermed text. Any help would be great thanks.
Aug 31 '07 #1
Share this Question
Share on Google+
7 Replies


sgrec7
P: 59
Does anyone know how to make a Balloon pop-up over a certain text when you mouse over it? The ballon would contain predetermed text. Any help would be great thanks.
ok i think this is what your after (BTW im using terminology that is a mix of VB 6 and VB.net)

Expand|Select|Wrap|Line Numbers
  1. Private Sub label1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles label1.MouseHover
  2. picturebox1.visible = true
    picturebox1.top = label1.top 
    picturebox1.left = label1.left
    end sub
  3.  
  4.  
(picture1 is the balloon)

(label1 is the writing that you hover over)

you would then have to set something up to make the balloon disappear (like a button or something)

(that was mainly VB.net speak)

sgrec7
Sep 2 '07 #2

P: 74
ok i think this is what your after (BTW im using terminology that is a mix of VB 6 and VB.net)

Expand|Select|Wrap|Line Numbers
  1. Private Sub label1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles label1.MouseHover
  2. picturebox1.visible = true
    picturebox1.top = label1.top 
    picturebox1.left = label1.left
    end sub
  3.  
  4.  
(picture1 is the balloon)

(label1 is the writing that you hover over)

you would then have to set something up to make the balloon disappear (like a button or something)

(that was mainly VB.net speak)

sgrec7
This code is not working, here is what i am doing


Private Sub label1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs)

Handles label1.mousehover

If label1 = "SpecSales" Then
Picturebox1 = "Test"

Picturebox1.Visible = True
Picturebox1.Top = label1.Top
Picturebox1.Left = label1.Left
End Sub
Sep 4 '07 #3

P: 21
This code is not working, here is what i am doing


Private Sub label1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs)

Handles label1.mousehover

If label1 = "SpecSales" Then
Picturebox1 = "Test"

Picturebox1.Visible = True
Picturebox1.Top = label1.Top
Picturebox1.Left = label1.Left
End Sub
If you are using VB.net then can you not just add a tool tip, which will do all this for you? Tho i think it will only allow text to appear as the balloon?
Sep 5 '07 #4

P: 74
I am just using VBA, and i have no idea what a tool tip is?
Sep 5 '07 #5

Ali Rizwan
100+
P: 927
Does anyone know how to make a Balloon pop-up over a certain text when you mouse over it? The ballon would contain predetermed text. Any help would be great thanks.
Hi
Try this one it will help u a lot.Custom Tool Tip
Sep 5 '07 #6

sgrec7
P: 59
sorry mate, i thought that you meant a picture of a balloon, (not a balloon tip) ;-(

na im sorry, i don't know anything about balloon tips

sorry for the mix around

sgrec7
Sep 5 '07 #7

pureenhanoi
100+
P: 175
Does anyone know how to make a Balloon pop-up over a certain text when you mouse over it? The ballon would contain predetermed text. Any help would be great thanks.
Open Microsoft Word.
Select Help > Show the Office Assistant
If you cant see the Assistant appears, then you must install Office assistant again.
Create a new document.
From Tools menu select Macro > Security
Set the security level to Medium or Low.
Press Alt + F11 to open Visual Basic Editor.
Write down this code:
Expand|Select|Wrap|Line Numbers
  1. Private Sub Document_Open()
  2. With Assistant.NewBalloon
  3.     .Animation = msoAnimationAppear
  4.     .Text = "hello world"
  5.     .Labels(1).Text = "Click me"
  6.     .Labels(2).Text = "No, click me"
  7.     .Show
  8. End With
  9. End Sub
  10.  
Save the code.
Close Visual Basic Editor
From winword, save new document to c:\doc1.doc
Close winword.
Open doc1.doc again, and you will see the Ballon appears
Sep 6 '07 #8

Post your reply

Sign in to post your reply or Sign up for a free account.