İ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ə müəyyən / cari olanlardan başqa bütün vərəqləri necə silmək olar?

Bir Excel iş kitabında göstərilən bir və ya cari aktiv hesabatı istisna olmaqla, bütün təbəqələri silmək üçün bu göstərilən üsullardan istifadə edə bilərsiniz.

VBA kodu ilə müəyyən edilmiş istisna olmaqla, bütün təbəqələri silin

Excel-də Kutools ilə cari aktiv bir istisna olmaqla, bütün sheets silmək üçün bir klik


Cari iş kitabında aktiv istisna olmaqla, bütün işləri tez silin:

The Bütün aktiv olmayan səhifələri silmək faydası Excel üçün Kutools aktiv iş istisna olmaqla, mövcud iş kitabında bütün iş yerlərini asanlıqla silmək kömək edir. Ekran görüntüsünə baxın:

Excel üçün Kutools 300-dən çox lazımlı Excel alətləri daxildir. 60 gün ərzində heç bir məhdudiyyətsiz cəhd edin. İndi pulsuz sınaq yükləyin


VBA kodu ilə müəyyən edilmiş istisna olmaqla, bütün təbəqələri silin


VBA kodunun altındakı bir Excel kitabında istisna olmaqla, bir iş kitabında bütün səhifəni silə bilərsiniz.

1. Basın Dayandırmaq + F11 açmaq üçün eyni anda düymələri Microsoft Visual Basic tətbiqi pəncərə.

2. klik Taxmaq > Modules, sonra VBA kodu aşağıda Modul penceresine kopyalayın və yapışdırın.

VBA kodu: qeyd olunanları istisna olmaqla, bütün təbəqələri silin

Sub DeleteSheets1()
	Dim xWs As Worksheet
	Application.ScreenUpdating = False
	Application.DisplayAlerts  = False
	For Each xWs In Application.ActiveWorkbook.Worksheets
		If xWs.Name <> "Sheet1" And xWs.Name <> "Sheet2" Then
			xWs.Delete
		End If
	Next
	Application.DisplayAlerts = True
	Application.ScreenUpdating = True
End Sub

Qeydlər:

1. "Sheet1"Və"Sheet2"Cari iş kitabında saxlamaq istədiyiniz çarxlar var. Siz onları ehtiyaclarınıza görə dəyişə bilərsiniz.

2. Daha çox cədvəl saxlamaqdan başqa bütün silmək istəyirsinizsə, kod əlavə edin Və xWs.Name <> "hesabatın adı" əvvəl Sonra kodun altıncı xəttindəki sözü. Kimi:

Əgər xWs.Name <> "Sheet1" Və xWs.Name <> "Sheet2" Və xWs.Name <> "hesabatın adı" Sonra

3. Yalnız bir hesabatı saxlamaq və iş kitabından hamısını silmək istəyirsinizsə, hamısını çıxarın kodda vəziyyət. Məsələn, saxta1-ni cari iş kitabında saxlamağınız üçün altıncı satır kodunu dəyişdirməlisiniz: Əgər xWs.Name <> "Sheet1" Sonra


Excel üçün Kutools ilə cari aktiv bir istisna olmaqla bütün sheets silin (yalnız bir klik)

You yalnız bir klik ilə cari aktiv hesabatı istisna olmaqla, bütün təbəqələri asanlıqla silə bilər Bütün aktiv olmayan səhifələri silmək faydası Excel üçün Kutools.

Excel üçün Kutools : 300-dən çox lazımlı Excel eklentisi ilə, 60 gün ərzində heç bir məhdudiyyət olmadan cəhd edin.

1. klik Müəssisə > İş > Bütün aktiv olmayan səhifələri silmək. Ekran görüntüsünə baxın:

3. Sonra aktiv bir istisna olmaqla, bütün vərəqləri silmək üçün müəyyən etdiyiniz bir informasiya qutusu açılır OK düyməsini basmayın, əksinə, vurun ləğv etmək düyməsini basın.

Sonra bütün səhifələr iş kitabınızdakı cari aktivdən başqa silinir.

İpucu.Bu yardım proqramının pulsuz bir sınaq versiyasını istəyirsinizsə, xahiş edirəm proqramı sərbəst yükləyin birincisi, sonra yuxarıdakı addımlara uyğun olaraq əməliyyata müraciət edin.


Excel üçün Kutools ilə seçilmiş hüceyrələrin ortasında mətni əlavə edin

Excel üçün Kutools 300-dən çox lazımlı Excel alətləri daxildir. 60 gün ərzində heç bir məhdudiyyətsiz cəhd edin. İndi pulsuz sınaq yükləyin!



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.