İ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 hesabat istisna olmaqla, bütün təbəqələri necə çap etmək olar?

Excel-də işləyərkən çap plitələri sizin üçün ümumi gündəlik iş ola bilər. Bununla belə, bütün təbəqələri, lakin bir xüsusi hesabatı çap etməyə çalışdınızmı? Məsələn, burada bir iş kitabı, bütün çarxları çap etmək istəyirik, ancaq "Total" adlı hesabatı necə idarə edə bilərsiniz?

VBA ilə bir istisna olmaqla, bütün səhifəni çap et

Excel üçün Kutools ilə lazım olan müəyyən səhifələri yazdırınyaxşı fikir3


VBA ilə bir istisna olmaqla, bütün səhifəni çap et


Burada xüsusi bir hesabat istisna olmaqla, bütün təbəqələri çap edə bilən VBA kodudur.

1. Çarşafları çap etmək istədiyiniz iş kitabçasını aktivləşdirin və basın Alt + F11 düymələrini açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. klik Taxmaq > module, kodu aşağıda Modul skriptinə yapışdırın.

VBA: Biri başqa istisna edir

Sub printsheets()
'UpdatebyExtendoffice20161031
 Dim xWs As Worksheet
 Application.ScreenUpdating = False
 For Each xWs In ThisWorkbook.Worksheets
  If xWs.Visible = True Then
   If xWs.Name <> "Total" Then
       With xWs.PageSetup
        .PrintArea = "A1:B15" ' USE YOUR PRINTAREA
        .Zoom = False
        .FitToPagesTall = 1
        .FitToPagesWide = 1
       End With
       xWs.PrintOut
   End If
  End If
 Next xWs
 Application.ScreenUpdating = False
 MsgBox "Sheet “Total” has not been printed", vbInformation, "Kutools for Excel"
End Sub

1 xaricində doc yazdırın

Qeyd: Kodda, Ümumi in Əgər xWs.Name <> "Toplam" SonraMsgBox "Sheet Total" yazılmamışdır " yazdırmaq istəmədiyiniz və hesabatın adıdır A1: B15 in .PrintArea = "A1: B15" hər bir hesabatı çap etmək istədiyiniz sıra. Sizə lazım olanları dəyişə bilərsiniz.

3. Basın F5 kodu açmaq üçün düyməni basın və sonra xüsusi bir hesabat yazılmadığını xatırlatmaq üçün bir dialoq çıxır. Ekran görüntüsünə baxın:
2 xaricində doc yazdırın

4. klik OK dialoqun bağlanması.


Excel üçün Kutools ilə lazım olan müəyyən səhifələri yazdırın

Yalnız bir və ya tək səhifəni və ya bir səhifənin xüsusi səhifələrini çap etmək istəyirsinizsə, müraciət edə bilərsiniz Excel üçün Kutools'S Belirlenmiş Sayfaları Yazdır tez bir xeyir verə bilər.

Excel üçün Kutools, daha çox 120 lazımlı funksiyaları, işinizi asanlaşdırır.

Quraşdırıldıqdan sonra Excel üçün Kutools, aşağıdakıları edin :(Excel İndi Pulsuz Kutools İndirin!)

1. Müəyyən səhifələri yazdırmaq istədiyiniz hesabatı aktivləşdirin, basın Müəssisə > Çap > Belirlenmiş Sayfaları Yazdır. Ekran görüntüsünə baxın:
3 xaricində doc yazdırın

2. Sonra da Belirlenmiş Sayfaları Yazdır dialoq, çap ehtiyacına əsaslanan variantları yoxlayın. Ekran görüntüsünə baxın:
4 xaricində doc yazdırın

3. klik çap səhifələri çap etmək.

İpucu. Print Specified Pages funksiyasını pulsuz sınaq etmək istəyirsinizsə, Excel üçün pulsuz Kutools download edin birincisi, sonra yuxarıdakı addımlara uyğun olaraq əməliyyata müraciət edin.



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.