Soru OTOMATİK YAZDIRMA SAYISI

[mc_exrem]

Merhabalar,

Etiket yazdırmak için kullanmış olduğum sayfada içerisindeki veriler değişmektedir. resimde 277 numaralı siparişten 7 adet etiket almaktayım. ( 277/7) Bir buton ekleyip ona tıkladığımda kopya sayısını kendisi otomatik 7 adet etiket yazdırma işlemini gerçekleştirebilir miyim acaba?

İyi Çalışmalar.

 

[Ömer BARAN]

Merhaba.
Sorularınızı; gerçek belgenizin, özel bilgi içermeyen bir kopyası şeklinde hazırlayacağınız örnek belge üzerinden sorunuz.
Cevap veren kişi de çözüm önerisi olarak, işlemin gerçekleştirildiğine dair bir video (veya gif uzantılı görüntü) yüklerse ne diyeceksiniz?

Destek verecek olanlardan;
-- görüntüdekine benzer bir belge oluşturmasını (hücre birleştirmeleri/nesneler vs işini halledecek),
-- uygulamayı deneyip sorunsuz olduğunu gördükten sonra cevap yazmasını
beklediğinizin farkında mısınız?

Tabi tercih sizin ancak bu şekilde sonuca ulaşmanız biraz zor.
Cevap yazılsa bile, verilen cevap asıl belgeye uygulanırken sorun yaşanması ve yeni soru-cevapların ardından gelmesi normal bir durum.
Böyle olunca da birçok üyenin, konuya hiç müdahil olmamayı tercih etmesi garip olmaz.

Kolay gelsin.
.

 

[mc_exrem]

Merhaba.
Sorularınızı; gerçek belgenizin, özel bilgi içermeyen bir kopyası şeklinde hazırlayacağınız örnek belge üzerinden sorunuz.
Cevap veren kişi de çözüm önerisi olarak, işlemin gerçekleştirildiğine dair bir video (veya gif uzantılı görüntü) yüklerse ne diyeceksiniz?

Destek verecek olanlardan;
-- görüntüdekine benzer bir belge oluşturmasını (hücre birleştirmeleri/nesneler vs işini halledecek),
-- uygulamayı deneyip sorunsuz olduğunu gördükten sonra cevap yazmasını
beklediğinizin farkında mısınız?

Tabi tercih sizin ancak bu şekilde sonuca ulaşmanız biraz zor.
Cevap yazılsa bile, verilen cevap asıl belgeye uygulanırken sorun yaşanması ve yeni soru-cevapların ardından gelmesi normal bir durum.
Böyle olunca da birçok üyenin, konuya hiç müdahil olmamayı tercih etmesi garip olmaz.

Kolay gelsin.
.

dosyayı ekledim
https://drive.google.com/file/d/1RDtbtKlysqjpc4SvUkK0srJeDBAgUS20/view?usp=sharing

 

[turist]

VBA'daki "OTOMATİK ETİKET" Sayfa kod bölümüne;

Private Sub CommandButton1_Click()
Dim kopya As Long: kopya = [D6].Value
ActiveWindow.SelectedSheets.PrintOut Copies:=kopya, Collate:=True, IgnorePrintAreas:=False
End Sub

uygulayıp deneyin.

 

[mc_exrem]

VBA'daki "OTOMATİK ETİKET" Sayfa kod bölümüne;

Private Sub CommandButton1_Click()
Dim kopya As Long: kopya = [D6].Value
ActiveWindow.SelectedSheets.PrintOut Copies:=kopya, Collate:=True, IgnorePrintAreas:=False
End Sub

uygulayıp deneyin.

Teşekkürler ilginiz için. Kodu ekleyince bu uyarı çıkıyor. evet diyorum çalışmıyor, hayır deyip farklı kaydediyorum yine çalışmıyor.

 

[turist]

Dosyanızın Linki

İndirip kullanın.

 

[mc_exrem]

Dosyanızın Linki

İndirip kullanın.

teşekkürler ilginiz için ama Ctrl+P yapınca bu sayfada 13 adet çıkması gerekirken yine 1 adet çıkıyor.???

 

[turist]

Ctrl+P ile değil Makro butonunu çalıştırarak denediniz mi?

 

[mc_exrem]

Ctrl+P ile değil Makro butonunu çalıştırarak denediniz mi?

tamam teşekkürler o buton ile oldu. Emeğinize sağlık

 

[turist]

Sağolun.