Aktif Sayfanın Solundaki Sayfalara Format Atma

[ozuberk]

Merhaba aktif sayfanın solundaki sayfaların (birden fazla) içindeki E sütununa sayı formatı atmak istiyorum. Konu hakkında yardımcı olabilir misiniz?

 

[muysun35]

sayfadan kasıt worksheet mi? yoksa page mi? örnek dosyayla daha açıklayıcı olsanız..?

 

[ozuberk]

Aktif sayfanın (page) solundaki sayfalar. Örnek Dosya

 

[muysun35]

eğer değer aralığı sabit kalacaksa bunu kullanın
Sub formatla()
For iCount = 1 To 8 'Worksheets sayısı
Worksheets(iCount).Select
Range("E4:E" & Cells(Rows.Count, 1).End(xlUp).Row).NumberFormat = "0"
Next iCount
End Sub

 

[ozuberk]

Yardımlarınız için teşekkür ederim elinize sağlık.

 

[muysun35]

Yardımlarınız için teşekkür ederim elinize sağlık.

rica ederim. İyi çalışmalar.