Tu je postup, ako dať svojim tabuľkám abecedné poradie
Zoradiť údaje v zoznamoch podľa abecedy nie je žiadny problém. Ako to však zvládnete, keď chcete pracovné listy usporiadať podľa abecedy podľa ich názvov?
Nasledujúci obrázok ukazuje register listov so sériou pracovných listov. Mali by byť zoradené podľa abecedy, aby sa dali ľahšie nájsť.
3
S niekoľkými listami spoľahlivo zvládnete prácu ručne. Pri mnohých listoch to rýchlo začína byť náročné, časovo náročné a mätúce. Nasledujúce makro vám pomôže ďalej:
Podtrieda Blaetter ()
Dim Zaehler1 ako celé číslo, Zaehler2 ako celé číslo
Dim meno ako reťazec
Názov = ActiveSheet.Name
Pre Zaehler1 = 1 do pracovných listov. Počítať
For Zaehler2 = Zaehler1 To Worksheets.Count
Ak UCase (pracovné listy (Counter2) .Name) <UCase (pracovné listy (Counter1) .Name) Potom
Pracovné listy (Zaehler2). Presunúť pred: = Pracovné listy (Zaehler1)
Koniec Ak
Ďalej počítadlo 2, počítadlo 1
Pracovné listy (názov). Aktivovať
Koniec pod
Makro triedi pracovné hárky v aktívnom zošite podľa abecedy vzostupne. Nasledujúci obrázok ukazuje, ako vyzerá ukážkový zošit po spustení makra:
Tip: Ak by ste chceli vedieť, ako zadávať a spúšťať makrá v Exceli, nájdete tu stručný popis: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
