Çözüldü Birden Fazla Sayfayı Sayfaya Sığdırma Makrosu

Bu sorun verilen destek sayesinde çözüme ulaştırılmıştır.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

teyadih

Bronz Üye
Kullanıcı Bilgileri
Katılım
13 Ağu 2021
Mesajlar
524
Aldığı beğeni
104
Excel Versiyonu
Office 2016 EN
Konuyu Başlatan
Merhaba arkadaşlar. Örnek dosyada da açıkladığım üzere belirli SATIR aralıklarını dikkate alarak birden fazla sayfa için sayfaya sığdırma makrosuna ihtiyacım var. Umarım anlatabilmişimdir? Teşekkür ederim.
 

Ekli dosyalar

  • sayfaya sığdır.xlsm
    440.7 KB · Gösterim: 2

teyadih

Bronz Üye
Kullanıcı Bilgileri
Katılım
13 Ağu 2021
Mesajlar
524
Aldığı beğeni
104
Excel Versiyonu
Office 2016 EN
Konuyu Başlatan
Kodun belgedeki mevcut koddaki gibi açılışta veya sayfa değiştiğinde çalışacak şekilde ayarlanması daha pratik olacaktır
 

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,516
Aldığı beğeni
1,520
Excel Versiyonu
Office 365 TR
Deneyin sorun olursa görüşelim modül 1 içindeki SATIR numaralarını değiştirerek işlem yapabilirsiniz
CSS:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 

Ekli dosyalar

  • sayfaya sığdır.xlsm
    440 KB · Gösterim: 1
Son düzenleme:

teyadih

Bronz Üye
Kullanıcı Bilgileri
Katılım
13 Ağu 2021
Mesajlar
524
Aldığı beğeni
104
Excel Versiyonu
Office 2016 EN
Konuyu Başlatan
Merhaba Adnan bey. Teşekkür ederim elinize sağlık. Dün işe gitmediğim için ancak dönüş yapabildim.
Örnek dosyanızı kendime göre uyarladım.
1.sayfayı 155
2.sayfayı 265
3.sayfayı 265 sonrası olarak güncellediğimde sayfa sonlarını belirtilen satırdan itibaren bitirdi ancak SATIR ayarları yapmadığı için
122.satıra kadar 1.sayfaya aldı
155.satıra kadar olanı ise 2.sayfaya kaydırdı.
3.sayfayı belirtiğim gibi 155.den başlattı ama onu da 255 e kadar alıp kalanını 3.sayfaya devretti
Yani ön izlemeden de görüleceği üzere sayfalar ayarlanmış ama SATIR yüksekliğini yapmadığı için diğer sayfaya kaymış.
Tabloyu incelediğinizde görüleceği üzere tabloda gizli satırlar var.
Hakim ve personel sayısı değiştiğinde gizli satırlar açılıyor veya açık satırlar gizleniyor.
Bu nedenle sayfa sonları gibi SATIR yüksekliğinin de ayarlanması gerekiyor Adnan bey.
Yani belirtilen satıra kadar olan bilgilerin sayfaya sığması gerekiyor.
Makroyu uyguladığım örnek dosyayı gönderiyorum
Umarım anlatabilmişimdir. Teşekkür ederim.
 

Ekli dosyalar

  • sayfaya sığdır.xlsm
    436.9 KB · Gösterim: 0

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,516
Aldığı beğeni
1,520
Excel Versiyonu
Office 365 TR
SATIR yüksekliğini ayarladığımda çok ağır işlem yapıyor sizde ilgili kodu deneyin belki benim pc dendir
CSS:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 

teyadih

Bronz Üye
Kullanıcı Bilgileri
Katılım
13 Ağu 2021
Mesajlar
524
Aldığı beğeni
104
Excel Versiyonu
Office 2016 EN
Konuyu Başlatan
Adsız.png

Uyguladığımda bu hatayı verdi Adnan bey. Nerde hata yaptım acaba. Size zahmet kodu örnek dosyaya ekleyip gönderebilir misiniz?
Birde SATIR yüksekliği nedeniyle kasmasını önlemek için kodu düğmeye ile çalıştırsak daha mı iyi olur Adnan bey
 

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,516
Aldığı beğeni
1,520
Excel Versiyonu
Office 365 TR
farklı uzantı kayıtlı
 

Ekli dosyalar

  • sayfaya sığdır.xlsb
    407.7 KB · Gösterim: 3
  • sayfaya sığdır.xlsm
    442.3 KB · Gösterim: 4
Çözüm

teyadih

Bronz Üye
Kullanıcı Bilgileri
Katılım
13 Ağu 2021
Mesajlar
524
Aldığı beğeni
104
Excel Versiyonu
Office 2016 EN
Konuyu Başlatan
Teşekkür Adnan bey elinize sağlık.
her iki uzantılı örneği açtığımda
1.sayfa yine ikinci sayfaya taşmış yani SATIR yüksekliğini ayarlamamış.
2.sayfa SATIR yüksekliğini ayarlamış ama çok sıkıştırdığı için sayfanın altında boşluk kalmış
3.sayfa altında boşluk olmasına rağmen 1 SATIR taşmış. zaten az olduğu için sıkıştırıp sıkıştırmadığının belirleyemedim.
Yapılabilir mi bilmiyorum ama tüm sayfaları 2.sayfa gibi sıkıştıracak ama SATIR yüksekliğini de ayarlayarak sayfaya yayması gerekiyor.
SATIR ve sütun genişliğini sayfaya yayacak şekilde sığdırmayacaksa uğraşmayın Adnan bey. Sizi de çok yordum hakkınızı helal edin.
 

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,516
Aldığı beğeni
1,520
Excel Versiyonu
Office 365 TR
size örnek yaptım görmeniz için siz aynı örneği altına kopyalayın SATIR numaralarını değiştirin. İstediğiniz SATIR aralığını karşısına yazın. Bun yapabilirsiniz
 

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,516
Aldığı beğeni
1,520
Excel Versiyonu
Office 365 TR
Rica ederim selamlar
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Konuyu okuyanlar

Üst