Odstranění řádku VBA je standardní a běžně používaný postup vývojářů. Méně zkušeným uživatelům však tato operace může způsobit určité potíže.
Instrukce
Krok 1
Ujistěte se, že rozumíte syntaxi příkazu delete line pomocí příkazu Delete. Takže pro řádek obsahující aktivní buňku bude příkaz vypadat jako ActiveCell. EntireRow. Delete a potřeba odstranit několik řádků jej změní na Řádky ("first_line_number: last_line_number"). Odstranit (pro Excel).
Krok 2
Podobnou syntaxi použijte pro příkaz smazání vybraného řádku ve VBA, ale s pokročilými možnostmi. Nejprve definujte požadovanou akci: Soukromá Sub Odstranit line_Click (). Určete požadovanou aplikaci Dim ea As Excel. Application a vyberte požadovaný sešit Dim ewb As Excel. Workbook. Poté určete stránku dokumentu Dim ews As Excel. Worksheet, který chcete upravit.
Krok 3
Přeskočte jeden řádek a zadejte Set XLAp = CreateObject (Class: = "Excel. Application"). Nastavte přesné umístění na následujícím řádku: Set XLWb = XLAp. Workbooks. Otevřít ("název_jednotky: 1.xls") Použijte následující hodnotu: Nastavte XLWs = XLWb. ActiveSheet.
Krok 4
Přeskočte další řádek a zadejte hodnotu vybrané úlohy: XLWs. Rows (1). Odstranit. Uložte upravený dokument: XLWb. Uložit. Ukončete aplikaci s otevřeným zdrojovým kódem: XLAp. Quit.
Krok 5
Přeskočte další řádek a nahraďte proměnné objekty paměti: Nastavit XLWs = nic. Opakujte stejný příkaz pro každou otevřenou proměnnou: Nastavit XLWb = nic a nakonec poslední: Nastavit XLAp = nic. Dokončete příkaz standardním End Sub.
Krok 6
Pomocí maker můžete provádět složitější operace k odstranění nepotřebných řádků v dokumentu. Chcete-li to provést, vytvořte nový sešit aplikace Excel a zadejte požadované hodnoty. Otevřete nabídku „Služba“na horním panelu nástrojů v okně programu a vyberte položku „Makro“. Vyberte podpoložku "Editor jazyka" a rozbalte nabídku "Vložit". Vyberte položku „Modul“a vložte vytvořený dokument. Vraťte se do nabídky „Nástroje“a znovu přejděte na položku „Makro“. Použijte podpoložku „Makra“a určete nově vytvořenou. Spusťte makro kliknutím na tlačítko Spustit.
