Extraer una palabra de una lista dentro de una celda de otra pág in

31/07/2008 - 22:51 por JP | Informe spam
Excel: Qué formular debo usar para extraer un nombre (que es parte de un
listado de varios nombres) de una celda que contiene un texto largo, pero que
dentro de ella figura uno de los nombres que figuran en la lista mencionada
¿??

Por ejemplo tengo una lista de varias marcas de neumáticos:
Marca
Dunlop
Michelin
Toyo
Goodyear
etc.

Y en otra hoja, tengo un listado con diferentes descripciones y dentro de
cada descripción figura una de las marcas:

NEUMATICOS,195/65R14 89H,DUNLOP,SP SPORT L
NEUMATICOS,195/70R14 91T,DUNLOP,ECO EC201, USO:
NEUMATICO MICHELIN ENERGY XM1 ANCHO: 185, SE
NEUMATICOS MICHELIN XT-AS ANCHO: 205, SERIE : 70, DIAMET

Quiero extraer en las cledas de al lado sólo los nombres de las marcas que
figuran en el listado de marcas.

Se que se uede hacer uno por uno, pero en caso tenga un listado de 240
marcas, coo automatizar el proceso ¿??


Si alguien me puede ayudar con la solución se lo agradecería bastante.


Slds,

JP
 

Leer las respuestas

#1 AnSanVal
01/08/2008 - 00:11 | Informe spam
Se me ocurre mediante código:

Sub ExtraeMarca()
Dim celda1, celda2 As Range
For Each celda2 In Range("descripciones")
For Each celda1 In Range("marcas")
If InStrRev(celda2.Value, UCase(celda1.Value)) > 0 Then
celda2.Offset(, 1).Value = celda1.Value
Exit For
End If
Next celda1
Next celda2
End Sub

Saludos desde Tenerife: Antonio.
"JP" escribió en el mensaje news:
Excel: Qué formular debo usar para extraer un nombre (que es parte de un
listado de varios nombres) de una celda que contiene un texto largo, pero que
dentro de ella figura uno de los nombres que figuran en la lista mencionada
¿??

Por ejemplo tengo una lista de varias marcas de neumáticos:
Marca
Dunlop
Michelin
Toyo
Goodyear
etc.

Y en otra hoja, tengo un listado con diferentes descripciones y dentro de
cada descripción figura una de las marcas:

NEUMATICOS,195/65R14 89H,DUNLOP,SP SPORT L
NEUMATICOS,195/70R14 91T,DUNLOP,ECO EC201, USO:
NEUMATICO MICHELIN ENERGY XM1 ANCHO: 185, SE
NEUMATICOS MICHELIN XT-AS ANCHO: 205, SERIE : 70, DIAMET

Quiero extraer en las cledas de al lado sólo los nombres de las marcas que
figuran en el listado de marcas.

Se que se uede hacer uno por uno, pero en caso tenga un listado de 240
marcas, coo automatizar el proceso ¿??


Si alguien me puede ayudar con la solución se lo agradecería bastante.


Slds,

JP

Preguntas similares