Come evitare voci vuote o mancanti nelle celle in Excel?
Supponendo che tu stia creando una tabella nell'intervallo A1: B10 di un foglio di lavoro e devi impedire la visualizzazione di celle vuote in questo intervallo di tabelle, come ottenerlo? Questo articolo introduce un metodo per visualizzare automaticamente la finestra di richiesta se una voce vuota appare in un determinato intervallo di tabella durante la modifica. Si prega di seguire il metodo passo dopo passo nell'articolo.
Impedisci le voci vuote o mancanti nelle celle utilizzando il codice VBA
Impedisci le voci vuote o mancanti nelle celle utilizzando il codice VBA
A1: B10 è l'intervallo in cui è necessario creare una tabella all'interno e A1, B1 contengono le intestazioni della tabella come mostrato nell'immagine sottostante. Eseguire le seguenti operazioni per evitare che voci vuote o mancanti appaiano nell'intervallo A2: B10 durante la creazione della tabella.
1. Nel foglio di lavoro in cui non saranno consentite voci vuote in un determinato intervallo, fare clic con il pulsante destro del mouse sulla scheda del foglio, quindi fare clic su Visualizza codice dal menu di scelta rapida.
2. Nel Microsoft Visual Basic, Applications Edition finestra, copia e incolla il codice VBA sottostante nella finestra del codice. Vedi screenshot:
Codice VBA: impedisce voci vuote o mancanti in un intervallo di celle
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count <> 1 Then Exit Sub
Dim isect As Range
On Error Resume Next
Set isect = Application.Intersect(Target, Range("A2:B10"))
If Not (isect Is Nothing) Then
If Target.Column = 1 Then
If Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0 Then
MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
Target.ClearContents
End If
Else
If (Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0) Or (Len(Target.Value) > 0 And Len(Target.Offset(0, -1).Value) = 0) Then
MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
Target.ClearContents
End If
End If
End If
End Sub
Note:: Nel codice VBA, A2: B10 è l'intervallo di celle in cui non vuoi lasciare celle vuote all'interno. Si prega di modificare l'intervallo di cui hai bisogno.
D'ora in poi, quando salti una cella vuota e inserisci direttamente la cella successiva nell'intervallo specificato, otterrai un file Kutools for Excel finestra di dialogo come mostrato nell'immagine sottostante.
Articoli correlati:
- Come impedire l'immissione di dati in celle specifiche di un foglio di lavoro in Excel?
- Come impedire la selezione di più fogli di lavoro in Excel?
- Come impedire che un determinato foglio di lavoro venga eliminato in Excel?
- Come impedire l'eliminazione di contenuti di celle specifici in Excel?
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!