Condividi:        

SALVA FILE?

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

SALVA FILE?

Postdi scanacc » 29/12/17 14:20

Ho creato una Macro Auto_Open che (tra le altre cose che fa), mi apre 3 file excel e poi prima del termine della macro le richiude.
Uno di questi file però per chiudersi mi chiede sempre se intendo salvare le modifiche apportate al file appena aperto dalla macro.
Perchè accede questo solo ad 1 dei 3 file? Ma soprattutto come posso eliminare questa richiesta?
Grazie dell'aiuto e buon anno
scanacc
Utente Senior
 
Post: 350
Iscritto il: 06/12/15 10:30

Sponsor
 

Re: SALVA FILE?

Postdi scanacc » 29/12/17 14:33

scanacc ha scritto:Ho creato una Macro Auto_Open che (tra le altre cose che fa), mi apre 3 file excel e poi prima del termine della macro le richiude.
Uno di questi file però per chiudersi mi chiede sempre se intendo salvare le modifiche apportate al file appena aperto dalla macro.
Perchè accede questo solo ad 1 dei 3 file? Ma soprattutto come posso eliminare questa richiesta?
Grazie dell'aiuto e buon anno


PS
Aggiungo il comando che uso per la chiusura
Sub CHIUDI_FILE_APERTI_IN_C()
Dim book As Workbook
Dim file_aperto As Workbook
Dim aperto As Boolean
Dim nome As String

nome = "eMail.xls"
aperto = False
For Each book In Workbooks
If book.Name = nome Then
Set file_aperto = Workbooks(nome)
aperto = True
file_aperto.Close
Exit For
End If
Next book

Set file_aperto = Nothing

nome = "Legame_agenti_ufficio.xls"
aperto = False
For Each book In Workbooks
If book.Name = nome Then
Set file_aperto = Workbooks(nome)
aperto = True
file_aperto.Close
Exit For
End If
Next book


Set file_aperto = Nothing

nome = "SEGM - Grappolata Comm.xls"
aperto = False
For Each book In Workbooks
If book.Name = nome Then
Set file_aperto = Workbooks(nome)
aperto = True
file_aperto.Close
Exit For
End If
Next book


End Sub
scanacc
Utente Senior
 
Post: 350
Iscritto il: 06/12/15 10:30

Re: SALVA FILE?

Postdi alfrimpa » 29/12/17 14:53

Ciao scanacc

Puoi utilizzare

Codice: Seleziona tutto
Application.DisplayAlerts = False
file_aperto.Close
Application.DisplayAlerts = True


oppure il parametro SaveChanges del metodo Close

Codice: Seleziona tutto
file_aperto.Close SaveChanges = False
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: SALVA FILE?

Postdi scanacc » 29/12/17 15:55

Grazie mitico!
Vorrei anche eliminare un messaggio che "stranamente" mi viene quando trasformo il testo in colonne. Mi dice che sono presenti dei dati e se voglio sostituirli! E' strano perchè mi da il messaggio anche quando le celle sono vuote? Mah!!!
scanacc
Utente Senior
 
Post: 350
Iscritto il: 06/12/15 10:30

Re: SALVA FILE?

Postdi alfrimpa » 29/12/17 16:07

Allega un file di esempio spiegando quello che vuoi fare
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: SALVA FILE?

Postdi Marius44 » 29/12/17 17:16

Ciao
Oltre all'ottimo suggerimento di Alf (un caro saluto) non è che quelle "celle vuote" contengono uno " " (spazio)?

Ciao,
Mario
Marius44
Utente Senior
 
Post: 655
Iscritto il: 07/09/15 22:00

Re: SALVA FILE?

Postdi scanacc » 30/12/17 13:05

Mah! Le stranezze della vita
ho risolto togliendo i bordi dalle celle che devo formattare.
Facendo così non mi dice che sono presenti dati da sostituire.
Dato che sono celle nascoste mi va bene così.
Grazie
scanacc
Utente Senior
 
Post: 350
Iscritto il: 06/12/15 10:30


Torna a Applicazioni Office Windows


Topic correlati a "SALVA FILE?":


Chi c’è in linea

Visitano il forum: Nessuno e 48 ospiti