Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Chiudere automaticamente file se non utilizzato

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

Chiudere automaticamente file se non utilizzato

Postdi alby60 » 23/02/11 01:28

Ciao, ho questo problema da risolvere: un file viene utilizzato in aggiornamento da diversi utenti. Attualmente chiudo (salvando i dati) il file utilizzando una macro che lo chiude dopo 30 minuti dall’apertura. Io vorrei aggiungere la condizione di chiuderlo ma solo se non viene utilizzato da almeno 10 minuti. Avevo pensato di scrivere su un file TXT data e ora di quando viene fatta un certa azione su un determinato foglio e poi controllare da quanto tempo non viene fatto l’aggiornamento dei dati nel file TXT, se sono trascorsi più di 10 minuti dall’ultimo aggiornamento chiuderei il file. Mi sembra una cosa troppo contorta, probabilmente funzionerebbe pure. Voi avete qualche altra proposta. Grazie anticipato.
alby60
Utente Junior
 
Post: 76
Iscritto il: 18/11/10 01:04

Sponsor
 

Re: Chiudere automaticamente file se non utilizzato

Postdi Flash30005 » 23/02/11 14:30

Una macro che funziona se il file.xls non è attivo potrebbe essere questa
(docice da inserire nel ThisWorkbook)
Codice: Seleziona tutto
Private Sub Workbook_Activate()
Flag1 = True
End Sub

Private Sub Workbook_Deactivate()
Flag1 = False
DeltaT = "00:01:00"  '<<<< cambiare 01 in 10 (per avere 10 minuti minuti)
Application.OnTime Now + TimeValue(DeltaT), "Chiudi"
End Sub


poi, in un modulo inserisci
Public Flag1
Sub Chiudi()
If Flag1 = False Then ThisWorkbook.Close SaveChanges:=True 'oppure False
End Sub


Questa macro funziona solo se si attiva un altro file xls (in pratica si disattiva il file a tempo)
Non funziona se si lavora su altre applicazione lasciando attivo il file a tempo.

Fai sapere
Ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-


Torna a Applicazioni Office Windows


Topic correlati a "Chiudere automaticamente file se non utilizzato":


Chi c’è in linea

Visitano il forum: Nessuno e 11 ospiti