Πώς να ελέγξετε γρήγορα εάν ένα αρχείο (βιβλίο εργασίας) είναι ανοιχτό ή κλειστό στο Excel;

Excel καθημερινή εργασία, ανοίγετε πολλά βιβλία εργασίας ταυτόχρονα για εργασία, αλλά μερικές φορές, τα εκατοντάδες βιβλία εργασίας μπορεί να βρωμίσουν το μυαλό σας για να θυμάστε εάν ένα συγκεκριμένο βιβλίο εργασίας είναι ανοιχτό ή κλειστό. Εγκαταλείψτε την παραδοσιακή μέθοδο ελέγχου των αρχείων ένα προς ένα, εδώ σας παρουσιάζω τα κόλπα για να βρείτε γρήγορα ότι ένα βιβλίο εργασίας είναι ανοιχτό ή κλειστό.

Ελέγξτε εάν ένα βιβλίο εργασίας είναι ανοιχτό ή κλειστό με VBA

Ελέγξτε εάν ένα βιβλίο εργασίας είναι ανοιχτό ή κλειστό με το Kutools για Excel

Ελέγξτε εάν ένα βιβλίο εργασίας είναι ανοιχτό ή κλειστό με VBA

Εδώ είναι ένας κωδικός VBA που μπορείτε να εκτελέσετε για να ελέγξετε εάν ένα συγκεκριμένο βιβλίο εργασίας είναι ανοιχτό ή κλειστό.

1. Τύπος Alt + F11 κλειδιά για άνοιγμα Microsoft Visual Basic για εφαρμογές παράθυρο.

2. κλικ Κύριο θέμα > Μονάδα μέτρησης και στη συνέχεια αντιγράψτε και επικολλήστε το VBA στο νέο Μονάδα μέτρησης παράθυρο.

VBA: Ελέγξτε εάν ένα βιβλίο εργασίας είναι ανοιχτό ή κλειστό

Function IsWorkBookOpen(Name As String) As Boolean
    Dim xWb As Workbook
    On Error Resume Next
    Set xWb = Application.Workbooks.Item(Name)
    IsWorkBookOpen = (Not xWb Is Nothing)
End Function

Sub Sample()
    Dim xRet As Boolean
    xRet = IsWorkBookOpen("combine.xlsx")
    If xRet Then
        MsgBox "The file is open", vbInformation, "Kutools for Excel"
    Else
        MsgBox "The file is not open", vbInformation, "Kutools for Excel"
    End If
End Sub

3. Και πατήστε F5 για να εκτελέσετε αυτό το vba και εμφανίζεται ένα παράθυρο διαλόγου για να σας υπενθυμίσει ότι το συγκεκριμένο βιβλίο εργασίας είναι ανοιχτό ή όχι.
    

Συμβουλή: Στο παραπάνω VBA, «συνδυασμός"Είναι το όνομα του βιβλίου εργασίας που θέλετε να ελέγξετε, μπορείτε να το κάνετε όπως χρειάζεστε.

Ελέγξτε εάν ένα βιβλίο εργασίας είναι ανοιχτό ή κλειστό με το Kutools για Excel

Εάν δεν είστε εξοικειωμένοι με το VBA, μπορείτε να ελέγξετε εάν ένα βιβλίο εργασίας είναι ανοιχτό μέχρι Kutools για Excel, με τα δικά του Πλοήγηση παράθυρο, το οποίο θα σας βοηθήσει να δείτε καθαρά όλα τα ανοιχτά βιβλία εργασίας στη λίστα βιβλίων εργασίας του παραθύρου.

Μετά το δωρεάν εγκατάσταση Kutools για Excel, κάντε τα παρακάτω:

1. κλικ Kutools > Πλοήγηση για να ενεργοποιήσετε το παράθυρο πλοήγησης. Δείτε το στιγμιότυπο οθόνης:

2. Στη συνέχεια κάντε κλικ στο κουμπί Βιβλίο & φύλλο εργασίας για να επεκτείνετε το παράθυρο για να μεταβείτε Βιβλίο & φύλλο εργασίας Ενότητα. Και μπορείτε να δείτε όλα τα ανοιχτά βιβλία εργασίας στην επάνω λίστα. Δείτε το στιγμιότυπο οθόνης:

Με Πλοήγηση παράθυρο, μπορείτε επίσης να αλλάξετε γρήγορα μεταξύ των βιβλίων εργασίας ή των φύλλων στη λίστα.

Κάντε κλικ εδώ για να μάθετε περισσότερα για την Πλοήγηση.

Διαδήλωση