Sayın hocalarım listeden seçtiğimi alt listeye aktarmak ve rapor almak istiyorum
ilk listeyi çift tıkladığımda listde kaç tane kayıt varsa o kadar kaydı raporluyor
bulduğum aktarma örnekleri bende çalışmadığı için size soruyorum.
Birde benim istediğim
Bir kaydı ben kaç kere seçersem aynı kaydı o kadar aktarsın ve mesela 3 kere seçtimse rapora 3 kere yazsın
Bunu şu nedenle istiyorum
Aldığımız raporu keserek giden kolilere yapıştırıyoruz
Bir sayfada aynı kişiye ait mesala 3 adet kayıt olmalı 3 kolye yapıştırmak için veya ayrı 3 kayıt veya 2 si aynı biri farklı
Kağıt israfını önlemek için
Belki başka bir yolu vardır.
Yardımcı olursanız memnun olurum..

Ekte ki örnek işinize yararmı acaba?

Formun Kapandığında olayına da bu kodu yazınız.

Hocam Aktarma işlemi olarak tamam teşekkür ederim.
Ama bir kere aktardığını doğal olarak tekrar aktarmıyor.
Ben ise bir kağıt üzerinde aynı kayıtı benim belirleyeceğim bir sayıda tekrarlaması
Bunu yapabilmek için bir sayı kutusu konulup "seçimi bu sayı kadar raporla "
şeklinde bir komut verilebilir mi?
Birde formum kapandığında olayına yazılan kod ne işe yarıyor
Yazdım ama değişikliği fark edemedim.

Bu yöntemde rapora aktarılacak olan kişiler, tablodaki "seçim" alanındaki onaya bakılarak belirlenir. Sizin bahsettiğiniz gibi bir olay burada uygulanan mantığa ters görünüyor. Çünkü aslında aşağıya aktarılan değerler sadece ana tablodaki kişilerin seçilmiş ya da seçilmemiş olmasına göre görüntülenme esasına dayanıyor.

Sayı belirleme konusunda şu yapılabilir. Tabloya adet adında bir sayı ilave edilir. Aşağıya aktarılacak kişiler için bir seçim alanı belirlenir. Bu alana da raporda görüntülecek sayı girilir. Raporda yeralacak kişiler de bu sayı kadar çoğaltılarak yer alır.

Bu anlattıklarınızı yapma konusunda yardımcı olbilirmisiniz .
Anladığım kadarı ile saçim alanı yaptım. özelliği sayı, ismi boxadet
bunu rapor butonuna ilave etmek gerekecek ama nasıl?
Tablodati ilave edilen adet alanını liste kutularında görünmesi gerekir mi?
Seçim alanı olan sayı bu adet alanı ile ilişkili mi?

(30/05/2009, 11:24)Puletin yazdı: Ekte ki örnek işinize yararmı acaba?

Formun Kapandığında olayına da bu kodu yazınız.

Kod:

Private Sub Form_Close()
Dim SQL As String
        
        SQL = "UPDATE T_adres_defteri SET Secim = 0 WHERE T_adres_defteri.Secim = -1"
        DoCmd.RunSQL SQL
            
End Sub

Bu örnek benim için çok iyi oldu.. Hem soran arkadaşa hemde üstadlarıma sonsuz teşekkürler...Saygılarımla