Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 10907
  • Last Modified:

Excel Sheet Hover Over Cell To Display Data

Basically this is what I want:
I want to be able to hover my cursor over a cell in an excel sheet that then brings up a box showing data that is entered in another sheet within the workbook.

Example:
In a workbook I have 2 sheets one labeled names and one labeled ages. On the names tab/sheet I want to be able to hover over someones name (let's say that user is in A1 on the names sheet) I want it to display a number that I have already manually entered on the ages sheet in cell B4.
So let's say I have 45 entered in cell B4 on the ages sheet. When I hover over cell A1 on the names sheet a pop up is displayed that says 45
0
adam_daunhauer
Asked:
adam_daunhauer
1 Solution
 
Rory ArchibaldCommented:
What is the link between A1 and b4?
0
 
jppintoCommented:
You could use some code to add the information to the cell as a comment when the mouse is hover the cell and then remove the comment when the mouse exits the cell, something like this:

Range("B2").AddComment
Range("B2").Comment.Text Text:=Cells(myRange.Row, 1)      

Hope that you get the general idea...

jppinto
0
 
adam_daunhauerAuthor Commented:
rorya - I am dumbing it down a little this is actually an access file that has data entered into it and then an excel sheet that was some macros running (rolling months etc) I am looking for a quick fix without having to add another column into the excel sheet.

jppinto - I do not see here where it references the second sheet that it is pulling the data from. I am not a programmer.
Is it something like this for the example I gave?
Range("A1").AddComment
Range("A1").Comment.Text Text:=Cells("ages" "B4")      
0
 
BalajitrCommented:
You could add comments to the cells.

You could try an automating code like :-

For i = 1 To 10
    Sheets("Names").Cells(i, 1).Comment.Delete
    Sheets("Names").Cells(i, 1).AddComment
    Sheets("Names").Cells(i, 1).Comment.Text Text:=Sheets("Ages").Cells(i, 1).Text
    Sheets("Names").Cells(i, 1).Comment.Shape.TextFrame.AutoSize = True
Next

You could put this code in the names worksheet activate callback.

Atached is the sample file.
Names---Ages.xls
0
 
adam_daunhauerAuthor Commented:
that is exactly what I am looking for
0

Featured Post

Concerto Cloud for Software Providers & ISVs

Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!

Learn how Concerto can help you.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now