aliakgul
Altın Üye
- Katılım
- 9 Mayıs 2005
- Mesajlar
- 402
- Excel Vers. ve Dili
- Ofis 2016 TR 64 Bit
- Altın Üyelik Bitiş Tarihi
- 03-08-2025
Kod:
a = [veri1!c26]
b = [lst!a1]
If b < a Then
Application.Run "Belge_yaz"
Range("a1").Value = Range("a1").Value + 1
Yukarda verdiğim kodlarla karne yazdırıyorum. Her tıklamada yazdırma işlemi yapılıyor ve b'nin değeri bir arttırılıyor, yani bir sonraki öğrenciye geçiliyor; ta ki, son öğrenciye kadar...
Benim öğrenmek istediğim şu:
Burada her tıklamada yazdırma işlemi ve b'nin değer artışı bir kere yapılıyor.Ben bir tıklama ile a=b olana kadar yazdırma ve b'nin değer artışını otomatikleştirebilir miyim?