{"id":16576,"date":"2021-08-27T02:02:13","date_gmt":"2021-08-27T07:02:13","guid":{"rendered":"https:\/\/www.perucontable.com\/excelcontable\/?p=16576"},"modified":"2023-11-14T19:42:30","modified_gmt":"2023-11-15T00:42:30","slug":"macro-para-ordenar-hojas-de-excel-alfabeticamente","status":"publish","type":"post","link":"https:\/\/www.perucontable.com\/excelcontable\/macro-para-ordenar-hojas-de-excel-alfabeticamente\/","title":{"rendered":"MACRO PARA ORDENAR HOJAS DE EXCEL ALFAB\u00c9TICAMENTE"},"content":{"rendered":"
\n
\"\"<\/figure><\/div>\n\n\n

Excel no es s\u00f3lo una herramienta para llevar los datos y la contabilidad de las empresas. Su potencia reside en que sirve para clasificar y administrar casi cualquier cosa de manera sencilla y r\u00e1pida. Podemos crear agendas, cuadrantes de trabajo, libretas de direcciones, plantillas de factura, registros de asistencia. Sin embargo, Excel no permite organizar las hojas de los libros de trabajo, algo muy \u00fatil cuando trabajamos con libros extensos. <\/p>\n\n\n\n

Las hojas de un libro de Excel nos permiten gestionar adecuadamente nuestros datos, pero si llegamos a tener una cantidad considerable de hojas se dificultar\u00e1 el encontrar algunas de ellas. La soluci\u00f3n ser\u00eda ordenar las hojas de Excel alfab\u00e9ticamente de manera que se nos facilite su b\u00fasqueda con una macro en c\u00f3digo Visual Basic.<\/p>\n\n\n\n

Para este ejemplo utilizar\u00e9 un libro de Excel que contiene 183 hojas que han sido insertadas de manera aleatoria, cada una con el nombre de un pa\u00eds, pero con tantas hojas en el libro se ha convertido en un dolor de cabeza el encontrar la hoja correspondiente a cualquier pa\u00eds, as\u00ed que he tomado la decisi\u00f3n de ordenarlas alfab\u00e9ticamente.<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

Por supuesto que tendr\u00edamos la opci\u00f3n de ordenar hoja por hoja de manera manual, pero eso nos llevar\u00eda un tiempo considerable por lo que en esta ocasi\u00f3n crearemos una macro para ordenar hojas en Excel<\/strong> y automatizar por completo este proceso.<\/p>\n\n\n\n

MACRO PARA ORDENAR HOJAS DE EXCEL ALFAB\u00c9TICAMENTE<\/strong><\/h2>\n\n\n\n

La macro es muy sencilla ya que haremos un recorrido de todas las hojas del libro utilizando dos bucles For-Next. El primer bucle nos servir\u00e1 para tomar hoja por hoja y el segundo bucle para comparar cada una de ellas con el resto de las hojas del libro. Si al hacer la comparaci\u00f3n descubrimos que alguna hoja debe ir detr\u00e1s de la otra haremos el movimiento correspondiente. Para crear esta macro abrir\u00e9 el Editor de Visual Basic y crear\u00e9 un nuevo m\u00f3dulo (Insertar > M\u00f3dulo) donde colocar\u00e9 el siguiente c\u00f3digo VBA:<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

Observa con detenimiento que este c\u00f3digo hace la comparaci\u00f3n de dos hojas a la vez con la siguiente l\u00ednea de c\u00f3digo:<\/p>\n\n\n\n

If UCase(Sheets(a).Name) > UCase(Sheets(s).Name) Then<\/strong><\/code><\/p>\n\n\n\n

Nuestro c\u00f3digo utiliza dos variables para recorrer todas las hojas. La variable \u00aba\u00bb indica la hoja actual y la variable \u00abs\u00bb ser\u00e1 la hoja siguiente a la hoja actual. La funci\u00f3n Ucase<\/em> convierte en may\u00fasculas el nombre de ambas hojas para poder compararlas correctamente y utilizamos el operador mayor que<\/em> (>) para saber si la hoja actual es mayor que la hoja siguiente.<\/p>\n\n\n\n

En programaci\u00f3n, una cadena de texto ser\u00e1 mayor que la otra si sus letras iniciales aparecen despu\u00e9s en el alfabeto.  Lo que evaluamos con nuestra instrucci\u00f3n es si el nombre de la hoja actual aparece despu\u00e9s (en el alfabeto<\/em>) que el nombre de la hoja siguiente. Si dicha condici\u00f3n se cumple, entonces ser\u00e1 necesario moverlas de posici\u00f3n para comenzar a ordenar alfab\u00e9ticamente. Eso es precisamente lo que hacemos con la siguiente l\u00ednea de nuestro c\u00f3digo:<\/p>\n\n\n\n

Sheets(s).Move Before:=Sheets(a)<\/strong><\/p>\n\n\n\n

ORDENAR HOJAS DE EXCEL DE MANERA DESCENDENTE<\/strong><\/h2>\n\n\n\n

Antes de probar nuestra macro, crearemos una variante que nos permitir\u00e1 ordenar las hojas de Excel de manera descendente<\/strong>. Los cambios ser\u00e1n m\u00ednimos y los puedes ver en el siguiente c\u00f3digo:<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

Puedes notar que existen solamente dos peque\u00f1os cambios, el primero de ellos es evidente ya que he cambiado el nombre de la subrutina para indicar que se trata de un orden descendente. El segundo cambio es el uso del operador menor que<\/em> (<) en la comparaci\u00f3n de los nombres de las hojas. Esta simple modificaci\u00f3n nos permitir\u00e1 cambiar la direcci\u00f3n de ordenaci\u00f3n de las hojas para comenzar en la letra Z y terminar en la letra A.<\/p>\n\n\n\n

ORDENAR HOJAS DE EXCEL CON UNA MACRO<\/strong><\/h2>\n\n\n\n

Una vez creadas ambas subrutinas probaremos el funcionamiento de cada una de ellas. Para hacerlo puedes hacer clic en la ficha Vista > Macros para mostrar el cuadro de di\u00e1logo Macro<\/em> el cual enlistar\u00e1 el nombre de las macros reci\u00e9n creadas.<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

Este cuadro de di\u00e1logo tambi\u00e9n lo puedes abrir desde la ficha Programador > C\u00f3digo > Macros. Una vez abierto el cuadro de di\u00e1logo deber\u00e1s elegir la macro deseada y pulsar el bot\u00f3n Ejecutar<\/em>. Si elegimos la subrutina OrdenarHojas_Ascendente<\/em>, el resultado ser\u00e1 el siguiente:<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

Si por el contrario, elegimos la macro llamada OrdenarHojas_Descendente<\/em>, las hojas del libro se comenzar\u00e1n a ordenar a partir de la letra Z y en orden descendente tal como lo puedes observar en la siguiente imagen:<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

De esta manera podemos ordenar hojas de Excel<\/strong> ya sea de manera ascendente o descendente con tan solo ejecutar una macro y as\u00ed podremos encontrar r\u00e1pidamente la hoja que necesitemos. Notamos que las \u00fanicas dos diferencias entre ambas instrucciones son el nombre de referencia en la primer l\u00ednea de c\u00f3digo y el signo \u00abmayor que\u00bb y \u00abmenor que\u00bb en la cuarta l\u00ednea del c\u00f3digo.<\/p>\n\n\n\n

Esta macro es muy \u00fatil si disponemos de muchas hojas y necesitamos ordenarlas de forma r\u00e1pida y pr\u00e1ctica, que de otra forma demorar\u00eda mucho tiempo en realizar.<\/p>\n\n\n\n

Art\u00edculo que te recomendamos leer:<\/strong>
FUNCI\u00d3N CONTAR.SI CUANDO EXISTEN MAY\u00daSCULAS<\/a><\/strong><\/p>\n\n\n\n

\u00bfQu\u00e9 te pareci\u00f3 nuestra blog? Com\u00e9ntanos.<\/strong><\/p>\n","protected":false},"excerpt":{"rendered":"

Excel no es s\u00f3lo una herramienta para llevar los datos y la contabilidad de las empresas. Su potencia reside en que sirve para clasificar y administrar casi cualquier cosa de manera sencilla y r\u00e1pida. Podemos crear agendas, cuadrantes de trabajo, libretas de direcciones, plantillas de factura, registros de asistencia. Sin embargo, Excel no permite organizar las […]<\/p>\n","protected":false},"author":2,"featured_media":16592,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[108,67,25],"tags":[],"yst_prominent_words":[301,133,161,331],"_links":{"self":[{"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/posts\/16576"}],"collection":[{"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/comments?post=16576"}],"version-history":[{"count":5,"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/posts\/16576\/revisions"}],"predecessor-version":[{"id":16809,"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/posts\/16576\/revisions\/16809"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/media\/16592"}],"wp:attachment":[{"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/media?parent=16576"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/categories?post=16576"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/tags?post=16576"},{"taxonomy":"yst_prominent_words","embeddable":true,"href":"https:\/\/www.perucontable.com\/excelcontable\/wp-json\/wp\/v2\/yst_prominent_words?post=16576"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}