etechblog

Vložit vlastní počet řádků v aplikaci Excel pomocí tohoto jednoduchého makra

Aplikace MS Office jsou navrženy velmi inteligentně a neříkám to jen proto, že mi neskonale usnadňují práci. Říkám to, protože je to pravda. Před několika dny jsme napsali příspěvek o vkládání videí z YouTube do Office 2013 a poznamenali jsme, že tato možnost v MS Excel chybí jednoduše proto, že tam není potřeba. To je typ inteligence, o kterém mluvím; vědět, které funkce jsou potřebné v konkrétním typu aplikace. Zajistí, aby se do konečné nabídky nedostalo nic nepodstatného. To znamená, že jsem byl překvapen, když jsem zjistil, že tam, kde Excel umožňuje vložit více řádků do listu, neumožňuje vybrat počet řádků, které chcete přidat. Chcete-li toho dosáhnout, máte další možnosti, jako je výběr počtu řádků, které chcete přidat, ze stávajících a poté použití funkce vložení. Nebo můžete opakovat krok vložení řádku pro tolik řádků, kolik chcete. Opakuje se to, ale pokud jste ochotni věnovat pět minut, toto malé makro se o to postará za vás.

  5 testovacích nástrojů webové kamery pro kontrolu fotoaparátu

Protože to vyžaduje makro, budete muset soubor uložit jako soubor aplikace Excel s povoleným makrem. Chcete-li tak učinit, klikněte na rozevírací seznam „Uložit jako typ“ v okně Uložit jako a vyberte „Sešit Excel Marco Enabled (*xlsm).

Dále je čas napsat makro. Přejděte na kartu Zobrazit a kliknutím na Makra vytvořte nové. Pojmenujte jej, jak chcete, a klikněte na „Vytvořit“. Automaticky se otevře následující okno.

Zde jsou důležité řádky ‚Sub ‚ a ‚End Sub‘. Řádek Sub bude obsahovat název vašeho makra, zatímco End Sub označuje konec příkazů v tomto makru. Protože jste jej právě vytvořili, mezi těmito řádky by nemělo být nic jako na obrázku výše. Mezi tyto dva řádky vložte následující.

Dim CurrentSheet As Object

    ' Loop through all selected sheets.
    For Each CurrentSheet In ActiveWindow.SelectedSheets
        ' Insert 5 rows at top of each sheet.
        CurrentSheet.Range("a1:a5").EntireRow.Insert
    Next CurrentSheet

Tento kód vloží pět řádků úplně shora. V kódu se na něj odkazuje jako na A1:A5. Chcete-li jej upravit tak, aby vyhovoval vašim potřebám, musíte upravit tento rozsah. První hodnota slouží jako odkaz na místo, kam budou řádky vloženy. Pokud jej změníte na A100, budou řádky vloženy za prvních devadesát devět řádků. Po nastavení referenčního bodu je třeba zadat počet řádků.

  Jak sdílet svůj ciferník Apple Watch

Čísla řádků jsou definována rozsahem buněk A1:A5. Tento rozsah vloží 5 řádků. Chcete-li najít správný rozsah pro váš počet řádků, například byste chtěli vložit 25 řádků z A99, přidáte 25 k referenčnímu bodu, takže to bude A99 a mínus jedna buňka z něj. Tj. A100 + 99 – 1 = A198. Přidáváte řádky, nikoli sloupce, takže se změní pouze číslo, nikoli písmeno sloupce. Makro je třeba aktualizovat pokaždé, když musíte vložit řádky enmass, ale je to jen malá úprava a funguje to opravdu dobře, takže stojí za to strávený čas.

Makro prostřednictvím podpory společnosti Microsoft

  Dělá procházení webu anonymní režim soukromý nebo anonymní?
x