Come verificare se una cella o un intervallo di più celle è vuoto con Excel VBA?

Come verificare se una cella o un intervallo di più celle è vuoto con Excel VBA?

Oggi impareremo come controllare facilmente se una o più celle sono vuote utilizzando Visual Basic, Applications Edition. Il contenuto è rilevante per Excel 2019/365, 2016 e versioni precedenti di Microsoft Office.

Lavoro di preparazione

Prima di iniziare a scrivere codice con VBA in Excel, devi assicurarti che la tua scheda di sviluppo sia abilitata. In caso contrario, dai un'occhiata a questo breve tutorial .

Verifica se l'intervallo di celle di Excel è vuoto con VBA

  • In Excel, apri il tuo ambiente Visual Basic premendo Alt+F11
  • Inserisci il codice seguente come procedura nel tuo foglio di lavoro o in alternativa in un modulo VBA dedicato.
Sub Check_Cell_is_empty_alt()

Dim rng As Range
Set rng = Selection

For Each Cell In rng

    If IsEmpty(Cell.Value) = True Then
        
    Debug.Print ("Empty")
    Else
        Debug.Print ("Not Empty")
    End If
Next Cell


End Sub


  • Vai al tuo foglio di calcolo e seleziona un intervallo arbitrario di celle.
  • Torna all'editor di Visual Basic e assicurati che il visualizzatore immediato (CTRL+G) sia visibile, poiché il metodo Debug.Print nel codice visualizzerà il risultato in quella finestra.
  • Premi F5 per eseguire il tuo codice.
  • Guarda i risultati nella finestra immediata.

Come verificare se una cella o un intervallo di più celle è vuoto con Excel VBA?

  • Tutte le celle vuote verranno identificate.

Possibili estensioni al codice: puoi ovviamente estendere questo codice secondo necessità nel caso in cui sei interessato a saltare valori vuoti o semplicemente non fare nulla nel caso in cui le celle non siano piene. Allo stesso modo, puoi verificare se l'intervallo stesso è vuoto, ovvero non sono contenute celle nere.

Controllo dei campi non vuoti

Allo stesso modo è possibile utilizzare la proprietà IsEmpty per verificare la presenza di campi non vuoti.

 If Not IsEmpty(Cell.Value) = True Then
        Debug.Print ("Not Empty")
    Else
        Debug.Print ("Empty")
    End If

Bonus: utilizza il seguente codice se desideri evidenziare anche le celle vuote.

Dim i As Long Dim c As Long Dim myRange As Range Dim myCell As Range Imposta myRange = Range("A1:A10") For Each myCell in myRange ' c = c + 1 If IsEmpty(myCell) Then myCell.Interior.Color = RGB(255, 87, 87) i = i + 1 End If Next myCell MsgBox _ "Ci sono in totale" & io e "" celle vuote in " & c& "."


Zenzero 2.7.53.0

Zenzero 2.7.53.0

Ginger è un correttore ortografico e grammaticale gratuito.

Blocchi

Blocchi

Blocks è un gioco intellettuale rivolto agli studenti delle scuole elementari di terza elementare per esercitare le proprie capacità di rilevamento e vista ed è incluso dagli insegnanti nel programma di supporto all'insegnamento informatico.

Prezio 6.26

Prezio 6.26

Prezi è un'applicazione gratuita che ti consente di creare presentazioni digitali, sia online che offline.

Mathway

Mathway

Mathway è un'app molto utile che può aiutarti a risolvere tutti quei problemi di matematica che richiedono uno strumento più complesso della calcolatrice integrata nel tuo dispositivo.

Presentatore Adobe

Presentatore Adobe

Adobe Presenter è un software di e-Learning rilasciato da Adobe Systems disponibile sulla piattaforma Microsoft Windows come plug-in di Microsoft PowerPoint.

Tucano 2.3.0

Tucano 2.3.0

Toucan è una piattaforma tecnologica educativa. Ti consente di imparare una nuova lingua mentre navighi su siti Web comuni di tutti i giorni.

ENetViet 24.2

ENetViet 24.2

eNetViet è un'applicazione che aiuta a connettere i genitori con la scuola in cui studiano i loro figli in modo che possano comprendere chiaramente l'attuale situazione di apprendimento dei loro figli.

Duolingo

Duolingo

Duolingo - Impara le lingue gratis, o semplicemente Duolingo, è un programma educativo che ti permette di imparare e praticare molte lingue diverse.

Digitazione rapida

Digitazione rapida

RapidTyping è uno strumento di allenamento per la tastiera comodo e facile da usare che ti aiuterà a migliorare la velocità di digitazione e a ridurre gli errori di ortografia. Con lezioni organizzate per molti livelli diversi, RapidTyping ti insegnerà come digitare o migliorare le competenze esistenti.

MathType 7.4.10.53

MathType 7.4.10.53

MathType è un software di equazioni interattive dello sviluppatore Design Science (Dessci), che consente di creare e annotare notazioni matematiche per l'elaborazione di testi, presentazioni, eLearning, ecc. Questo editor viene utilizzato anche per creare documenti TeX, LaTeX e MathML.