Vba: come utilizzare "se non vuoto"
Puoi utilizzare Not IsEmpty in VBA per verificare se una cella non è vuota.
Ecco un esempio di come è possibile utilizzare questa sintassi in una macro:
Sub IfNotBlank()
Dim i As Integer
For i = 2 To 13
If Not IsEmpty(Range(" A " & i)) Then
Result = “ Cell is Not Empty ”
Else
Result = “ Cell is Empty ”
End If
Range(" B " & i) = Result
Next i
End Sub
Questo particolare esempio controlla se ogni cella nell’intervallo A2:A13 non è vuota, quindi stampa “La cella non è vuota” o “La cella è vuota” per ogni cella corrispondente nell’intervallo B2:B13 .
L’esempio seguente mostra come utilizzare questa sintassi nella pratica.
Esempio: come utilizzare “Se non vuoto” in VBA
Supponiamo di avere il seguente elenco di nomi di squadre di basket in Excel:
Supponiamo di voler verificare se ogni cella nell’intervallo A2:A13 non è vuota e quindi visualizzare i risultati nelle celle corrispondenti nell’intervallo B2:B8 .
Per fare ciò possiamo creare la seguente macro:
Sub IfNotBlank()
Dim i As Integer
For i = 2 To 13
If Not IsEmpty(Range(" A " & i)) Then
Result = “ Cell is Not Empty ”
Else
Result = “ Cell is Empty ”
End If
Range(" B " & i) = Result
Next i
End Sub
Quando eseguiamo questa macro, riceviamo il seguente output:
La colonna B ci dice se ciascuna delle celle corrispondenti nella colonna A è vuota o meno.
Puoi anche utilizzare la seguente macro per restituire semplicemente il nome della squadra stessa nella colonna B se il valore non è vuoto nella colonna A:
Sub IfNotBlank()
Dim i As Integer
For i = 2 To 13
If Not IsEmpty(Range(" A " & i)) Then
Result = Range(" A " & i).Value
Else
Result = " Empty "
End If
Range(" B " & i) = Result
Next i
End Sub
Quando eseguiamo questa macro, riceviamo il seguente output:
La colonna B ora restituisce il nome della squadra nella colonna A se la cella non è vuota.
Nota : qui è possibile trovare la documentazione completa per il metodo VBA IsEmpty .
Risorse addizionali
I seguenti tutorial spiegano come eseguire altre attività comuni in VBA:
VBA: come contare le occorrenze di caratteri in una stringa
VBA: come verificare se una stringa contiene un’altra stringa
VBA: una formula per “Se” la cella contiene”