Excel fornisce un solido ambiente di sviluppo di cui molte persone traggono pieno vantaggio. In effetti, molte persone hanno scritto interi programmi applicativi utilizzando VBA con Excel come framework.

Se sviluppi programmi in Excel, ti starai chiedendo se esiste un modo per scrivere il tuo programma in modo che non funzioni più dopo una data specifica. Fortunatamente, questo è piuttosto facile. Una soluzione è usare qualcosa di simile al seguente come macro Auto_Open:

Sub Auto_Open()

Dim exdate As Date     exdate = "12/31/2020"

If Date > exdate Then         MsgBox ("You have reached end of your trial period")

ActiveWorkbook.Close     End If     MsgBox ("You have " & exdate - Date & "Days left")

End Sub

Se la data sul sistema che esegue il programma è maggiore della data specificata nella variabile exdate, l’utente vedrà una finestra di messaggio indicante che il periodo di prova è scaduto. Quando l’utente fa clic sul pulsante OK, la cartella di lavoro si chiude. Se il periodo di prova non è terminato, la finestra di messaggio indica quanti giorni sono rimasti nel periodo.

Ovviamente, se inserisci una macro come questa nella tua applicazione, potrebbe impedirti di aprire la cartella di lavoro per apportare modifiche al programma. Il modo ovvio per aggirare questo, ovviamente, è tenere premuto il tasto Maiusc mentre apri la cartella di lavoro. In questo modo si interrompe l’esecuzione della macro Auto_Open. Se i tuoi utenti lo sanno, possono ignorare il controllo della scadenza altrettanto facilmente come te, comunque. La soluzione è inserire controlli simili all’interno di altre macro che non possono essere ignorate e che sono essenziali per il tuo programma.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (10230) si applica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 ed Excel in Office 365. Puoi trovare una versione di questo suggerimento per l’interfaccia del menu precedente di Excel qui:

Data di scadenza per programmi Excel.