Extraer los diferentes valores de una columna.

23/01/2008 - 02:23 por JC | Informe spam
Hola a Tod@s:

Y gracias anticipadas, por vuestra ayuda y comprensión.
Tengo una macro a medias, en la que ejecuto un filtro en una hoja de datos
("Hoja1") y necesito llevarme a otra hoja ("Hoja2"), los diferentes valores
(que no todos, tan solo, todos los que sean diferentes) de una de las
columnas de la hoja de datos.
Como sé, de mi torpeza en explicarme, os pongo un ejemplo, aunque sea muy
simple:
Si tuviera en la hoja de datos "Hoja1", esta columna:
A
01_Verde
02_Azul
03_Verde
04_Verde
05_Verde
06_Rojo
07_Verde
08_Verde
09_Amarillo
10_Azul
11_Rojo
12_Verde

Que mandato o sentencia debería de usar, para que me pudiera dar en la
"Hoja2" a partir de la celda "B3", estos DIFERENTES valores ???:
B
03_Verde
04_Azul
05_Rojo
06_Amarillo

Disculpar mi torpeza en explicarme y gracias de nuevo, por cualquier
comentario que me podais hacer al respecto.

Un saludo

Juan Carlos
 

Leer las respuestas

#1 Héctor Miguel
23/01/2008 - 03:34 | Informe spam
hola, Juan Carlos !

la macro que solicitas es (practicamente) la misma que la propuesta anterior (solo que sin el rango de criterios)
pero si es neceario que la primer celda en ambas hojas tanga titulo (y el mismo) -> [A1] en hoja1 y [B3] en hoja2
luego prueba con la siguiente macro:

Sub Filtra_unicos()
With Worksheets("hoja1")
.Range("a:a").AdvancedFilter _
Action:=xlFilterCopy, _
CopyToRange:=Worksheets("hoja2").Range("b3"), _
Unique:=True
End With
End Sub

saludos,
hector.

__ la consulta original __
Tengo una macro a medias, en la que ejecuto un filtro en una hoja de datos ("Hoja1")
y necesito llevarme a otra hoja ("Hoja2"), los diferentes valores
(que no todos, tan solo, todos los que sean diferentes) de una de las columnas de la hoja de datos.
Si tuviera en la hoja de datos "Hoja1", esta columna:
A
01_Verde
02_Azul
03_Verde
04_Verde
05_Verde
06_Rojo
07_Verde
08_Verde
09_Amarillo
10_Azul
11_Rojo
12_Verde

Que mandato o sentencia deberia de usar, para que me pudiera dar en la "Hoja2"
a partir de la celda "B3", estos DIFERENTES valores ???:
B
03_Verde
04_Azul
05_Rojo
06_Amarillo

Preguntas similares