Ordenar

14/09/2005 - 08:44 por Engel | Informe spam
Hola,

Tengo una hoja diseñada para poder introducir datos desde A1 hasta
X350, esta hoja se va actualiando cada semana por lo que al principio
del año solo estan ocupadas varias filas y semalmente se van añadiendo
datos en filas siguientes.

Claro, al ordenar los datos hay que marcar cada vez el rango a ordenar
para que no coja filas sin datos.

Existe alguna forma para hacer una macro que solo coja las lineas con
datos, o sea por ejemplo si la primera semana solo tengo datos desde
A1 a X30 que solo me ordene estas filas, pero que si la semana
siguente ya tengo desde A1 a X50 que me ordene ese rango, por cierto
el orden tiene que ser basado en la columna B.

Se puede hacer de alguna manera?

Saludos,
Engel

Preguntas similare

Leer las respuestas

#6 KL
15/09/2005 - 22:10 | Informe spam
Hola Engel,

Prueba este macro.

Saludos,
KL

Sub Macro2()
Dim rng As Range
Set rng = Range(Cells(8, "A"), _
Cells(Rows.Count, "A").End(xlUp).Offset(, 20))
rng.Sort _
Key1:=rng(1, 2), _
Order1:=xlAscending, _
Header:=xlNo, _
Orientation:=xlTopToBottom
End Sub
Respuesta Responder a este mensaje
#7 Engel
16/09/2005 - 09:13 | Informe spam
On Thu, 15 Sep 2005 22:10:02 +0200, "KL"
wrote:

Hola Engel,

Prueba este macro.

Saludos,
KL

Sub Macro2()
Dim rng As Range
Set rng = Range(Cells(8, "A"), _
Cells(Rows.Count, "A").End(xlUp).Offset(, 20))
rng.Sort _
Key1:=rng(1, 2), _
Order1:=xlAscending, _
Header:=xlNo, _
Orientation:=xlTopToBottom
End Sub




Parece que quiere ordenar pero no hace nada, desde luego no da ningun
error, por privado te mando la hoja, para que veas lo que hace, la
macro esta asignada al boton.

Saludos,
Engel
Respuesta Responder a este mensaje
#8 Engel
16/09/2005 - 09:26 | Informe spam
On Fri, 16 Sep 2005 09:13:54 +0200, Engel wrote:

Parece que quiere ordenar pero no hace nada, desde luego no da ningun
error, por privado te mando la hoja, para que veas lo que hace, la
macro esta asignada al boton.



Uy, ahora haciendo mas pruebas veo que si ordena, pero solo ordena la
columna E, no me habia fijado, y claro esto hace que los puntos que
estaban asignados a uno pasen a otro participante.

Saludos,
Engel
Respuesta Responder a este mensaje
#9 Engel
16/09/2005 - 09:53 | Informe spam
On Fri, 16 Sep 2005 09:26:23 +0200, Engel wrote:

On Fri, 16 Sep 2005 09:13:54 +0200, Engel wrote:

Parece que quiere ordenar pero no hace nada, desde luego no da ningun
error, por privado te mando la hoja, para que veas lo que hace, la
macro esta asignada al boton.



Uy, ahora haciendo mas pruebas veo que si ordena, pero solo ordena la
columna E, no me habia fijado, y claro esto hace que los puntos que
estaban asignados a uno pasen a otro participante.

Saludos,
Engel



Bueno, bueno bueno, ya veo lo que hace esta macro, es que no me fijo,
y claro.

Ordena perfectamente, pero por la columna B, tiene que hacer lo mismo
pero por la columna C.

Asi que he probado de cabiar un 2 que he visto dentro de la macro y he
acertado, ahora ordena por la columna C que es lo que necesitaba, ha
sonado la flauta porque no tengo ni idea de VB.

Saludos,
Engel
Respuesta Responder a este mensaje
#10 KL
16/09/2005 - 10:08 | Informe spam
Hola Engel,

Acuerdate de tres cosas:

1) quitar el procedimiento asociadon al evento SelectionChange (ya no lo
necesitas)
2) quitar el Formato Condicional del rango [A8:S60]
3) quitar el apostrofe inicial de la siguiente instruccion del codigo
asociado al evento Change (me olviide de quitarlo yo):

'If Intersect(Target, _
Range(colNombres & filNombresIni & ":" & colNombres & 65536, _
colFechasIni & filFechas & ":" & colFechasfin & filFechas)) _
Is Nothing Then Exit Sub


Saludos,
KL




"Engel" wrote in message
news:
On Fri, 16 Sep 2005 09:26:23 +0200, Engel wrote:

On Fri, 16 Sep 2005 09:13:54 +0200, Engel wrote:

Parece que quiere ordenar pero no hace nada, desde luego no da ningun
error, por privado te mando la hoja, para que veas lo que hace, la
macro esta asignada al boton.



Uy, ahora haciendo mas pruebas veo que si ordena, pero solo ordena la
columna E, no me habia fijado, y claro esto hace que los puntos que
estaban asignados a uno pasen a otro participante.

Saludos,
Engel



Bueno, bueno bueno, ya veo lo que hace esta macro, es que no me fijo,
y claro.

Ordena perfectamente, pero por la columna B, tiene que hacer lo mismo
pero por la columna C.

Asi que he probado de cabiar un 2 que he visto dentro de la macro y he
acertado, ahora ordena por la columna C que es lo que necesitaba, ha
sonado la flauta porque no tengo ni idea de VB.

Saludos,
Engel
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida