• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

çalışma kitabında kaç yazdırılabilir sayfa var?

  • Konbuyu başlatan Konbuyu başlatan sunkid
  • Başlangıç tarihi Başlangıç tarihi
Katılım
21 Haziran 2007
Mesajlar
213
Excel Vers. ve Dili
Ev de Office 2013 Türkçe
İş'te Office 2007 -2010 English
Merhaba Aradaşlar,

farklı sheetlerden oluşan bir excel çalışma kitabım var toplamda bu çalışma kitabında kaç yazdırılabilir alan olduğunu nasıl öğrenebilirim. Mesala shee1 de 7 sheet2 de 15 sayfa var gibi yada toplam 22 sayfa var gibi.

Şimdiden çok saolun
 
yokmudur üstadlar böyle birşey
 
Aşağıdaki kodu deneyiniz.

Kod:
Sub Yazdirilacak_Sayfa_Sayisi()
    For Each Sayfa In ThisWorkbook.Worksheets
        Say = Say + (Sayfa.HPageBreaks.Count + 1) * (Sayfa.VPageBreaks.Count + 1)
    Next
    
    MsgBox Say
End Sub
 
hocam süpersiniz elinize sağlık
 
Geri
Üst