İ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

Exceldə aktiv iş kitabını (cari fayl) necə silmək olar?

Bir veb saytdan bir iş kitabını endirdik və iş dəftəri avtomatik olaraq açıldı deyirlər. Bununla birlikdə, iş kitabı düzgün ola bilməz və ya iş kitabında lazımi məlumatlar yoxdur və onu silmək istənir. Bəzən, ehtimal ki, yüklənmiş faylların avtomatik olaraq saxlanılmasını unutma. Xahiş etməyin, açılış / aktiv iş kitabını Excel-də birbaşa bağlanmadan silə bilərik.

VBA ilə aktiv iş kitabını (cari fayl) silin

Seçilən bu iş kitabı ilə aktiv iş kitabı olan qovluğu açmaq üçün bir klik

Cari iş kitabı olan qovluğu / qovluğu tez bir zamanda açmaq və açılış qovluğunda seçilmiş bir iş kitabını seçmək üçün, Excel-in Kutools Qovluq içərisində açın kommunal. Tam xüsusiyyətli 60-sınaq sınaq!

1 qovluğu olan açıq reklam



arrow mavi sağ bubble VBA ilə aktiv iş kitabını (cari fayl) silin

Bu metod Excel-də bağlanmadan açma / aktiv iş kitabını silmək üçün VBA təqdim edəcəkdir. Xahiş edirəm:

1. Basın Dayandırmaq + F11 Microsoft Visual Basic for Applications penceresini açmaq üçün eyni zamanda düymələri.

2. klik Taxmaq > Modules, aşağıdakı VBA kodunu kopyalayın və açılan modul penceresine yapışdırın.

VBA: Exceldə bağlanmadan aktiv iş kitabı silin

Sub DeleteActiveWorkbook()
Dim xFullName As String
xFullName = Application.ActiveWorkbook.FullName
ActiveWorkbook.Saved = True
Application.ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill xFullName
Application.ActiveWorkbook.Close False
End Sub

3. Basın F5 açar və ya qaçış bu VBA'yı çalıştırmak üçün düyməsini basın.

Qeydlər:

(1) Bu VBA aktiv iş kitabını silə bilər, ancaq Excel pəncərəsini bağlaya bilmir. Aktiv kitabçanın silinməsindən sonra heç bir iş kitabının açılmaması halında, Excel penceresini əl ilə bağlayın.

(2) Əgər aktiv iş kitabı daha əvvəl qeyd edilməmişsə, bu VBA onu silə bilməz. Buna baxmayaraq, bu saxlanmayan iş kitabını birbaşa bağlayaraq silə bilərsiniz.



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.
  • To post as a guest, your comment is unpublished.
    Randy · 8 days ago
    Very angry. I accidentally created a workbook. Seems like I'll have to do some code editing to kill the workbook, IF that works and I know the basics. What the HE*L. Come on guys... what's up?