Zjistěte, zda je sešit již otevřený pomocí jazyka VBA v aplikaci Microsoft Excel

Anonim

V aplikaci Excel můžeme určit, zda je sešit zavřený nebo otevřený pomocí kódu VBA. Níže je kód a proces VBA, který musíte vložit do modulu kódu souboru.

1. Otevřete Excel
2. Stiskněte ALT + F11
3. Editor VBA se OTEVŘE
4. Klikněte kamkoli v okně projektu
5. Klikněte na Vložit
6. Klikněte na Modul

7. V okně Kód zkopírujte a vložte níže uvedený kód

Funkce WorkbookOpen (WorkBookName As String) As Boolean
'vrací TRUE, pokud je sešit otevřený
WorkbookOpen = False
Při chybě GoToWorkBookNotOpen
Pokud Len (Application.Workbooks (WorkBookName) .Name)> 0 Then
WorkbookOpen = True
Funkce ukončení
Konec If
WorkBookNotOpen:
Koncová funkce

8. Jakmile je toto vloženo, přejděte do souboru aplikace Excel
9. Vyberte buňku A1
10. Typ = práce
11. Můžete vidět, že = workbookopen je viditelný jako vzorec

12. Zpočátku to tam nebylo

13. Napište vzorec = WorkbookOpen ("test1.xlsx")
14. Zde je jako příklad použit sešit „test1.xlsx“. Tento soubor není otevřený.
15. Protože tento soubor není otevřený, zobrazí se jako „FALSE“

16. Vyberte buňku A3
17. Napište vzorec = WorkbookOpen ("determine-if-a-workbook-is-already-open-using-vba-in-microsoft-excel.xlsx")
18. Zde je jako příklad použit sešit „zjistit, jestli je sešit již otevřený pomocí vba-in-microsoft-excel.xlsx“. Tento soubor je otevřený.
19. Jakmile je tento soubor otevřený, zobrazí se jako „PRAVDA“

Takto můžeme určit, zda je sešit již otevřený nebo nepoužívá VBA v Microsoft Excel 2010 a Microsoft Excel 2013.

Pokud se vám naše blogy líbily, sdílejte je se svými přáteli na Facebooku. A také nás můžete sledovat na Twitteru a Facebooku.
Rádi bychom od vás slyšeli, dejte nám vědět, jak můžeme zlepšit, doplnit nebo inovovat naši práci a zlepšit ji pro vás. Napište nám na e -mailový web