yazdırma alanları belli olan sayfaların yazdırılması

[latimera]

S.A üstatlar

4 sayfadan oluşan çalışma dosyasında "YAZDIRMA ALANI BELLİRLENMİŞ" alanların hepsinin yazdırılması mümkün mü?

Not: yazdırma alanları makro ile belirlenmiştir.

 

[Seyit Tiken]

Bu şekilde bir deneyiniz.

Sub Yazdır()
For s = 1 To Sheets.Count
Sheets(s).PrintOut
Next
End Sub

 

[latimera]

Sayın Seyit bey,

1 sayfanın çıktısını aldı sonra boş kağıt verdi. sonrada 3 . satırda hata verdi.

Bu şekilde bir deneyiniz.

Sub Yazdır()
For s = 1 To Sheets.Count
Sheets(s).PrintOut
Next
End Sub

 

[Seyit Tiken]

Birde şöyle bir deneyin.

Sub Yazdır()
For s = 1 To 4
Sheets(s).PrintOut
Next
End Sub

Bu kod, Çalışma Kitabındaki 4 sayfayı yazdırır. Sizin bahsetmiş olduğunuz yazdırılma alanı, sayfalardan mı oluşuyor, yoksa, tek sayfadan oluşup alt alta mıdır?

 

[latimera]

Seyit bey makro olduda neden ilk 4 sayfayı baz alıyor

aşağıdaki örnek olursa nasıl bir makro yazılması lazım

sayfa1
sayfa2 yazdırma alanı belli
sayfa3
sayfa4yazdırma alanı belli
sayfa5
sayfa6yazdırma alanı belli
sayfa7
sayfa8 yazdırma alanı belli

Birde şöyle bir deneyin.

Sub Yazdır()
For s = 1 To 4
Sheets(s).PrintOut
Next
End Sub

Bu kod, Çalışma Kitabındaki 4 sayfayı yazdırır. Sizin bahsetmiş olduğunuz yazdırılma alanı, sayfalardan mı oluşuyor, yoksa, tek sayfadan oluşup alt alta mıdır?

 

[Emir Hüseyin Çoban]

. . .

Merhaba.
Yazdırma alanları sürekli değişken durumda mı ?

. . .

 

[latimera]

İsimleri sabit ama her firma açtığımda yazdırma alanı belli olan sayfalar geriliyor.

. . .

Merhaba.
Yazdırma alanları sürekli değişken durumda mı ?

. . .

 

[Emir Hüseyin Çoban]

. . .

Bir örnek ekleyin. Hangi sayfaların hangi alanlarını yazdırmak istiyorsunuz üzerinde gösterin. İnceleyelim.

. . .

 

[latimera]

Dosya ektedir.

İsimleri sabit ama her firma açtığımda yazdırma alanı belli olan sayfalar geriliyor.

 

[latimera]

Ek'teki dosyada

Kart sahil merkez makro ile belirlenmiş yazdırma alanları ÖZET sayfasında 4 satırlık bir alan bunları otomatik yazdırmak istiyorum

. . .

Bir örnek ekleyin. Hangi sayfaların hangi alanlarını yazdırmak istiyorsunuz üzerinde gösterin. İnceleyelim.

. . .

 

[latimera]

Üstatlar S.A

konu halen aktif yorum /fikir / önerirlerinizi bekliyorum

Ek'teki dosyada

Kart sahil merkez makro ile belirlenmiş yazdırma alanları ÖZET sayfasında 4 satırlık bir alan bunları otomatik yazdırmak istiyorum