a4 sayfasını ıkıye bölup otomatık yazdırmak

[kakara]

Merhaba ustadlarım elımdekı dosyadan otomatık cıktı almak ıstıyorum 60 tablo var dosyamda ıstedıgım sey her ıkı tabloyu bır a4 dort cıktısına dıkey olarak cıktı vermesı ilginiz için sımdıden tesekkurler. eklı dosyamda da sıze anlatmaya calıstım

 

[BaY_KaPTaN]

Merhaba.
Ekli dosyayı anladığım kadarıyla yazdırma alanı belirleyerek düzenledim.
A ve B sütunu yazdırma alanıdır. C ve sonrası için birşey yazsanızda çıkmaz, bilginiz olsun.

 

[kakara]

@BaY_KaPTaN ustadım bu sekılde alt alta 60 tane tablo var hepsını makro ıle tek seferde 1 a4 sayfasında ıkı tablo olacak sekılde yapabılır mıyız ? ılgınız ıcın tesekkurler

 

[BaY_KaPTaN]

K.bakmayın, iş yoğunluğumdan dolayı bakamadım.
Yani başka türlü bunun yapılması zor (bence).
Alt alta olunca sayfada yazdırma alanı ile oluşturmak, Baskı Önizlemesi ile bakarak ayarlamak lazım.

Onun yerine ilk sayfa tamamsa eğer, verileri 2. sayfaya yazıp, ilk şablona sırayla aktararak o şekilde yazdırılabilir.

 

[kakara]

sorun devam etmekte ılgınız ıcın tesekkurler

 

[netzone]

Merhaba,

Sorunuzdan anladığımı teyit etmek isterim: 1 A4 4 eşit parçaya bölünmüş etiketten oluşmakta ve siz bu etiketlere denk gelecek şekilde 1,2 sayfalar alt alta gelsin yanlarındaki sayfayla birlikte istiyorsunuz.

Yazıcınız destekler mi bilmiyorum;
Sayfa yönünü yukardan aşağı yerine sodan sağa yapıp, Görünüm > Sayfa sonu ön izleme seçilip >> sayfa sınırlarınızı düzenledikten sonra Yazdırma ekranından Yazıcı özelliklerinize girip 4 sayfayı tek A4 e basmasını isteyebilirsiniz.

Ya da

Yine aynı yolu izledikten sonra yazıcınızda böyle bir özellik yoksa, dosyanızı PDF olarak yazdırın, yazdırdığınız dosyayı tekrar açıp Yine PDF olarak yazdır diyerek 4 Sayfanın tek 1 sayfaya sığdırmasını isteyin. Eşit olarak her sayfa 1 A4 e sığmış olacaktır.

 

[BaY_KaPTaN]

sorun devam etmekte ılgınız ıcın tesekkurler

Sorun değil aslında sizinkisi, bir kalıba sokmuşsunuz kendinizi illada o diyosunuz tabiri caizse

Size bir yol daha önerdim, 2. sayfaya verilerinizi yazarsınız o hücrelere gelecek olan verileri, Yazdırılacak sayfada kenara Liste yapıp (Barkoda göre mesela) siz yazınca o sayfayı yazdıracak sadece o barkodu. Ha hepsini tek seferde yazsın diyorsanız da yine oluşturduğunuz listede baştan başlayarak kendisi sona kadar tek tek yazdırır.

Özet geçersek;
Makroyla yapılacaksa eğer;
1- Yazdırma Şablonu yapılır.
2- Aşağıdaki gibi Liste hazırlanır.

SKU	DESCRIPTION	BARCODE	STORE	COUNTRY	PO NUMBER	BOX NUMBER	VENDOR NAME
173951251​	CATCH ME WOMEN SHORT SLEEVE CAPRI SET 3112887930	8682246938020	100​	TURKEY	59184980​	1​	YZC

3- Makroyla veya Manuel yazdırma yapılır.

Başka türlü tek yol, eğer bu çıktı 1 defaya mahsus ise,
60 sayfayı tek tek size gönderdiğim şekilde elle ayarlamak olur.

 

[BaY_KaPTaN]

Dosyayı yeniden açınca farkettim,
Zaten bir listeleme varmış ve Kopya koli ustu panda 2. siparis dosyasından alıyormuş.
SKU değiştikçe diğer hücrelerde hemen hemen (PO NUMBER, VENDOR NAME gibi veriler hariç) değişiyor.

Aşağıdaki kod size gönderdiğim şablona göre uyarlanmıştır.
B1'de (Yani SKU kodunda) değişiklik olunca yani siz yazdırılacak olan SKU kodunu seçince listeyi günceller ve o sayfayı yazdırır.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, [B1]) Is Nothing Then Exit Sub
        Application.Wait Now + TimeSerial(0, 0, 2)  'güncelleme için 2 sn bekleyelim.
        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
                IgnorePrintAreas:=False
End Sub

 

[kakara]

@BaY_KaPTaN ustadım bende sızlerden alt alta 60 tane olan tabloda ( bu tek barkod ıcın bunun gıbı 20 tane daha barkod var ) her ıkı tabloyu tek a4 sayfasına yarı yarıya gelıcek sekılde yazdırabılır mıyız ? demek ıstemıstım box number degısıyor ya da suda olabılır 50 satırı bır sayfaya ıkıye bolerek yazsın sonra 51. satırdan baslayıp 101 e kadar olan bolumu a4 saysafısını ıkıye bolerek yazsın bu sekılde son dolu satıra kadar devam etsın. ılgınız ıcın tesekkur ederım

 

[BaY_KaPTaN]

Ekte 1 ve 2 nolu dosya var.
Siz hangi formatta çıktı almak istiyorsunuz_?

 

[kakara]

aslında bu sekılde cıktı almak ıstıyorum @BaY_KaPTaN ustadım bu sekılde her ıkı tablo 1 a4 sayfasına sıgacak sekılde sonra alttakı 2 tabloyu bır a4 e sıgdırıcak sonrakı ıkı tablo yıne bır a4 sayfasına sıgacak son tabloya kadar devam edıcek

 

[BaY_KaPTaN]

Ekli dosyayı denermisiniz_?
B1'de (Yani SKU kodunda) değişiklik olunca yani siz yazdırılacak olan SKU kodunu seçince listeyi günceller ve o sayfayı sizin istediğiniz şekilde yazdırır.

 

[kakara]

@BaY_KaPTaN Ustadım ılgınız ıcın tesekkurler malesef olmadı yazdırma ıslemını yapıyor ama sayfaya tam oturmuyor bır tabloyu ıkı farklı sayfada cıkarıyor

 

[BaY_KaPTaN]

@BaY_KaPTaN Ustadım ılgınız ıcın tesekkurler malesef olmadı yazdırma ıslemını yapıyor ama sayfaya tam oturmuyor bır tabloyu ıkı farklı sayfada cıkarıyor

11 nolu mesajınızdaki dosyaya göre yaptım.

Yazarken bazı şeyler anlatılamıyor/anlaşılamıyor/yanlış anlatılıp, anlaşılabiliyor.
O yüzden yine döküman (Resim/PDF) halinde istediğiniz şekli atarsanız ona göre ayarlayalım.