İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Excel-də xüsusi bir iş kitabının açıq və ya olmadığını necə tapmaq və ya yoxlamaq üçün?

Birdən çox iş kitabçası aça bilərsiniz. Xüsusi bir iş kitabının açıq olub olmadığını yoxlamaq və yoxlamaq üçün. Burada bir iş kitabının açıq olub olmadığını yoxlamaq üçün VBA-dan necə istifadə edəcəyinizi təqdim edəcəyik.

Bir iş kitabının açıq və ya Excel-də olmadığını yoxlayın



arrow mavi sağ bubbleBir iş kitabının açıq və ya Excel-də olmadığını yoxlayın

Excel-də bir iş kitabının açıq və ya olmadığını yoxlamaq üçün aşağıdakıları edə bilərsiniz.

1. Basın Dayandırmaq + F11 açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə. İçində Proqramlar üçün Microsoft Visual Basic pəncərə basın Taxmaq > Modules.

2. Sonra aşağıdakı VBA kodunu redaktorya kopyalayıb yapışdırın.

VBA kodu: bir iş kitabının açıldığını tapın

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. İndi basın F5 kodunu çalıştırmak üçün düyməsini basın. Popping up KutoolsforExcel informasiya qutusunda, kontrol etmək istədiyiniz iş kitabının adını daxil edin və sonra basın OK düyməsini basın. Ekran görüntüsünə baxın:

Göstərilən iş kitabı açılırsa, iş kitabının açıq olduğunu bildirən bir informasiya qutusu açılır;

Əks təqdirdə, müəyyən edilmiş iş kitabı açılmırsa, aşağıda göstərilən informasiya qutusunu alacaqsınız.



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.