Jak použít tlačítko k vymazání konkrétních buněk v aplikaci Excel?
Normálně můžete držet Ctrl klávesu pro výběr více konkrétních buněk a poté podle potřeby vymažte obsah buněk. Pokud vždy potřebujete čas od času tyto konkrétní buňky vymazat, můžete vytvořit jasné tlačítko, které je vymaže jediným kliknutím. V tomto článku budu hovořit o tom, jak vytvořit tlačítko vymazat vše pro vymazání určitého obsahu buňky.
Použijte tlačítko k vymazání konkrétního obsahu buňky pomocí kódu VBA
Použijte tlačítko k vymazání konkrétního obsahu buňky pomocí kódu VBA
Nejprve byste měli vytvořit tlačítko tvaru a poté použít kód, nakonec svázat kód s tlačítkem tvaru. Postupujte prosím následovně:
1, klikněte Vložit > Tvary > Obdélníky vyberte tvar Obdélník a potom tažením myši nakreslete tlačítko obdélníku kdekoli na listu, jak potřebujete, viz screenshot:
2. Poté zadejte text a naformátujte tlačítko tvaru, jak potřebujete, viz screenshot:
3. A pak byste měli vložit kód VBA, podržte prosím ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno. Klikněte na tlačítko Vložit > Modula vložte následující kód do Modul Okno.
Kód VBA: Vymazání obsahu buněk ze specifických buněk:
Sub Clearcells()
'Updateby Extendoffice
Range("A2", "A5").Clear
Range("C10", "D18").Clear
Range("B8", "B12").Clear
End Sub
Poznámka: Ve výše uvedeném kódu: A2, A5 označte, že vymaže buňky v rozsahu A2: A5, nejen dvě buňky jednotlivě, můžete přidat více rozsahů, například Rozsah („B8“, „B12“). Jasný skript v kódu vymazat.
4. Poté uložte a zavřete okno s kódem a poté propojte kód s tlačítkem tvaru, klikněte pravým tlačítkem na tlačítko a vyberte Přiřadit makro, V roce Přiřadit makro dialogové okno vyberte Clearcells kódové jméno z Název makra seznamu a klikněte na OK tlačítko pro opuštění tohoto dialogu. Viz screenshot:
5. A teď, když kliknete na Vymazat vše tlačítko, konkrétní buňky, které jste definovali, jsou vymazány najednou, viz screenshot:
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!