[EXCEL e VBA] Evento "apertura e chiusura di un file"

[GoTeNsSj4]

Come faccio a eseguire un determinato codice all'apertura e alla chiusura di un file?! Specifico, non all'apertura di un foglio di lavoro (workbook), ma all'apertura e alla chiusura DELL'INTERO file!

Grazie a tutti! Ciau!

[borgodiavalon]

ma l'oggetto workboot non è la cartella di lavoro?
io inserirei la macro nell'open di thisworkboot
nel caso scusa per l'errore.

Riferimenti per sviluppatori Excel
Oggetto Workbook
Rappresenta una cartella di lavoro di Microsoft Excel.
Note


L'oggetto Workbook è un elemento dell'insieme Workbooks. L'insieme Workbooks contiene tutti gli oggetti Workbook aperti in Microsoft Excel.

Proprietà ThisWorkbook
La proprietà ThisWorkbook restituisce la cartella di lavoro in cui è in esecuzione il codice Visual Basic. Nella maggior parte dei casi si tratta della cartella di lavoro attiva. Se tuttavia il codice Visual Basic fa parte di un componente aggiuntivo, la proprietà ThisWorkbook non restituirà la cartella di lavoro attiva. In questo caso, la cartella di lavoro attiva sarà quella che chiama il componente aggiuntivo e la proprietà ThisWorkbook restituirà la cartella di lavoro del componente aggiuntivo.

Se si crea un'aggiunta con un codice Visual Basic, sarà necessario utilizzare la proprietà ThisWorkbook per qualificare le istruzioni che dovranno essere eseguite sulla cartella di lavoro compilata nell'aggiunta.


Esempio


Utilizzare Workbooks(indice), dove indice è il nome o il numero di indice della cartella di lavoro, per restituire un singolo oggetto Workbook. Nell'esempio seguente viene attivata la cartella di lavoro 1.

Visual Basic, Application Edition
Workbooks(1).Activate

Il numero di indice indica l'ordine nel quale le cartelle di lavoro sono state aperte o create. Workbooks(1) è la cartella di lavoro creata per prima, mentre Workbooks(Workbooks.Count) è quella creata per ultima. L'attivazione di una cartella di lavoro non ne modifica il numero di indice. Nel calcolo del numero di indice sono comprese tutte le cartelle di lavoro, anche quelle nascoste.

La proprietà Name restituisce il nome della cartella di lavoro. Non è possibile impostare il nome della cartella di lavoro utilizzando questa proprietà. Per salvare la cartella di lavoro con un nome diverso, utilizzare il metodo SaveAs. Nell'esempo seguente viene attivato il foglio di lavoro 1 della cartella di lavoro Cogs.xls, che deve essere già aperta in Microsoft Excel.

Visual Basic, Application Edition
Workbooks("Cogs.xls").Worksheets("Sheet1").Activat e

La proprietà ActiveWorkbook restituisce la cartella di lavoro attiva. Nell'esempo seguente viene impostato il nome dell'autore della cartella di lavoro attiva.

Visual Basic, Application Edition
ActiveWorkbook.Author = "Jean Selva"


© 2006 Microsoft Corporation. Tutti i diritti riservati.

[GoTeNsSj4]

Ho risolto, il codice va impostato all'evento Open e all'evento BeforeClose di "ThisWorkbook". Io prima evidentemente mi sono confuso con "WorkSheets"!

il codice è il seguente!

Private Sub Workbook_BeforeClose(Cancel As Boolean)
MsgBox "arrivederci"
End Sub

Private Sub Workbook_Open()
MsgBox "ciao"
End Sub