Jak vymazat zadaný obsah buňky, pokud se hodnota jiné buňky změní v aplikaci Excel?
Předpokládejme, že chcete vymazat rozsah specifikovaného obsahu buňky, pokud se změní hodnota jiné buňky, jak to můžete udělat? Tento příspěvek vám ukáže způsob řešení tohoto problému.
Vymažte zadaný obsah buňky, pokud se hodnota jiné buňky změní s kódem VBA
Vymažte zadaný obsah buňky, pokud se hodnota jiné buňky změní s kódem VBA
Jak je ukázáno níže, snímek obrazovky, když se změní hodnota v buňce A2, obsah v buňce C1: C3 se automaticky vymaže. Postupujte prosím následovně.
1. V listu vymažete obsah buňky na základě jiných změn buňky, klikněte pravým tlačítkem na kartu listu a vyberte Zobrazit kód z kontextové nabídky. Viz snímek obrazovky:
2. V otvoru Microsoft Visual Basic pro aplikace zkopírujte a vložte pod kód VBA do okna Kód.
Kód VBA: Vymazání zadaného obsahu buňky, pokud se změní hodnota jiné buňky
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A2")) Is Nothing Then
Range("C1:C3").ClearContents
End If
End Sub
Poznámka: V kódu je B2 buňka, ze které vymažete obsah buňky, a C1: C3 je rozsah, ze kterého vymažete obsah. Změňte je prosím podle potřeby.
3. zmáčkni Další + Q klávesy pro zavření Microsoft Visual Basic pro aplikace okno.
Pak můžete vidět, že obsah v rozsahu C1: C3 se automaticky vymaže, když se hodnota v buňce A2 změní, jak je uvedeno níže.
Související články:
- Jak vymazat obsah rozbalovacího seznamu s kódem VBA v aplikaci Excel?
- Jak vymazat obsah a formátování současně v buňkách v aplikaci Excel?
- Jak vymazat obsah pojmenovaného rozsahu v aplikaci Excel?
- Jak vymazat omezené hodnoty v buňkách v aplikaci Excel?
- Jak vymazat zadaný obsah buňky při otevření a ukončení v sešitu aplikace Excel?
Nejlepší kancelářské nástroje produktivity
Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%
- Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
- Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
- Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
- Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
- Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
- Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
- Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
- Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
- Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2021 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Plné funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.

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!



































