In Excel possiamo determinare se la cartella di lavoro è chiusa o aperta tramite il codice VBA. Di seguito è riportato il codice VBA e il processo che è necessario incollare nel modulo di codice del file.
1. Apri Excel
2. Premi ALT + F11
3. L'editor VBA si aprirà
4. Fare clic in un punto qualsiasi della finestra del progetto
5. Fare clic su Inserisci
6. Fare clic su Modulo
7. Nella finestra del codice, copia e incolla il codice indicato di seguito
Funzione WorkbookOpen(WorkBookName As String) As Boolean' restituisce TRUE se la cartella di lavoro è aperta
WorkbookOpen = False
In caso di errore GoToWorkBookNotOpen
Se Len(Application.Workbooks(WorkBookName).Name) > 0 Allora
Cartella di lavoroAperta = True
Esci dalla funzione
Finisci se
WorkBookNotOpen:
Fine funzione
8. Una volta incollato, vai al file Excel
9. Seleziona la cella A1
10. Tipo = lavoro
11. Puoi vedere che =workbookopen è visibile come una formula
12. Inizialmente non c'era
13. Scrivi la formula =WorkbookOpen("test1.xlsx")
14. Qui viene utilizzata la cartella di lavoro "test1.xlsx" come esempio. Questo file non è aperto.
15. Poiché questo file non è aperto, verrà visualizzato come "FALSO"
16. Seleziona la cella A3
17. Scrivi la formula =WorkbookOpen("determine-if-a-workbook-is-already-open-using-vba-in-microsoft-excel.xlsx")
18. Qui viene utilizzata la cartella di lavoro "determine-if-a-workbook-is-already-open-using-vba-in-microsoft-excel.xlsx" come esempio. Questo file è aperto.
19. Poiché questo file è aperto, verrà visualizzato come "VERO"
In questo modo possiamo determinare se la cartella di lavoro è già aperta o non utilizza VBA in Microsoft Excel 2010 e Microsoft Excel 2013.
Se ti è piaciuto il nostro blog, condividilo con i tuoi amici su Facebook. E puoi anche seguirci su Twitter e Facebook.
Ci piacerebbe avere tue notizie, facci sapere come possiamo migliorare, completare o innovare il nostro lavoro e renderlo migliore per te. Scrivici a sito di posta elettronica