In Excel kunnen we bepalen of de werkmap gesloten of open is via VBA-code. Hieronder vindt u de VBA-code en het proces die u in de codemodule van het bestand moet plakken.
1. Open Excel
2. Druk op ALT + F11
3. VBA-editor gaat OPEN
4. Klik ergens in het projectvenster
5. Klik op Invoegen
6. Klik op Module
7. Kopieer en plak de onderstaande code in het codevenster:
Functie WorkbookOpen(WorkBookName As String) As Boolean' geeft TRUE terug als de werkmap open is
WerkboekOpen = False
Bij fout GoToWorkBookNotOpen
Als Len (Toepassing. Werkboeken (Naam Werkboek). Naam) > 0 Dan
WerkmapOpen = True
Functie verlaten
Stop als
WerkboekNietOpen:
Functie beëindigen
8. Zodra dit is geplakt, gaat u naar het Excel-bestand
9. Selecteer cel A1
10. Typ =werk
11. Je kunt zien dat =werkmapopen zichtbaar is als een formule
12. Aanvankelijk was het er niet
13. Schrijf de formule =WorkbookOpen("test1.xlsx")
14. Hier wordt het werkboek "test1.xlsx" als voorbeeld gebruikt. Dit bestand is niet geopend.
15. Aangezien dit bestand niet geopend is, wordt het weergegeven als "FALSE"
16. Selecteer cel A3
17. Schrijf de formule =WorkbookOpen("determine-if-a-workbook-is-al-open-using-vba-in-microsoft-excel.xlsx")
18. Hier wordt de werkmap "bepaal-of-een-werkmap-is-al-open-met-vba-in-microsoft-excel.xlsx" gebruikt als voorbeeld. Dit bestand is geopend.
19. Aangezien dit bestand open is, wordt het weergegeven als "TRUE"
Zo kunnen we bepalen of de werkmap al open is of geen VBA gebruikt in Microsoft Excel 2010 en Microsoft Excel 2013.
Als je onze blogs leuk vond, deel deze dan met je vrienden op Facebook. En je kunt ons ook volgen op Twitter en Facebook.
We horen graag van je, laat ons weten hoe we ons werk kunnen verbeteren, aanvullen of vernieuwen en het voor jou beter kunnen maken. Schrijf ons op e-mailsite