Inizia con le basi del VBA: il costrutto IF THEN ELSE spiegato!

• AREA PREMIUM

• RICHIEDICI UN CORSO DI FORMAZIONE PER LA TUA AZIENDA

• CORSO VBA MASTERCLASS

CONTENUTI AREA PREMIUM

Attualmente l’AREA PREMIUM include i seguenti contenuti:

• 168 Tips and Tricks

• 91 Formule avanzate spiegate passo-passo

• 12 Templates pronti all’uso

• 651 Esempi di Codice VBA e macro su casi reali

• 34 Brevi Tutorial VBA

Ciao ExcelMinder,

stiamo pensando di organizzare dei corsi su Microsoft Excel fuori dall’orario lavorativo e la tua opinione è preziosa per noi. Ti chiediamo di dedicare pochi secondi per rispondere a questo sondaggio (due sole domande) e aiutarci ad organizzarli al meglio.

SE leggi questo tutorial ALLORA sarai un programmatore VBA migliore

Oggi approfondiremo le istruzioni condizionali in VBA. Dimostreremo come diversi controlli logici faranno sì che la tua macro segua percorsi diversi.

Istruzione IF THEN di base

Un'istruzione IF THEN esegue in modo condizionale un gruppo di azioni, a seconda del valore di un'espressione. Esaminiamo la sintassi della forma più elementare dell'istruzione IF THEN:

If [la condizione è vera] Then
    [fa qualcosa]
End If

Questa è la forma più semplice di istruzione IF THEN. È di vitale importanza che ti ricordi di inserire le parole chiave End If in fondo alla tua dichiarazione. Compileremo i campi [la condizione è vera] e [fa qualcosa] nel prossimo esempio.

Apri il tuo Visual Basic Editor e inserisci il seguente esempio:

Sub demo_IF_THEN() 

If Range("A1") = ""  Then 
    Range("B1") = "A1 è vuota" 
End If 

End Sub

Questa demo verifica se il valore nella cella A1 è vuoto o meno. In tal caso, nella cella B1 verranno visualizzate le parole "A1 è vuota". Sebbene questo esempio abbia solo una "azione" [fa qualcosa] quando la condizione è soddisfatta, puoi avere tutte le azioni [fa qualcosa] che desideri all'interno della tua istruzione IF. Non c'è limite al numero di azioni che puoi eseguire all'interno della tua istruzione IF.

L’istruzione IF THEN ELSE

Un'istruzione IF THEN ELSE controlla se una condizione è soddisfatta e dice alla tua macro cosa fare se la condizione non è soddisfatta. Ha una forma come questa:

If [la condizione è vera] Then
     [fa qualcosa]
Else
     [fa qualche altra cosa] 
End If

Fondamentalmente, se la condizione originale testata non è vera, verranno eseguite le azioni nella sezione [fa qualche altra cosa]. Modifichiamo il nostro esempio precedente per illustrare come viene evocata la porzione ELSE.

Sub demo_IF_THEN() 

If Range("A2") > 10  Then 
    Range("B2") = "A2 è più grande di 10" 
Else
    Range("B2") = "A2 non è più grande di 10" 
End If 

End Sub

Questo esempio esamina il valore nella cella A2. Se in quella cella viene inserito un numero maggiore di 10 (>), la cella B2 cambierà per avvisarti. Se non è maggiore di 10, la cella B2 ti dirà che il valore nella cella A2 non è maggiore di 10.

Gioca con numeri diversi nella cella A2 e osserva tu stesso la differenza. Cambia semplicemente il numero nella cella A2, quindi esegui la macro demo_IF_THEN premendo F5 dal tuo editor VBA.

CONTINUA »

L’istruzione IF THEN ELSEIF

Aggiungiamo un ulteriore livello di complessità alle nostre istruzioni IF: l'istruzione ELSEIF. Le istruzioni ELSEIF ti consentono di controllare una serie di condizioni all'interno dello stesso blocco generale "IF THEN". Appare così:

If [la condizione è vera] Then
     [fa qualcosa]
ElseIf [la condizione 2 è vera] Then
     [fa qualche altra cosa]
ElseIf [la condizione 3 è vera] Then
     [fa qualche altra cosa] 
End If

Puoi avere tutti gli ELSEIF che desideri (entro limiti ragionevoli, ovviamente), il che significa che puoi controllare una serie di condizioni diverse, in questo modo:

Sub demo_IF_THEN()

If Range("A2") > 10 Then
     Range("B2") = "A2 è più grande di 10"
ElseIf Range("A2") > 5 Then
     Range("B2") = "A2 è più grande di 5"
ElseIf IsEmpty(Range("A2")) Then
     Range("B2") = "A2 è vuota" 
End If

End Sub

Questo esempio controlla tre condizioni dall'alto verso il basso, ma scende nel ramo [fa qualcosa...] solo una volta. Seguirà il percorso corrispondente alla prima condizione che è vera.

Ad esempio, supponiamo che tu abbia un valore "12" nella cella A2. Il numero 12 è maggiore di 10 ed è maggiore di 5, quindi sembra che le prime due condizioni siano entrambe soddisfatte, giusto? Tuttavia, poiché VBA si ferma alla prima condizione vera, la macro non seguirà entrambi i percorsi.

Quando esegui la macro, prima controlla se il numero 12 è maggiore di 10. Lo è, quindi la macro scrive "A2 è maggiore di 10" e passa immediatamente alla riga End If in basso. Non controlla nemmeno se il valore è maggiore o meno di 5! Questo è un concetto molto importante da ricordare, ed è un concetto che molti programmatori di livello intermedio spesso dimenticano.

Se il valore nella cella A2 fosse maggiore di 5, ma minore o uguale a 10, la macro passerebbe al secondo ramo e riporterebbe "A2 è maggiore di 5". Poiché VBA controlla le condizioni in sequenza, non abbiamo nemmeno dovuto chiedergli di confermare che anche il valore fosse inferiore o uguale a 10! È un piccolo pratico risparmio di tempo.

Nota che la terza condizione controlla se la cella A2 è vuota. Il comando IsEmpty potrebbe essere nuovo per te. È una delle tante funzioni integrate di cui VBA dispone per semplificarti la vita.

L’istruzione IF THEN ELSEIF ELSE

Possiamo mettere insieme tutto questo unendo le competenze che abbiamo imparato finora. Sì, puoi anche includere un'istruzione ELSE quando usi le istruzioni ELSEIF, ma l'istruzione ELSE deve seguire le istruzioni ELSEIF. Ecco la sintassi:

If [la condizione è vera] Then
     [fa qualcosa] 
ElseIf [la condizione 2 è vera] Then
     [fa qualche altra cosa] 
ElseIf [la condizione 3 è vera] Then
     [fa qualche altra cosa]
Else
     [fa qualche altra cosa] 
End If

Aggiungi un'istruzione ELSE al nostro esempio precedente e inserisci un "3" nella cella A2.

Sub demo_IF_THEN()

If Range("A2") > 10 Then
     Range("B2") = "A2 è più grande di 10"
ElseIf Range("A2") > 5 Then
     Range("B2") = "A2 è più grande di 5"
ElseIf IsEmpty(Range("A2")) Then
     Range("B2") = "A2 è vuota" 
Else
     Range("B2") = "A2 è <=5 e non è vuota"
End If

End Sub

Esegui la macro con un 3 nella cella A2 e la stringa nell'istruzione ELSE verrà visualizzata nella cella B2. Le "azioni" ELSE vengono eseguite solo se nessuna delle altre condizioni è soddisfatta. In altre parole, se nient'altro è vero, deve esserlo la condizione ELSE.

A proposito, se provi accidentalmente a mettere l'istruzione ELSE prima di un'istruzione ELSEIF, otterrai un piccolo errore carino, come questo:

Utilizzo spesso le istruzioni IF THEN nei miei tutorial VBA.

Durante l'ultima lezione, abbiamo parlato dei cicli For e di come utilizzarli per scorrere una serie di elementi in modo super veloce. La combinazione delle istruzioni IF THEN e dei cicli For è davvero una combinazione potente.

Quando inizi a combinare diverse competenze VBA, come i cicli For e le istruzioni IF THEN, sarai davvero in grado di creare macro eccezionali. Nella prossima lezione inizieremo a imparare come utilizzare gli array nelle macro. Resta con noi e faremo in modo che tu migliori in VBA, un passo alla volta! E ricorda, se sei interessato, abbiamo il nostro corso Excel VBA Masterclass che ti permetterà di conoscere tutte le potenzialità di questo strumento.

Arrivederci a presto!

Simone (aka Somebooks)
Excel Academy