animation pop-up after hovering over a cell

[msword]

Hello everyone.

Is there a way to achieve an animation as a popup after hovering over a cell on windows/macos/anything? (cell comment's background ect.)
Any workaround is appreciated.

Thanks.

 

[Drrellik]

If you would like you can add a comment to the cell, and have a picture show up while you hover over it. if you need actual animation you may need VBA

 

[msword]

1. yes i need actual animation
2. after hovering over a cell
any suggestions how to do it?

 

[kevin9999]

Hope this may point you in the right direction.
Using the following arrangement on sheet 1 - note the named cell (C1) "NameRollover" and the CountA formula in D1 (you can hide those columns if you like)

Mouse Over Animation.xlsb
	A	B	C	D
1	RunAnimation	RunAnimation	RunAnimation	1
2	Don't Run	Don't Run
3
Sheet1

Cell Formulas
Range	Formula
D1	D1	=COUNTA(C1:C2)
A1	A1	=IFERROR(HYPERLINK(ChangeAnimation(B1)),"RunAnimation")
A2	A2	=IFERROR(HYPERLINK(ChangeAnimation(B2)),"Don't Run")

Named Ranges
Name	Refers To	Cells
NameRollover	=Sheet1!$C$1	D1

Cells with Conditional Formatting
Cell	Condition		Cell Format	Stop If True
A1:A2	Expression	=$A1=$C$1	text	NO

Put the following code in the Sheet1 code module:

Private Sub Worksheet_Calculate()
    If [C1] = "RunAnimation" Then PlayAnimation
End Sub

And the following code in a standard module:

Option Explicit
Public Function ChangeAnimation(Name As Range)
    Range("NameRollover") = Name.Value
End Function

Sub PlayAnimation()
    Sheet1.Shapes("Image1").Visible = True
    Dim x As Long: x = 0
    Do
    DoEvents
        x = x + 2
        Sheet1.Shapes("Image1").Left = x
        Sheet1.Shapes("Image1").Rotation = x
    Loop Until x = 500
    Sheet1.Shapes("Image1").Visible = False
End Sub

Then when you 'hover' over cell A1 - your animation should run. For the sake of demonstration, you need an image (called "Image1") on sheet 1 to start with.

Link to demonstration file here

 

[kevin9999]

There seems to have been a problem with the first link to the demo file - try this instead