Jak zajistit, aby byla konkrétní buňka povinně zadána před uzavřením sešitu?
Když například sdílíte sešit jiným uživatelům za provedení průzkumu, který vyžaduje registraci skutečného jména, musí každý vyšetřovaný uživatel zadat své jméno v B1. Ale v některých případech mohou někteří uživatelé po prošetření sešit zavřít, aniž by zadali své jméno. V tomto článku představuji VBA, aby byla určitá buňka povinná před uzavřením sešitu.
Zajistěte, aby byla buňka povinným vstupem pomocí VBA
Zajistěte, aby byla buňka povinným vstupem pomocí VBA
1. Povolte sešit, který obsahuje povinnou buňku, a stiskněte Alt + F11 klíče k otevření Microsoft Visual Basic pro aplikace okno.
2. V Projekt v podokně poklepejte Tato pracovní knihaa přejděte na výběr Cvičebnice a PředZavřít ze seznamu v pravé části a poté vložte pod kód do skriptu. Viz screenshot:
VBA: Uveďte buňku jako povinnou
If Cells(1, 2).Value = "" Then
MsgBox "Cell B1 requires user input", vbInformation, "Kutools for Excel"
Cancel = True
End If
3. Poté tento kód uložte a zavřete toto vyskakovací okno. Nyní, pokud je buňka B1 prázdná, když zavřete sešit, vyskočí následující dialogové okno, které vám připomene, abyste něco zadali do B1. Viz screenshot:
Tip: Můžete změnit buňku B1 na jiné požadované buňky.
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!