excel - 有没有办法在活动标签上使用鼠标悬停功能来弹出 gif？

Question

正如标题所述，我想要一个带有文本的形状（想想流程图），然后在它上面制作一个活动标签。因此，当您将鼠标移到标签上时，会弹出一个 GIF。然后，当他们将鼠标从标签上移开时，它就会消失。

到目前为止我最接近的是这个（但它可能是完全错误的）：

Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As 
Integer, ByVal X As Single, ByVal Y As Single)


Sheet1.Shapes("situation.GIF").Visible = True


End Sub

任何建议或帮助都会很棒，如果您有任何问题，请随时提问！

问候

标签： excelvbaimagemouseover