Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

chiudere da vba un file aperto senza salvare le modifiche intercorse

1,081 views
Skip to first unread message

Final Job

unread,
Oct 12, 2017, 7:38:17 AM10/12/17
to
buongiorno:

dopo avere effettuato alcune operazioni di trasferimento dati fra due
cartelle aperte nella stessa sessione excel, attivo la finestra che non
mi serve più per chiuderla es:

Windows("Archivio.xls").Activate
ActiveWindow.Close

a questo punto mi si chiede:

Salvare le modifiche apportate a 'Archivio'.xls?

Come faccio ad effettuare autonomamente da listato la scelta "no"?

grazie!
Ale

---
Questa email è stata esaminata alla ricerca di virus da AVG.
http://www.avg.com

casanmaner

unread,
Oct 12, 2017, 8:02:13 AM10/12/17
to
Workbooks("Archivio.xls").close false

Così la cartella di lavoro viene chisura senza salvare le modifiche.
ciao

Lorenzo

unread,
Oct 12, 2017, 8:26:08 AM10/12/17
to
io nei miei files con la stessa esigenza uso questa:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
ActiveWorkbook.Close
End Sub

Ciao, Lo

casanmaner

unread,
Oct 12, 2017, 8:31:48 AM10/12/17
to
Ciao Lorenzo,
nel tuo caso dovrebbe anche poter bastare

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Saved = True
End Sub


Final Job

unread,
Oct 12, 2017, 9:42:58 AM10/12/17
to
Ottimo! Grazie

il problema dello UsedRange lo controllo appena ho tempo e ti faccio sapere.
Ti auguro una buona giornata
Ale

Final Job

unread,
Oct 12, 2017, 9:44:33 AM10/12/17
to
Grazie Lorenzo
Buona giornata anche a te
Ale

Lorenzo

unread,
Oct 12, 2017, 9:48:33 AM10/12/17
to
Vero.
Grazie e ciao, Lo

Final Job

unread,
Oct 21, 2017, 2:09:54 PM10/21/17
to
Scusate se torno sull'argomento ma quando a seguito dell'istruzione
ActiveWindows.Close False
appare il messaggio:
"gli appunti contengono una grande quantità di informazioni Conservarle
..... Si No Annulla
come faccio a sostituire in vba ciò che manualmente effettuo cliccando
su "SI"
grazie
ale





Il 12/10/2017 13:38, Final Job ha scritto:

casanmaner

unread,
Oct 21, 2017, 2:42:58 PM10/21/17
to
La procedura parte da una macro diversa da quella del file che vai a chiudere?

Final Job

unread,
Oct 21, 2017, 2:59:22 PM10/21/17
to
Il file che vado a chiudere è esterno a quello dal quale lancio la sub

Il 21/10/2017 20:42, casanmaner ha scritto:
> La procedura parte da una macro diversa da quella del file che vai a chiudere?
>

casanmaner

unread,
Oct 21, 2017, 3:04:44 PM10/21/17
to
Prova prima della riga di comando di chiusura a inserire

Application.DisplayAlerts = False

e dopo la riga di chiusura

Application.DisplayAlerts = True

Final Job

unread,
Oct 21, 2017, 3:13:15 PM10/21/17
to
Ok
e se, invece, avessi bisogno di svuotare gli appunti (che equivale a
cliccare manualmente sul "no")?
ciao

casanmaner

unread,
Oct 21, 2017, 5:13:24 PM10/21/17
to
Il giorno sabato 21 ottobre 2017 21:13:15 UTC+2, Final Job ha scritto:
> Ok
> e se, invece, avessi bisogno di svuotare gli appunti (che equivale a
> cliccare manualmente sul "no")?
> ciao

Dopo aver copiato e incollato i dati hai provato a far seguire il comando

Application.CutCopyMode=False

Final Job

unread,
Oct 21, 2017, 7:28:29 PM10/21/17
to
Grazie .... buona sfebbrata!
Ale

Il 21/10/2017 23:13, casanmaner ha scritto:
0 new messages