Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Display detailed data in a pop up box
Is there a way to show detailed data (i.e. concatenated from other columns)
in a pop-up box - either by clicking or rolling over a cell? For example, when a user rolls over or clicks cell E5, I'd like a popup ballon/box to display cells T5, U5, V5, W5, etc with line breaks after each. I've searched and found solutions for displaying help messages (e.g. validation input message) or pictures, but not data. Thanks for your help. |
#2
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Display detailed data in a pop up box
See if this does what you want
Private Sub Worksheet_SelectionChange(ByVal Target As Range) MsgBox _ ActiveCell.Offset(0, 15) & vbCrLf & ActiveCell.Offset(0, 16) & vbCrLf & ActiveCell.Offset(0, 17) & vbCrLf & ActiveCell.Offset(0, 18) End Sub -- -- -John Please rate when your question is answered to help us and others know what is helpful. "North Tim" wrote in message ... Is there a way to show detailed data (i.e. concatenated from other columns) in a pop-up box - either by clicking or rolling over a cell? For example, when a user rolls over or clicks cell E5, I'd like a popup ballon/box to display cells T5, U5, V5, W5, etc with line breaks after each. I've searched and found solutions for displaying help messages (e.g. validation input message) or pictures, but not data. Thanks for your help. |
#3
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Display detailed data in a pop up box
John
You should qualify the cell otherwise any other cell clicked on will pop up the message box with "OK" Would get kind of annoying. Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$E$5" Then MsgBox _ ActiveCell.Offset(0, 15) & vbCrLf & ActiveCell.Offset(0, 16) & vbCrLf & _ ActiveCell.Offset(0, 17) & vbCrLf & ActiveCell.Offset(0, 18) End If End Sub Gord Dibben MS Excel MVP On Tue, 2 Jan 2007 14:21:40 -0600, "John Bundy" wrote: See if this does what you want Private Sub Worksheet_SelectionChange(ByVal Target As Range) MsgBox _ ActiveCell.Offset(0, 15) & vbCrLf & ActiveCell.Offset(0, 16) & vbCrLf & ActiveCell.Offset(0, 17) & vbCrLf & ActiveCell.Offset(0, 18) End Sub -- |
#4
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Display detailed data in a pop up box
Yes, that does the trick.
To take it one step further, is there an easy way to make it a rollover popup? That is, display while the user's mouse is on the cell, disappear when it's moved off the cell? If not, the current solution will do just fine. But I thought I'd at least ask. Thanks for your help. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Manual control of link updating for downloaded quotes? | Excel Discussion (Misc queries) | |||
Data value display attributes linked to table attributes | Charts and Charting in Excel | |||
ranking query | Excel Discussion (Misc queries) | |||
In 3 active sheets in wkbk, determine& display the # of sheets that have data | Excel Discussion (Misc queries) | |||
Sort pages? | Excel Discussion (Misc queries) |