Jump to content

SUBINDICE FUERA DEL INTERVALO


Recommended Posts

Hola @javiercito666110784

Debes revisar algunas líneas de tu código.  Por ejemplo, en tu archivo, es incorrecto:

Set Hoja = Worksheets("Hoja3").Range("TABLA2")

Y esto se debe a que debes diferenciar el nombre interno (codename) al nombre externo (name) de la hoja.

En la sintaxis arriba mencionada, estás usando el nombre externo de la hoja.  Es decir que debieses usar:

Set Hoja = Worksheets("REPORTE").Range("TABLA2")

O, si quieres usar el nombre interno de la hoja, puedes usar

Set Hoja = Hoja3.Range("TABLA2")

Allí se genera el error.

Ahora bien, en cuanto a la ordenación de las hojas, estás nombrando columnas que no existen en tu tabla, puesto que ella tiene solamente 5 columnas.  De igual manera, no necesitas en los Key nombrar la columna completa.  Basta con que nombres la celda donde se encuentra el título de lo que quieres ordenar. Puedes usar una sintaxis como la que te propongo como ejemplo:

Hoja.Sort KEY1:=Hoja.Range("A1"), ORDER1:=xlAscending, _
KEY2:=Hoja.Range("D1"), ORDER2:=xlAscending, _
KEY3:=Hoja.Range("E1"), ORDER3:=xlAscending, Header:=xlGuess

Esto también te estaba generando errores.

¡Comentas!

¡Espero haberte ayudado, Dios te bendiga!

Link to post
Share on other sites

Archived

This topic is now archived and is closed to further replies.

Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

Privacy Policy