sayfa sayısını bulmak

[cihangirkara]

arkadaşlar benim bir excel dosyam var ve bunun içinde çok fazla sayfa var ve devamlı ekleniyor kaç tane sayfa olduğunu nasıl bulabilirim teşekkürler

 

[cihangirkara]

arkadaşlar lütfen
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

 

[Levent Menteşoğlu]

Sayfa sayısını aşağıdaki kodla bulabilirsiniz.

[vb:1:11266f061c]sub sayfasayisi()
msgbox sheets.count
end sub[/vb:1:11266f061c]

 

[INSMUH]

Sn:leventm, çalışma kitabında;
"... kadar gizli, ...kadar görünür sayfa var" olabilir mi?
İyi çalışmalar.

 

[veyselemre]

[vb:1:9f6bc2a402]Sub sayfasayisi()
gizlisay = 0
For x = 1 To Sheets.Count
If Sheets(x).Visible = False Then gizlisay = gizlisay + 1
Next x
MsgBox "Çalışma sayfasında " & gizlisay & " adet gizli, " & Sheets.Count - gizlisay & " adet görünür sayfa var"
End Sub[/vb:1:9f6bc2a402]

 

[Haluk]

......
kaç tane sayfa olduğunu nasıl bulabilirim
......

Bir alternatif de ektedir ...

Denemek için sayfa ekleyip veya çıkarttıktan sonra, formulün olduğu hücreye F2 tuşu ile girip, çıktıktan sonra hücredeki değer güncellenir.

 

[INSMUH]

Sn:veyselemre, ve Sn:Haluk,
Çok teşekkür ederim, İyi çalışmalar. :hey:

 

[heredots]

peki arkadaşlar bunu formülle nasıl yaparız, yani bir hücreye formül girerek kaçtane çalışma sayfası olduğunu nasıl tespit edebiliriz.

 

[Ömer]

peki arkadaşlar bunu formülle nasıl yaparız, yani bir hücreye formül girerek kaçtane çalışma sayfası olduğunu nasıl tespit edebiliriz.

Merhaba,

Bu işlemi yerleşik fonksiyonlarla yapamazsınız, fakat Excel 4 macro (xlm) fonksiyonlarını kullanarak yapabilirsiniz.

Uygulama;

Ad tanımlamaya girerek

say adı ile,

=AL.ÇALIŞMAKİTABI(4)

formülünü tanımlayın.

Bu işlemde sonra herhangi bir hücreye,

=say

yazarsanız istediğiniz sonuçu alabilirsiniz.

.