El tutorial mostra com podeu ordenar ràpidament els fulls de treball d'Excel per ordre alfabètic mitjançant el codi VBA i l'eina Gestor de llibres de treball.

Microsoft Excel ofereix diverses maneres ràpides i senzilles d'organitzar-les. columnes o files per ordre alfabètic. Però només hi ha un mètode per reordenar els fulls de treball a Excel: arrossegueu-los a la posició desitjada a la barra de pestanyes del full. Quan es tracta d'alfabetitzar les pestanyes en un llibre de treball molt gran, aquesta pot ser una manera llarga i errònia. Esteu buscant una alternativa per estalviar temps? Només n'hi ha dos: codi VBA o eines de tercers.

Com ordenar alfabèticament les pestanyes a Excel amb VBA

A continuació trobareu tres exemples de codi VBA per ordenar Excel fulls ascendents, descendents i en qualsevol direcció en funció de l'elecció de l'usuari.

Ens indica que teniu alguna experiència amb VBA, només descriurem els passos bàsics per afegir una macro al vostre full de treball:

1. Al vostre llibre de treball d'Excel, premeu Alt + F11 per obrir l'Editor de Visual Basic.
2. Al panell esquerre, feu clic amb el botó dret a ThisWorkbook i, a continuació, feu clic a Insereix > Mòdul .
3. Enganxeu el codi VBA a la finestra Codi.
4. Premeu F5 per executar la macro.

Per les instruccions detallades pas a pas, consulteu Com inserir i executar codi VBA a Excel.

Consell. Si voleu conservar la macro per a un ús posterior, assegureu-vos de desar el fitxer com a llibre de treball amb macros d'Excel (.xlsm).

Com a alternativa, podeu baixar el nostre llibre de treball de pestanyes d'Excel Alfabetització de mostra, activar el contingut si se us demana i executar la macro desitjada directament des d'allà. El llibre de treball conté les macros següents:

• TabsAscending : ordena els fulls alfabèticament de la A a la Z.
• TabsDescending : ordena els fulls al ordre invers, de la Z a la A.
• AlphabetizeTabs : ordena les pestanyes del full en ambdues direccions, ascendent o descendent.

Amb el llibre de treball de mostra descarregat i obert a el vostre Excel, obriu el vostre propi llibre de treball on vulgueu classificar les pestanyes alfabèticament, premeu Alt + F8 , seleccioneu la macro desitjada i feu clic a Executar .

Ordeneu les pestanyes d'Excel alfabèticament de la A a la Z

Aquesta petita macro organitza els fulls del llibre de treball actual en ordre alfanumèric ascendent , primer els fulls de treball els noms dels quals comencen amb números i després els fulls de la A a la Z.

SubpestanyesAscending() For i = 1 A Application.Sheets.Count Per j = 1 A Application.Sheets.Count - 1 Si UCase$(Application.Sheets(j).Name) > UCase$(Application.Sheets(j + 1).Name) Després Sheets(j).Move after:=Fheets(j + 1) End If Next Next MsgBox "Les pestanyes s'han ordenat de la A a la Z." End Sub

Ordeneu les pestanyes d'Excel de la Z a la A

Si voleu ordenar els vostres fulls en ordre alfanumèric descendent (de la Z a la A i després els fulls amb noms numèrics), feu servir el botó codi següent:

Sub TabsDescending() For i = 1 ToApplication.Sheets.Count For j = 1 To Application.Sheets.Count - 1 Si UCase$(Application.Sheets(j).Name) < UCase$(Application.Sheets(j + 1).Name) Després Application.Sheets(j).Move after:=Application.Sheets(j + 1) End If Next Next MsgBox "Les pestanyes s'han ordenat de la Z a la A. " End Sub

Alfabetitzar les pestanyes ascendent o descendent

Aquesta macro permet als usuaris decidir com ordenar els fulls de treball en un llibre de treball determinat, alfabèticament de la A a la Z o en ordre invers.

Des que quadre de diàleg estàndard (MsgBox) a Excel VBA només permet triar entre un grapat de botons predefinits, crearem el nostre propi formulari (Formulari d'usuari) amb tres botons personalitzats: A a Z , Z a A i Cancel·la .

Per fer-ho, obriu l'Editor de Visual Basic, feu clic amb el botó dret a ThisWorkbook i feu clic a Insereix > Formulari d'usuari . Poseu un nom al vostre formulari OrdenaDes de i afegiu-hi 4 controls: una etiqueta i tres botons:

A continuació, premeu F7 (o feu doble clic al formulari). ) per obrir la finestra Codi i enganxar-hi el codi següent. El codi intercepta els clics dels botons i assigna una etiqueta única a cada botó:

Private Sub CommandButton1_Click() Me.Tag = 1 Me.Hide End Sub Private Sub CommandButton2_Click() Me.Tag = 2 Me.Hide End Sub Private Sub CommandButton3_Click () Me.Tag = 0 Me.Hide End Sub

En funció de si l'usuari fa clic al botó A a Z o Z a A del vostre formulari, ordena les pestanyes enordre alfabètic ascendent (seleccionat per defecte) o ordre alfabètic descendent; o tanqueu el formulari i no feu res en cas de Cancel·la . Això es fa amb el següent codi VBA, que inseriu de la manera habitual mitjançant Insereix > Mòdul .

Sub AlphabetizeTabs() Dim SortOrder As Integer SortOrder = showUserForm If SortOrder = 0 Aleshores Surt Sub Per a x = 1 A Application.Sheets.Count Per a y = 1 A Application.Sheets.Count - 1 Si SortOrder = 1 Aleshores Si UCase$(Application.Sheets(y).Name) > UCase$(Aplicació.Fulls(y + 1).Nom) Després Fulls(y).Mou després de:=Fulls(y + 1) Finalitzar If ElseIf SortOrder = 2 Then If UCase$(Aplicació.Fulls(y).Nom) < UCase$(Application.Sheets(y + 1).Name) Després Sheets(y).Move after:=Fulls (y + 1) End If End If Next Next End Sub Function showUserForm() Com a nombre enter showUserForm = 0 Carrega SortOrderForm SortOrderForm .Show (1) showUserForm = SortOrderForm.Tag Descarregueu SortOrderForm End Function

Si encara no us trobeu molt còmode amb VBA, simplement podeu descarregar el nostre exemple de llibre de treball a les pestanyes d'alfabetització, obrir-lo al vostre Excel juntament amb el vostre propi fitxer on vulgueu per ordenar les pestanyes i executeu la macro AlphabetizeTabs del vostre llibre de treball:

Trieu l'ordre d'ordenació preferit, per exemple, A a Z , i observa els resultats:

Consell. Amb VBA, també podeu crear còpies dels vostres fulls de treball Excel. El codi està disponible aquí: Com fer-hoduplicar el full a Excel amb VBA.

Com ordenar les pestanyes d'Excel alfabèticament amb Ultimate Suite

Els usuaris de la nostra Ultimate Suite per a Excel no han de jugar amb VBA: tenen un -Gestor de llibres de treball funcional a la seva disposició:

Amb aquesta eina afegida a la vostra cinta d'Excel, l'ordre alfabètic de les pestanyes es fa amb un sol clic de botó, exactament com hauria de ser!

Si teniu curiositat per explorar aquesta i més de 70 eines professionals més per a Excel, una versió de prova de la nostra Ultimate Suite està disponible per baixar-la aquí.

Gràcies. per llegir-te i esperem veure't al nostre blog la setmana vinent!