Sayfalardaki Satır Yüksekliklerini Aynı Yapma.

pisagor26

Altın Üye
Katılım
18 Kasım 2009
Mesajlar
196
Excel Vers. ve Dili
excel 2007 türkçe
Değerli Üstadlar; yaklaşık 150 sayfadan oluşacak bir çalışmada her sayfada (sayfa B1) aynı tablolar yer almakta olup, bu tabloların satır yükseklikleri birbirinden farklılık göstermektedir. Yazıcıdan çıktı almak için;İlk sayfada düzenlemiş olduğum satır yüksekliklerini (satır2=22 piksel, satır3=30 piksel, satır4=29 piksel, satır 5=23 piksel gibi) diğer tüm sayfalarda da aynı olacak şekilde kısa yoldan yapabilir miyim...Teşekkür ettim...
 

Ekli dosyalar

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
41,327
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Tüm sayfaları seçip satır yüksekliklerini ayarlamayı denediniz mi?
 

Muzaffer Ali

Destek Ekibi
Destek Ekibi
Katılım
5 Haziran 2006
Mesajlar
5,803
Excel Vers. ve Dili
2019 Türkçe
Merhaba.

Sayın Korhan Ayhan'ın dediği gibi yapabilirsiniz. Şöyle ki;
En soldaki sayfa seçili iken "Shift" tuşuna basılı tutup en sağdaki sayfayı seçin.
Bu şekilde bütün sayfaları seçmiş oldunuz.

Şu anda aktif olan sayfada yapacağınız değişikliklerin hepsi bütün sayfalarda geçerli olacaktır.
İşinizi bitirdikten sonra herhangi bir sayfayı seçin.

Eğer bu işlemi kod kullanarak yapmak isterseniz dosyanız yeni bir Module ekleyin aşağıdaki kodu kopyalayın ve çalıştırın.

Kod:
Sub SatirBoyutu()
    Dim syf As Worksheet
    Dim Bak As Variant
    Dim BuSayfalarHaric() As Variant
    BuSayfalarHaric = Array("A", "Test") 'Satır yüksekliğini değiştirmek istemediğiniz sayfa adlarını buraya yazın.
    For Each syf In ThisWorkbook.Worksheets
        Bak = Application.Match(syf.Name, BuSayfalarHaric, False)
        If IsError(Bak) Then
            syf.Rows(2).RowHeight = 22
            syf.Rows(3).RowHeight = 30
            syf.Rows(4).RowHeight = 29
            syf.Rows(5).RowHeight = 23
        End If
    Next
End Sub
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
41,327
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Sayfaları seçtikten sonra sırayla satırları seçip ayarlayın.
 
Üst