The Funkce MsgBox v Excel VBA může vrátit výsledek, zatímco jednoduchý MsgBox nemůže.
Situace:
Umístěte na list příkazové tlačítko a přidejte následující řádky kódu:
1. Nejprve deklarujeme proměnnou s názvem odpověď typu Integer.
Dim odpověď jako celé číslo
2. Pomocí funkce MsgBox inicializujeme proměnnou odpověď se vstupem od uživatele.
Funkce MsgBox má při použití závorek tři argumenty. První část se používá pro zprávu v okně zprávy. V druhé části určete, která tlačítka a ikony se mají zobrazovat v okně zprávy. Třetí část se zobrazí v záhlaví okna se zprávou.
answer = MsgBox („Opravdu chcete list vyprázdnit?“, vbYesNo + vbQuestion, „Prázdný list“)
Poznámka: Umístěte kurzor na vbYesNo v editoru jazyka a kliknutím na F1 zobrazíte, která další tlačítka a ikony můžete použít. Místo konstant vbYesNo a vbQuestion můžete také použít odpovídající hodnoty 4 a 32.
3. Pokud uživatel klikne na tlačítko Ano, Excel VBA list vyprázdní. Pokud uživatel klikne na tlačítko Ne, nic se nestane. Chcete -li toho dosáhnout, přidejte následující řádky kódu.
If answer = vbYes Then
Buňky. Vymazat obsah
Jiný
'nedělat nic
Konec If
4. Klikněte na příkazové tlačítko na listu.
5. Klepněte na Ano.
Výsledek:
