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ší 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!