Evitar perdida de botón auto forma al hacer filtro

Tengo una hoja de excel con un botón flotante que tiene un hipervínculo que me lleva a otra hoja. El botón me funciona bien con el siguiente código.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim FILA, COLUMNA As Variant
FILA = Target.Row
COLUMNA = Target.Column
If FILA >= 0 Then
'If FILA = 5 Then
With ActiveSheet.Shapes("3 Rectángulo redondeado")
.Visible = True
.Left = Cells(FILA, COLUMNA + 2).Left
.Top = ActiveCell.Top
End With
Else
ActiveSheet.Shapes("3 Rectángulo redondeado").Visible = True
End If
End Sub

El problema esta en que cuando hago filtros se me pierde o me cambia de tamaño y ya no lo encuentro, como puedo hacer para que me permanezca todo el tiempo así haga filtros.. Gracias