ÇOKLU YAZDIRMA

[hakta85]

merhabalar Değerli Excel web.tr evinde 1 yılımı geride bıraktım sayesinde bana çok destek oldunuz bundan dolayı size bir kez daha teşekkür ederim. bir konuda desteğinize ihtiyacım var şimdiden teşekkür ederim canı gönülden

yapmak istediğim hazırlamış olduğum karneyi tek tek isim seçerek değil toplu olarak yazdırmak bunu PDF olarak ta yazdırılabilmesi bu konuda destekleriniz bekliyorum konu ile ilgili bir içerik dosyası sizlerle paylaşıyorum.

 

[hakta85]

muzaffer ali

www.excel.web.tr

 

[hamitcan]

Bu şekilde dener misiniz ? Şu anda baskı önizleme yapıyor. Yazdırmak için aşağıdaki gibi değişiklik yapın.
6 --> [d65536].End(3).Row
PrintPreview --> PrintOut

Sub Karne()
    For i = 3 To 6 '[d65536].End(3).Row
        Sheets("5.SINF KARNE").[C6] = Sheets("5.SINIF DENEME SINAVLARI").Cells(i, 4)
        Sheets("5.SINF KARNE").PrintPreview 'PrintOut
    Next
End Sub

 

[hakta85]

Bu şekilde dener misiniz ? Şu anda baskı önizleme yapıyor. Yazdırmak için aşağıdaki gibi değişiklik yapın.
6 --> [d65536].Bitiş(3).Satır
PrintPreview --> PrintOut
[KOD]Alt Karne()
i = 3 ila 6 '[d65536] için.End(3).Satır
Sheets("5.SINF KARNE").[C6] = Sheets("5.SINIF DENEME SINAVLARI").Cells(i, 4)
Sheets("5.SINF KARNE").PrintPreview 'PrintOut
Sonraki
Aboneliği Bitir[/CODE]
[/ALINTI]

merhabalar Öncelikle yardımlarınız için teşekkür ederim göndermiş olduğunuz kodlamayı ekledim de farklı bir kodlama çıkıyor rica etsem dosya üstünde uygulaya bilirimsiniz. Teşekkür ederim .

 

[hakta85]

Bu şekilde dener misiniz ? Şu anda baskı önizleme yapıyor. Yazdırmak için aşağıdaki gibi değişiklik yapın.
6 --> [d65536].Bitiş(3).Satır
PrintPreview --> PrintOut
[KOD]Alt Karne()
i = 3 ila 6 '[d65536] için.End(3).Satır
Sheets("5.SINF KARNE").[C6] = Sheets("5.SINIF DENEME SINAVLARI").Cells(i, 4)
Sheets("5.SINF KARNE").PrintPreview 'PrintOut
Sonraki
Aboneliği Bitir[/CODE]

merhabalar Hamit can Bey Kardeşim şimdi sizin yazmış olduğunuz kodu yazdım ama 4 öğrencinin karnesini öz izleme yaptırıyor benim bu sayıyı artırmamın nasıl düzenleye bilirim (
i = 3 ila 6 '[d65536] için.End(3).Satır bu kod üzerinde oynama yaptım ama sonuç alamadım [d65536] nerden çekiliyor çözemedim yardımlarınız için teşekkür ederim

 

[hamitcan]

Mesajda gereken açıklamaları yapmıştım. Deneme yaptıktan sonra aşağıdaki değişiklikleri yapmanız kafi.
6 --> [d65536].End(3).Row
PrintPreview --> PrintOut

 

[hakta85]

Mesajda gereken açıklamaları yapmıştım. Deneme yaptıktan sonra aşağıdaki değişiklikleri yapmanız kafi.
6 --> [d65536].End(3).Row
PrintPreview --> PrintOut

çok teşekkür ederim sadece şunu öğrenmek istiyorum [d65536]. sayısı 5.sınıf deneme sınavların içinden mi çekliyor yoksa öğrenci listesinden mi onu çözemedim yardımlarınız için teşekkür ederim.

 

[hamitcan]

D sütununda son hücreyi bulmak için kullanılan yöntemin bir parçası. Aslında Eski Excel versiyonlarında kalan bir kullanımdı. Satır sayısı 65000 olduğu için son hücreden geriye doğru giderek en son kullanılmış hücreyi buluyordu. Ama bunu yanı sıra farklı kullanımlar da mevcuttur.

 

[hakta85]

Çok teşekkür ederim