VBA - Función de filtro

Una función de filtro, que devuelve una matriz de base cero que contiene un subconjunto de una matriz de cadenas según un criterio de filtro específico.

Sintaxis

Filter(inputstrings,value[,include[,compare]])

Descripción de parámetros

  • Inputstrings- Un parámetro obligatorio. Este parámetro corresponde a la matriz de cadenas a buscar.

  • Value- Un parámetro obligatorio. Este parámetro corresponde a la cadena a buscar contra el parámetro inputtrings.

  • Include- Un parámetro opcional. Este es un valor booleano, que indica si se devuelven o no las subcadenas que incluyen o excluyen.

  • Compare- Un parámetro opcional. Este parámetro describe qué método de comparación de cadenas se utilizará.

    • 0 = vbBinaryCompare: realiza una comparación binaria

    • 1 = vbTextCompare: realiza una comparación textual

Ejemplo

Agregue un botón y agregue la siguiente función.

Private Sub Constant_demo_Click()
   Dim a,b,c,d as Variant
   a = array("Red","Blue","Yellow")
   b = Filter(a,"B")
   c = Filter(a,"e")
   d = Filter(a,"Y")
  
   For each x in b
      msgbox("The Filter result 1: " & x)
   Next
  
   For each y in c
      msgbox("The Filter result 2: " & y)
   Next
  
   For each z in d
      msgbox("The Filter result 3: " & z)
   Next
End Sub

Cuando ejecuta la función anterior, produce la siguiente salida.

The Filter result 1: Blue
The Filter result 2: Red
The Filter result 2: Blue
The Filter result 2: Yellow
The Filter result 3: Yellow