AccessTr.neT

Tam Versiyon: Accessde Vba Kodu İle Kapalı Excel Dosyasını Yazdırmak
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3 4 5 6 7 8
Bir daha yazayım.Yazdırılacak excelin yazıcı ayarlarına girip ordan her yazıcı ayarını istediğiniz gibi ayarlarsanız kaydedilir ve ömür boyu öyle kullanırsınız Img-grin
Sadece standart kıdla exceli açıp direkt yazdırmak kalır geriye.xlApp.activesheet.print gibi kodla direkt yazdırırsınız tabii kodu salladım Img-grin

Böyle biliyorum.
Mesela Excel de sayfa1 canondan A4 sayfa2yi hpden A5 e sayfa3 farklı bir yazıcıdan yatay A5 falan gibi ayarlasak kaydetsek sonrada accessden sadece yazdır komutu versek yeterli oluyor mu 
Gerçi bu soruyu 5.mesajda da sormuştum ama arada kaynadı galiba
Direkt yazdır deyşp yazıcı seçtirmezsenşz zaten aktif yazıcı neyse onunla işlem yapar.

Buna göre sayfalar standart ve yazıcılarıda excekde sendkeys diye yöntem vardı onunula yazıcılar seçtirilir Img-grin
Yani sayfa1.select sonra yazıcı ekranı sonra sendkeys ile yazıcı seçtirilir yani mesela hp seçeneklerde 3.cü sradaysa yazıcı seç açtırlılıp 3 sıra alta geötirilir sendkeys ile ve hp işaretlenip sendkeys ile tamama tıklatılır.Diğerde böyle olur.Tabii dediğim gibi standart olacaksa lu sayfa şu yazıcı dan çıkart gibi.

Tabii düşüncem bu olurmu bilmem lakin 99% olur sanıyorum.Çünkü sendkeys ile sizin hiç bişeye basmanıza gerek yok.Hatta bulabilirsem bir video atarım örnek için sendkeys olayına.
Biraz karılık anlatmış olabilirim lakin zor bişey değil.
Videoyu izlemiştim gerçi adamın konuşmalarına gıcık oluyorum ama güzel anlatmış Img-grin
Videoyu izlersen çok kıd var diye gözün korkmasın sendkeys ile.Adam kodun çalışırken 2 saniye bir saniye gibi bekletmesi için function yazmış.
Yada senin şu Api ile olan kod şöyle kullanlabilir ve daha basit olur gibi.

Excel açılıyorya sonra şu sayfayı select yap deyince Apili kod ile yazı adı girilir tek satırlık kodla.Diğer sayfalar içinde aynı yöntem uygulanır bence.

Hayırlı geceler abey.
Sayfalar: 1 2 3 4 5 6 7 8