Evo kako tablicama postaviti abecedni red
Sortiranje podataka po abecednom redu na popisima nije problem. Ali kako ćete to učiniti ako želite rasporediti radne listove po abecednom redu prema njihovim nazivima?
Sljedeća ilustracija prikazuje registar listova s nizom radnih listova. Treba ih sortirati po abecedi kako bi ih bilo lakše pronaći.
3
S nekoliko listova možete pouzdano obaviti posao ručno. S mnogim listovima to brzo postaje teško, oduzima vrijeme i zbunjuje. Sljedeći makro će vam dodatno pomoći:
PodrazvrstajBlaetter ()
Dim Zaehler1 kao cijeli broj, Zaehler2 kao cijeli broj
Zatamni naziv kao niz
Naziv = ActiveSheet.Name
Za Zaehler1 = 1 Za radne listove.Broj
Za Zaehler2 = Zaehler1 na radne listove.Broj
Ako je UCase (radni listovi (brojač2). Naziv) <UCase (radni listovi (brojač1). Naziv) tada
Radni listovi (Zaehler2). Premjesti prije: = Radni listovi (Zaehler1)
Završi ako
Sljedeći brojač2, brojač1
Radni listovi (naziv) .Aktivirajte
Kraj podm
Makronaredba razvrstava radne listove u aktivnoj radnoj knjizi po abecednom uzlaznom redoslijedu. Sljedeća slika prikazuje kako ogledna radna knjiga izgleda nakon što pokrenete makro:
Savjet: Ako želite znati kako unijeti i pokrenuti makroe u Excelu, ovdje ćete pronaći kratak opis: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
