Bestimmen Sie, ob eine Arbeitsmappe bereits geöffnet ist mit VBA in Microsoft Excel
In Excel können wir durch VBA-Code feststellen, ob die Arbeitsmappe geschlossen oder geöffnet ist. Unten finden Sie den VBA-Code und -Prozess, den Sie in das Codemodul der Datei einfügen müssen.
{leer} 1. Öffnen Sie Excel 2. Drücken Sie ALT + F11. 3. Der VBA-Editor wird geöffnet. 4. Klicken Sie auf eine beliebige Stelle im Projektfenster. 5. Klicken Sie auf Einfügen. 6. Klicken Sie auf Modul
{leer} 7. Kopieren und fügen Sie im Codefenster die unten genannte Codefunktion ein. WorkbookOpen (WorkBookName As String) As Boolean ‚gibt TRUE zurück, wenn die Arbeitsmappe geöffnet ist. WorkbookOpen = False On Error GoToWorkBookNotOpen If Len (Application.Workbooks (WorkBookName) .Name)> 0 Then WorkbookOpen = True Exit Function End If WorkBookNotOpen:
End Function {leer} 8. Sobald dies eingefügt ist, gehen Sie zur Excel-Datei 9. Wählen Sie Zelle A1 aus. 10. Geben Sie = work 11 ein. Sie können sehen, dass = workbookopen wie eine Formel
sichtbar ist {leer} 12. Anfangs war es nicht da
{leer} 13. Schreiben Sie die Formel = WorkbookOpen („test1.xlsx“)
-
Hier wird als Beispiel die Arbeitsmappe „test1.xlsx“ verwendet. Diese Datei ist nicht geöffnet.
-
Da diese Datei nicht geöffnet ist, wird sie als „FALSE“
angezeigt {leer} 16. Wählen Sie Zelle A3 aus. 17. Schreiben Sie die Formel = WorkbookOpen („Bestimmen, ob eine Arbeitsmappe bereits geöffnet ist, indem Sie vba-in-microsoft-excel.xlsx verwenden“)
-
Hier die Arbeitsmappe „Bestimmen, ob eine Arbeitsmappe bereits geöffnet ist, indem Sie vba-in-microsoft-excel.xlsx verwenden“
wird als Beispiel verwendet. Diese Datei ist geöffnet.
-
Da diese Datei geöffnet ist, wird sie als „TRUE“
angezeigt Auf diese Weise können wir feststellen, ob die Arbeitsmappe bereits geöffnet ist oder VBA in Microsoft Excel 2010 und Microsoft Excel 2013 nicht verwendet.
Wenn Ihnen unsere Blogs gefallen haben, teilen Sie sie Ihren Freunden auf Facebook mit. Und Sie können uns auch auf Twitter und Facebook folgen.
Wir würden gerne von Ihnen hören, uns mitteilen, wie wir unsere Arbeit verbessern, ergänzen oder innovieren und für Sie verbessern können. Schreiben Sie uns an [email protected]