Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Avviso se non viene attivata Macro prima della chiusura del File

Ultimo Aggiornamento: 09/05/2018 19:03
Post: 60
Registrato il: 13/01/2017
Città: GENOVA
Età: 55
Utente Junior
2013
OFFLINE
09/05/2018 16:28

Intanto buongiorno
Mi spiego meglio
Vorrei che in un file (tipo quello che allego come esempio) comparisse un avviso (da qualche parte nel foglio) che mi ricordasse di attivare almeno una volta la Macro presente, prima di chiudere lo stesso file.
Pensavo che si potrebbe con una formattazione condizionale (se si riuscisse a contare il numero delle attivazioni della macro)
Sennò ditemi...:)
Spero di essermi spiegato

Nell'esempio che allego, la macro che è associata al pulsante blu, deve essere almeno attivata una volta
Se così non fosse, vorrei apparisse un Avviso (con un pop-up magari)

Grazie e saluto
Enrico


Post: 4.089
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
09/05/2018 17:32

hai allegato un xlsx, quindi senza macro

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 60
Registrato il: 13/01/2017
Città: GENOVA
Età: 55
Utente Junior
2013
OFFLINE
09/05/2018 17:40

Eccolo
Scusate
Enrico
Post: 3.740
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
OFFLINE
09/05/2018 18:59

Nel file che hai allegato non c'è nessuna macro.

Comunque alla macro che hai potresti aggiungere un'istruzione di questo tipo che crea una sorta di contatore ogni volta che viene eseguita la macro

vb
Range("ZZ1000") = Range("ZZ1000") + 1


"ZZ1" puoi sostituirlo con una cella a tuo piacere.

Poi con una procedura di questo tipo da inserire nel modulo Questa_cartella_di_lavoro

vb
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Range("zz1").Value = 0 Then
MsgBox "Eseguire la macro"
Cancel = True
End If
End Sub


controlli il valore della cella zz1; se è uguale a 0 non ti fa chiudere il file.

Ovviamente con una procedura Workbook_Open() dovrai riportare a 0 il valore di ZZ1.

[Modificato da alfrimpa 09/05/2018 19:01]

Alfredo
Post: 4.090
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
09/05/2018 19:03

Questa volta invece hai allegato un xlsm, ma senza macro, comunque è possibile capire se hai lanciato una macro soltanto in base agli effetti che produce e che analizzerai con una sub del tipo:
Private Sub Workbook_BeforeClose(Cancel As Boolean)

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 20:59. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com