Filtrar datos que contienen tildes en excel vba

En excel podemos realizar filtro de datos para mostrar los datos que queremos de un cierto rango de datos.
En esta oportunidad tenemos información en  nuestra columna "A" entre los cuales hay algunas palabras que contienen datos con tildes

Nuestro objetivo es mediante una macro en vba filtrar aquellos datos que tengan tilde. y que quede como esto.

Para eso crearemos un modulo en nuestro entorno de programacion vba y pegamos el siguiente código

Sub FiltrarTildes()
Range("A1:A11").Interior.Color = xlNone
For Each celda In Range("A1:A11")
    pos = InStr(1, celda, "á", vbTextCompare) + _
    InStr(1, celda, "é", vbTextCompare) + _
    InStr(1, celda, "í", vbTextCompare) + _
    InStr(1, celda, "ó", vbTextCompare) + _
    InStr(1, celda, "ú", vbTextCompare)
    If pos > 0 Then
         celda.Interior.Color = vbWhite
    End If
Next
ActiveSheet.Range("A1:A11").AutoFilter field:=1, Criteria1:=RGB(255, 255, 255), Operator:=xlFilterCellColor
End Sub

Este codigo busca las tildes dentro de nuestro rango de datos ( A1:A11)  y pinta de color blanco la celda donde encuentra una tilde.

Posteriormente se filtran los datos que tengan el color de fondo de blanco rojo.

Y de esa manera se muestran los datos que contienen tildes.

En este enlace les comparto el archivo de ejemplo