Skip to main content

Come impedire il salvataggio se una cella specifica è vuota in Excel?

Author: Kelly Last Modified: 2025-05-29

Immagina di aver creato un modulo in Excel e di averlo condiviso con i tuoi colleghi. Vuoi che inseriscano i loro nomi in una cella specifica per identificare chi ha inserito le informazioni. Se la cella viene lasciata vuota, desideri impedire il salvataggio del modulo. In questo tutorial, ti mostrerò come utilizzare una macro VBA per bloccare il processo di salvataggio se la cella designata è vuota in Excel.


arrow blue right bubbleImpedisci il salvataggio se una cella specifica è vuota in Excel

Per impedire il salvataggio della cartella di lavoro corrente se una cella specifica è vuota in Excel, puoi facilmente applicare la seguente macro VBA.

Passo 1: Apri la finestra Microsoft Visual Basic for Applications premendo contemporaneamente i tasti Alt + F11.

Passo 2: Nel Project Explorer, espandi VBAProject (NomeDellaTuaCartellaDiLavoro.xlsm) e Microsoft Excel Objects, quindi fai doppio clic su ThisWorkbook. Vedi screenshot:

A screenshot of the ThisWorkbook window in the VBA editor

Passo 3: Nella finestra ThisWorkbook che si apre, incolla la seguente macro VBA:

Macro VBA: Impedisci il salvataggio se una cella specifica è vuota

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Update by ExtendOffice 20220907
Dim xFileName As String
Dim xStr As String
Dim xStrWSH As String
Dim xWSh As Worksheet
Dim xWShs As Sheets
Dim xWSh1 As Worksheet
Dim xWB As Workbook

xStrWSH = "xHidWSH_LJY"
On Error Resume Next
Set xWB = Application.ActiveWorkbook
Set xWShs = xWB.Worksheets
Set xWSh = xWShs.Item(xStrWSH)

If xWSh Is Nothing Then

  Set xWSh1 = xWShs.Add
  xWSh1.Name = xStrWSH
  xWSh1.Visible = xlSheetVeryHidden
  Cancel = False

Else

  If Trim(Application.Sheets("Sheet1").Range("A1").Value) = "" Then
  Cancel = True
  MsgBox "Save cancelled"
  End If

End If

End Sub
Nota:
1. Nella riga 26 del codice VBA sopra, "Sheet1" è il nome del foglio di lavoro specifico, e "A1" è la cella specifica, e puoi modificarli secondo necessità.
2. Dopo aver inserito il VBA in ThisWorkbook, dovresti prima salvare la cartella di lavoro. Dopodiché, puoi inviare il file abilitato per le macro ad altri.

Ora, se la cella specifica è vuota nella cartella di lavoro corrente, quando provi a salvarla, apparirà una finestra di avviso che ti dirà "Salvataggio annullato". Vedi lo screenshot seguente:

A screenshot of a warning dialog in Excel saying 'Save cancelled' when attempting to save with a blank cell


arrow blue right bubbleArticoli correlati

I migliori strumenti per la produttività in Office

🤖 Kutools AI Aide: Rivoluziona l'analisi dei dati grazie a: Esecuzione Intelligente | Genera Codice | Crea Formule Personalizzate | Analizza Dati e Genera Grafici | Richiama Funzioni avanzate di Kutools
Funzionalità popolari: Trova, evidenzia o contrassegna duplicati | Elimina righe vuote | Unisci colonne o celle senza perdere dati | Arrotonda...
Super RICERCA.VERT: Ricerca VERT con criteri multipli | Ricerca VERT con valori multipli | Ricerca su più fogli | Corrispondenza approssimativa...
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa | Elenco a discesa dipendente | Elenco a discesa multi-selezione...
Gestione Colonne: Aggiungi un numero specifico di colonne | Sposta colonne | Attiva/disattiva la visibilità delle colonne nascoste | Confronta intervalli e colonne...
Funzionalità in evidenza: Attenzione della griglia | Visualizzazione di progettazione | Barra delle formule avanzata | Gestione Cartella di lavoro e Foglio di lavoro | Libreria AutoText | Selettore di data | Unisci dati | Crittografa/Decrittografa celle | Invia Email tramite elenco | Super Filtri | Filtro speciale (filtra grassetto/corsivo/barrato...) ...
Top15 set di strumenti:12 strumenti di testo (Aggiungi testo, Elimina Caratteri Specifici, ...) | Oltre50 tipi di grafici (Diagramma di Gantt, ...) | Oltre40 formule pratiche (Calcola l'età in base alla data di nascita, ...) |19 strumenti di inserimento (Inserisci codice QR, Inserisci Immagine da percorso, ...) |12 strumenti di conversione (Converti in parole, Conversione valuta, ...) |7 strumenti di unione e divisione (Unione avanzata righe, Dividi celle, ...) | ... e molto altro

Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un'efficienza mai vista prima. Kutools per Excel offre oltre300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Clicca qui per ottenere la funzione di cui hai più bisogno...


Office Tab porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice

  • 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, invece che in nuove finestre.
  • Aumenta la tua produttività del50% e riduce centinaia di clic del mouse ogni giorno!