Código:
Private Sub TextBox1_Change()
filtro = "*" & Sheets("Hoja1").TextBox1.Text & "*"
Range("D11").AutoFilter Field:=4, Criteria1:=filtro
End Sub
Código:
Private Sub TextBox1_Change()
filtro = "*" & Sheets("Hoja1").TextBox1.Text & "*"
Range("D11").AutoFilter Field:=4, Criteria1:=filtro
End Sub
Etiquetas:
#aprendiendoexcel365, #josealcaldealias, #Excel, #funciones, #UDF, #Visual Basic, #VBA, #DAX, #Tips, #Basico, #Microsoft Excel, #Cursos Excel OnLine, #Aprende Excel, #Aprende Excel OnLine, #Excel 365, #Power Pivot, #Power BI, #Power Query, #Google Sheets, #Macros, #Código VBA, #Tutoriales Excel, #MTV, #Vbscript, #TypeScript, #Lenguaje M, #fórmulas, #funciones, #paso a paso, #funciones Excel, #libros, #tablas, #formatos, #hojas, #datos, #gráfico, #análisis de datos, #base de datos, #dashboards, #tablas dinámicas, #excel desde cero, #hoja de cálculo, #plantillas de Excel
APRENDER VISUAL BASIC PARA APLICACIONES EN EXCEL CON 100 EJERCICIOS PRÁCTICOS EBOOK Sinopsis: Visua…
¿Te gusta mi contenido?
Apoya mi trabajo con una pequeña Donación...
¡Muchas gracias!
Buenos días José, Primero de todo felicitarte y agradecerte el compartir toda esta información, me parece increíble poder hacer estas macros, me funciona bien cuando busco Texto, pero cuando son Números no me funciona, como la tendría que modificar para que funcione Con números? Muchas gracias de antemano.
ResponderEliminar