| | Post: 1 | Registrato il: 23/06/2017
| Città: MILANO | Età: 63 | Utente Junior | excel 2016 | | OFFLINE | |
|
  23/06/2017 12:31 | |
Buongiorno a tutti,
dovrei inpedire il salvataggio di un file se le cella A1 risulta non compilata
Ho provato con questo
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Worksheets("Foglio1").Range("A1").Value = "" Then; telefonare a . . . per chiarimenti")
Cancel = True
Exit Sub
End If
End Sub
ma non succede nulla.... ![[SM=x423023]](http://www.erismag.it/Servizio/ForumExcel/Smiles/Faccina_0003.gif)
qualche dritta?
Grz ![[SM=x423055]](http://www.erismag.it/Servizio/ForumExcel/Smiles/Faccina_0035.gif)
|
|
| | Post: 3.300 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
| 23/06/2017 12:36 | |
Ciao Mario
Prova così
vb Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Worksheets("Foglio1").Range("A1").Value = "" Then
MsgBox "telefonare a . . . per chiarimenti"
Cancel = True
Exit Sub
End If
End Sub
Alfredo |
| | Post: 1 | Registrato il: 23/06/2017
| Città: MILANO | Età: 63 | Utente Junior | excel 2016 | | OFFLINE | |
|
| 23/06/2017 12:42 | |
Ciao Alfredo
grazie mille per la tempestività
In effetti il codice che ho inserito era uguale al tuo (ho sbagliato a copiarlo nel messaggio) ma non succede nulla lo stesso
Non capisco come mai!!! |
| | Post: 3.301 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
| 23/06/2017 12:45 | |
In che senso non funziona? Ricevi un messaggio di errore, non succede nulla, il file viene chiuso anche se A1 è vuota?
Io ho provato e a me funziona.
Allega il tuo file non funzionante.
Alfredo |
| | Post: 2 | Registrato il: 23/06/2017
| Città: MILANO | Età: 63 | Utente Junior | excel 2016 | | OFFLINE | |
|
| 23/06/2017 12:53 | |
Ciao Alfredo
grazie mille per la tempestività
In effetti il codice che ho inserito era uguale al tuo (ho sbagliato a copiarlo nel messaggio) ma non succede nulla lo stesso
Non capisco come mai!!! |
| | Post: 3 | Registrato il: 23/06/2017
| Città: MILANO | Età: 63 | Utente Junior | excel 2016 | | OFFLINE | |
|
| 23/06/2017 12:54 | |
Ciao Alfredo
grazie mille per la tempestività
In effetti il codice che ho inserito era uguale al tuo (ho sbagliato a copiarlo nel messaggio) ma non succede nulla lo stesso
Non capisco come mai!!! |
| | Post: 4 | Registrato il: 23/06/2017
| Città: MILANO | Età: 63 | Utente Junior | excel 2016 | | OFFLINE | |
|
| 23/06/2017 12:55 | |
Non funziona nel senso che il file si chiude anche se la cella risulta vuota |
| | Post: 5 | Registrato il: 23/06/2017
| Città: MILANO | Età: 63 | Utente Junior | excel 2016 | | OFFLINE | |
|
| 23/06/2017 13:05 | |
Non funziona nel senso che il file si chiude anche se la cella risulta vuota |
| | Post: 3.302 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
| 23/06/2017 13:46 | |
La macro non va nel modulo del Foglio1 ma in quello di Questa_cartella_di_lavoro.
Alfredo |
| | Post: 6 | Registrato il: 23/06/2017
| Città: MILANO | Età: 63 | Utente Junior | excel 2016 | | OFFLINE | |
|
| 23/06/2017 14:26 | |
ma è vero che stupido
grz 1000!!!! |
|
|
|
|