autordenado de tabla

24/04/2009 - 15:51 por gongi | Informe spam
Hola Grupo!

Por favor , en esta macro en el evento,Worksheet_Change ¿ puede la
ordenación empezar a partir de la fila A7 , que es donde empieza mi
rótulo de columnas ? . Porque tengo que mantener un titulo para la
tabla en la filas anteriores a A7.
Muchas gracias por la ayuda.

Private Sub Worksheet_Change(ByVal Target As Range)

If Intersect(Target, Range("a7")) Is Nothing Then Exit Sub '
Columns("a:g").Sort Key1:=Range("d1"), Order1:=xlAscending,
Header:=xlYes

End Sub

Preguntas similare

Leer las respuestas

#1 pepe
24/04/2009 - 16:12 | Informe spam
¿has probado a cambiar "a:g" por el rango a8:gnnnnnn, siendo nnnnnn el
numero de la ultima fila?

"gongi" escribió en el mensaje de noticias
news:
Hola Grupo!

Por favor , en esta macro en el evento,Worksheet_Change ¿ puede la
ordenación empezar a partir de la fila A7 , que es donde empieza mi
rótulo de columnas ? . Porque tengo que mantener un titulo para la
tabla en la filas anteriores a A7.
Muchas gracias por la ayuda.

Private Sub Worksheet_Change(ByVal Target As Range)

If Intersect(Target, Range("a7")) Is Nothing Then Exit Sub '
Columns("a:g").Sort Key1:=Range("d1"), Order1:=xlAscending,
Header:=xlYes

End Sub
Respuesta Responder a este mensaje
#2 traveloteca.admon
27/04/2009 - 11:39 | Informe spam
On 24 abr, 16:12, "pepe" wrote:
¿has probado a cambiar "a:g" por el rango a8:gnnnnnn, siendo nnnnnn el
numero de la ultima fila?

"gongi" escribió en el mensaje de noticiasnews:
Hola Grupo!

Por favor , en esta macro en el evento,Worksheet_Change  ¿ puede la
ordenación empezar a partir de la fila  A7 , que es donde empieza mi
rótulo de columnas ? . Porque tengo que mantener un titulo para la
tabla en la filas anteriores a A7.
Muchas gracias por la ayuda.

Private Sub Worksheet_Change(ByVal Target As Range)

     If Intersect(Target, Range("a7")) Is Nothing Then Exit Sub '
 Columns("a:g").Sort Key1:=Range("d1"), Order1:=xlAscending,
Header:=xlYes

 End Sub



si, es eso gracias
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida