Macro para extraer 4 números de una celda

Me podrían ayudar con una macro que permita extraer 4 números seguidos. Por ejemplo en la celda A1 tengo lo siguiente: 003 2012-02-02 21-35-28.JPG; de ahí tendría que extraer 2012.

2 Respuestas

Respuesta
1

Es muy sencillo: Añade en B1 esta fórmula:
=MED(A1;5;4)

MED,

Descripción

MED devuelve un número específico de caracteres de una cadena de texto, comenzando en la posición que especifique y en función del número de caracteres que especifique.

Respuesta
1

H o l a:

Te anexo la macro, si tienes más datos en la columna A funciona desde la celda A1 hasta la última fila con datos que tengas en la columna A.

Sub Extraer()
'Por.Dante Amor
    With Range("B1:B" & Range("A" & Rows.Count).End(xlUp).Row)
        .Formula = "=MID(RC[-1],5,4)"
        .Value = .Value
    End With
End Sub
No he recibido comentarios, Recuerda valorar la respuesta
Sal u dos

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Necesito una fórmula que me busque el nombre de una persona y que me sume los ingresos de esa persona en diferentes hojas

En un libro de excel en la hoja 1 tengo mi base de datos con los diferentes nombres de los colaboradores de la empresa, en las siguiente hojas tengo los ingresos que devengaron mensualmente, enero-Agosto, lo que necesito es que me busque el nombre de...
2 respuestas

¿Cómo cancelar opciones de la barra de menús en google sheets?

He creado y compartido una hoja de google sheets para trabajo colaborativo entre varios usuarios, todos están como "editores" pero sólo pueden editar rangos específicos que les he asignado a cada uno, también he desactivado en configuración las...
2 respuestas

Formato condicional con función de excel

Expertos, como puedo resaltar una celdas con formato condicional en base a una función lógica en Excel Mis criterios es que de lunes a vieres la hora laboradas son 8.5 y sábado 5.5 A partir de la columna D5 se colocan las fechas y en la columna G a...
3 respuestas

Cómo recoger datos concretos de acciones específicas de una web en excel

Tengo un Excel con una columna con los nombres de unas acciones que cotizan en diferentes mercados mundiales. Quisiera saber si, desde una web especializada en bolsa, se puede recoger un dato concreto de cada una de esas acciones que tengo, y...
2 respuestas

Rellenar celdas vacías en rangos múltiples

En una hoja de Excel tengo una base de datos extensa, en un rango de A5:D1500, en el orden de las columnas contiene los siguientes datos: "A" Departamento, "B" Nombre, "C" Cargo, "D" Monto a pagar. La cantidad de empleados en cada departamento es...
4 respuestas

Mostrar en listbox solo las filas con dato, a partir de la columna 1 de la tabla.

Tengo una tabla con datos, la primera columna (A) es un ID, cuando se completa información en mi base de datos, el número del ID lo elimino, quedando vacío. Entonces cuando vuelvo a cargar el listbox, no quiero que las filas con ID vacío se muestren...
3 respuestas

Como hacer Formato personalizado de celda

Deseo saber si me pueden ayudar con para obtener este formato personalizado de celda. Escribir esto en una celda 624662678 / 944642829 Ver esto 624 66 26 78 / 944 64 28 29 A la espera de su ayuda, me despido.
2 respuestas

Campos en informe de access auto ajustables

Tengo una duda que no se si se podrá resolver, tengo un informe de access con un texto predefinido, en el cual tienen que completarse unos campos previamente introducidos en un formulario, bien como puedo hacer para que el texto predefinido se ajuste...
3 respuestas

Desproteger un rango de celdas en una hoja protegida

Tengo una aplicación donde en una hoja se ponen comentarios automáticos con una macro, pero como hay celdas donde hay fórmulas las tengo bloqueadas y ocultas para que no se borren por error al usarla, tengo puesto el Unprotect en la macro por que si...
5 respuestas

Cambio de color en varias celdas excel

Me preguntaba si habrá algún código que cambie el color de varias celdas en un libro Tengo demasiadas celdas en color amarillo y la idea es reemplazar esas celdas con color rojo
2 respuestas