Excel'de belirli bir çalışma kitabının açık olup olmadığını nasıl kontrol edebilirim?
Aynı anda birden fazla çalışma kitabı açık olabilir. Belirli bir çalışma kitabının şu anda açık olup olmadığını kontrol etmeniz gerekiyorsa, VBA size basit ve etkili bir çözüm sunar. Bu kılavuzda, bir çalışma kitabının açık olup olmadığını hızlıca belirlemek için nasıl bir VBA kodu kullanacağınızı öğreneceksiniz.
Excel'de bir çalışma kitabının açık olup olmadığını kontrol edin
Excel'de bir çalışma kitabının açık olup olmadığını kontrol edin
Excel'de bir çalışma kitabının açık olup olmadığını kontrol etmek için aşağıdaki adımları izleyebilirsiniz.
1. Alt+F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın. Microsoft Visual Basic for Applications penceresinde Ekle > Modül seçeneğine tıklayın.
2. Ardından, aşağıdaki VBA kodunu düzenleyiciye kopyalayıp yapıştırın.
VBA kodu: bir çalışma kitabının açık olup olmadığını bulun
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 Sub3. Kodu çalıştırmak için şimdi F5 tuşuna basın. Açılan KutoolsforExcel iletişim kutusuna kontrol etmek istediğiniz Çalışma Kitabı Adı'nı girin, ardından Tamam düğmesine tıklayın. Ekran görüntüsüne bakın:
Belirtilen çalışma kitabı açık ise, size çalışma kitabının açık olduğunu bildiren bir iletişim kutusu açılacaktır;
Aksi takdirde, belirtilen çalışma kitabı açık değilse aşağıdaki iletişim kutusu görüntülenir.
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar