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

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

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

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

Μπορείτε να κάνετε τα εξής για να ελέγξετε εάν ένα βιβλίο εργασίας είναι ανοιχτό ή όχι στο Excel.

1. Πάτα το άλλος + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησης.

2. Στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στον επεξεργαστή.

Κωδικός VBA: βρείτε αν έχει ανοίξει ένα βιβλίο εργασίας

Sub TrimExcessSpaces()
	Dim xWBName As String
	Dim xWb As Workbook
	On Error Resume Next
	xTitleId = "KutoolsforExcel"
	xWBName = Application.InputBox("Workbook Name", xTitleId, "", Type: = 2)
	Set xWb = Application.Workbooks(xWBName)

	If xWb Is Nothing Then
		MsgBox "The Workbook is not open!"
	Else
		MsgBox "The Workbook is open!"
	End If

End Sub

3. Τώρα πατήστε το F5 κλειδί για την εκτέλεση του κώδικα. Στο αναδυόμενο KutoolsforExcel πλαίσιο διαλόγου, εισαγάγετε το όνομα του βιβλίου εργασίας που θέλετε να ελέγξετε και, στη συνέχεια, κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:

Εάν ανοίξει το καθορισμένο βιβλίο εργασίας, θα εμφανιστεί ένα παράθυρο διαλόγου που θα σας λέει ότι το βιβλίο εργασίας είναι ανοιχτό.

Διαφορετικά, θα λάβετε ένα παρακάτω παράθυρο διαλόγου εάν το καθορισμένο βιβλίο εργασίας δεν ανοίξει.