在excel中浮动图片

我有一张图片，当用户滚动时，我已经将它设置在顶部并保留在表格的右上angular。

我想改变这一点，以便图片仍然浮动，但如果用户在任一方向上滚动了多于X的行数和/或在任一方向上的Y列数量，则跳回到angular落。

这将意味着图片会随着表单移动一段时间，然后在用户滚动到“足够”时返回到顶部angular落。

用于浮动图片的代码：

 Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.ScreenUpdating = False If Target.Cells.Count > 1 Then Exit Sub With ActiveSheet.Shapes("Picture 3") .Top = ActiveWindow.VisibleRange.Top .Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 15 End With Application.ScreenUpdating = False End Sub