Il Funzione MsgBox in Excel VBA può restituire un risultato mentre un semplice MsgBox non può.
Situazione:
Posiziona un pulsante di comando sul foglio di lavoro e aggiungi le seguenti righe di codice:
1. Innanzitutto, dichiariamo una variabile chiamata risposta di tipo Integer.
Dim risposta come numero intero
2. Usiamo la funzione MsgBox per inizializzare la risposta variabile con l'input dell'utente.
La funzione MsgBox, quando si utilizzano le parentesi, ha tre argomenti. La prima parte viene utilizzata per il messaggio nella finestra dei messaggi. Utilizzare la seconda parte per specificare quali pulsanti e icone si desidera visualizzare nella finestra del messaggio. La terza parte viene visualizzata nella barra del titolo della finestra di messaggio.
answer = MsgBox("Sei sicuro di voler svuotare il foglio?", vbYesNo + vbQuestion, "Svuota foglio")
Nota: posiziona il cursore su vbYesNo nell'editor di Visual Basic e fai clic su F1 per vedere quali altri pulsanti e icone puoi utilizzare. Invece delle costanti vbYesNo e vbQuestion, puoi anche utilizzare i valori corrispondenti 4 e 32.
3. Se l'utente fa clic sul pulsante Sì, Excel VBA svuota il foglio. Se l'utente fa clic sul pulsante No, non accade nulla. Aggiungi le seguenti righe di codice per ottenere ciò.
Se risposta = vbSì Allora
Cells.ClearContents
Altro
'fare niente
Finisci se
4. Fare clic sul pulsante di comando sul foglio.
5. Fare clic su Sì.
Risultato:
