Çözüldü Son Satıra Kadar Yazdır ve Ön İzle

[Hsn55]

İyi akşamlar ekli dosyada Listbox1 den seçmiş olduğum sayfaları buton ile yazdır ve ön izle yapıyorum. Benim burada yapmak istediğim seçmiş olduğum sayfaların son satıra kadar olan kısımlarını ön izleme ve yazdırma işlemi yaptırmak istiyorum. Destek olursanız sevinirim
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[Hsn55]

Ekli dosyada Bordro İzle ve Bordro Yazdır makroları ile bordro sayfasındaki son satıra kadar ön izle ve yazdır işlemi yapıyorum. Benim istediğim Listbox1 de Personel girişi sayfası hariç diğer sayfaları seçtiğimde aynı işlemin diğer sayfalar dada geçerli olması .Yardımcı olursanız sevinirim .
Ön İzle Makrosu
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

Yazdır Makrosu
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[enginkapusuz]

Eklediğim kodu incelediğinizde BORDROİZLE prosedürünü bir yukarı aldığımı ve onun içinden "BORDROİZLESAYFA(shtName As String)" ListBox1'den aldığım değerle çağırdığımı göreceğiz. Aynı mantığı diğeri içinde uyguladığımızda sonuca ulaşırız.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[Artemis]

Ekdeki dosyayı deneyin.

 

[Hsn55]

Ekdeki dosyayı deneyin.

Çok teşekkür ederim. Ellerinize sağlık