» Poradna » Programy

Kdo zvládne Excel - makro ???

 |   | 

Potřeboval bych jen poradit s makrem které vloží názvy všech listů do sloupce pod sebe. (MS Excel)

Díky Jakub


Odpovědi na otázku

 |   | 

Sub Nazvy_Listov()
    mojRiadok = ActiveCell.Row - 1
    mojStlpec = ActiveCell.Column
    For Each mojeNazvy In Worksheets
        Cells(mojRiadok + 1, mojStlpec) = mojeNazvy.Name
        mojRiadok = mojRiadok + 1
    Next
End Sub

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   | 

alebo takto
Sub Nazvy_Listov()
    mojRiadok = ActiveCell.Row 
    mojStlpec = ActiveCell.Column
    For Each mojeNazvy In Worksheets
        Cells(mojRiadok , mojStlpec) = mojeNazvy.Name
        mojRiadok = mojRiadok + 1
    Next
End Sub

Souhlasím  |  Nesouhlasím  |  Odpovědět

Související témata: Makro




Určitě si přečtěte

Solární panely v silnici vypadaly jako dobrý nápad. V praxi se ale neosvědčily

Solární panely v silnici vypadaly jako dobrý nápad. V praxi se ale neosvědčily

** Nápad použít na silnice místo asfaltu solární panely vypadal slibně ** Praktické testy však odhalily celou řadu nevýhod ** Nejhorší je směšná účinnost ve srovnání s fotovoltaickou elektrárnou

Karel Kilián | 62

Lenovo přivezlo na IFA 2018 skutečné inovace. Tyto tři notebooky stojí za to

Lenovo přivezlo na IFA 2018 skutečné inovace. Tyto tři notebooky stojí za to

** Yoga C930 nabídne revoluční reproduktor v kloubu displeje ** Yoga Book C930 představuje zdařilý reparát podivného Yoga Booku ** ThinkPad X1 Extreme se může pochlubit extrémní výbavou v tenkém těle

Tomáš Holčík | 16

Podívejte se, co se stane, když dron DJI Phantom narazí do křídla letadla

Podívejte se, co se stane, když dron DJI Phantom narazí do křídla letadla

** Co se může stát, když relativně maličký dron narazí do křídla letadla? ** Tuto otázku zodpověděli odborníci laboratorním pokusem ** Kvadrokoptéra způsobila významné poškození křídla

Karel Kilián | 18

Google Cloud Next: Blíží se bitva o to, kdo ovládne cloud, tedy internet zítřka

Google Cloud Next: Blíží se bitva o to, kdo ovládne cloud, tedy internet zítřka

** Google v týdnu ukázal nové telefony Pixel ** V Londýně se ale také konal Google Cloud Next ** Konference o tom, jak bude vypadat internet v cloudu zítra

Jakub Čížek | 31

Externí SSD se může hodit. Je rychlé, malé zvenku, velké uvnitř a cena už se snese

Externí SSD se může hodit. Je rychlé, malé zvenku, velké uvnitř a cena už se snese

** Vyzkoušeli jsme rychlé externí SSD Samsung T5 ** Externí SSD je lepší než flešky i velké plotnové disky, většímu rozšíření doposud bránila především cena ** Samsung T5 zvládne i chytré šifrování a připojení k mobilu

David Polesný | 27


Aktuální číslo časopisu Computer

Jak vytvořit a spravovat vlastní web

Velký test herních klávesnic a DVB-T2 tunerů

Vše o formátu RAW

Vybíráme nejlepší základní desku