James Bond

Prueba la fórmula mostrada en la imagen, cada que cambies el filtro la formula te mostrara el resultado

ya intentaste rangodatos.AutoFilter field:=textbox1.text, Criteria1:=textbox2.text?

Prueba esa macro, es una UDF que usa el punto de N. como separador, teclear y luego mandas llamar la fórmula o la copias de la fila previa, respecto a teclear y dar enter eso no funciona en una hoja a menos que sea un formulario con campos textbox

Si quieres filtrar importación N. presente en algunas filas y otras no por ejemplo: en la imagen puedes ver un ejemplo de lo que digo la macro filtra esa palabra en especifico y luego le extra el numero, ojo la macro ignorara aquellas palabras sin...

Reemplaza tus códigos por estos códigos, como recomendación es mucho más eficiente trabajar con filtros (autofilter) ya que tienen como ventaja que puedes hacer el filtro por cualquier parte del nombre, esta programación que tienes es para cadena...

Este es el resultado de la macro Si quieres cambiar el rango solo cambia la referencia d5 de la primera línea

Esta instrucción cambia toda la información que tengas a valor partiendo de la celda A1, si tu información empieza en otra celda solo reemplaza A1 por la dirección de tu celda. Sub cambiar_texto_a_valor() With Range("a1") .CurrentRegion.Value =...

Hace tiempo me pasaron un código para encriptar basado en sha1 no se si sea 384, este es el resultado que da, la función que debes teclear después de copiar la macro es =SHA1HASH(str) Donde str es la celda donde este el texto que quieres encriptar y...

¿Algo así?, le antepuse unos ceros delante del numero porque al dejar el numero solo Excel o toma como fecha, la macro esta debajo y esta ligada a un botón de comando Private Sub CommandButton1_Click() FECHA = Date XYEAR = Year(FECHA) FILAS =...

Este es el resultado de la macro y esta es la macro Sub copiar_transponer() Set datos = Range("a1").CurrentRegion With datos filas = .Rows.Count registros = filas / 3 Set destino = Range("d1").Resize(registros, 3) For i = 1 To registros If i = 1 Then...