belirlenen hücre aralığı kadar yazdırma

[ismailayan]

gerçi bir bölümüne bir arkadaş yardımcı oldu ama!....

olay şuuu

sayfa1 de 3000 tane isim listesi var
sayfa2 de antedli kağıda basılacak yazım var sayın diye başlıyor..

yapmak istediğim kullanıcıya bağlı olarak hücre aralığı verilecek isim listesinden mesela a1 ile a50 arası bu satır arası isimleri sayfa2 ye sayın diye aktaracak ve print yapacak

bu konuda bana yardımcı olucak arkadaşlara ihtiyacım var
Please help meeee


şimdiden teşşekürler

 

[yayalar]

aşağıdaki link inceleyiniz....

http://www.excel.web.tr/viewtopic.php?t=11616

sanırım bu ıstedıgınızı yapmanız ıcın kendınıze uyarlamanız gerecek..bence oncelıkle sıtede bu konu ıle ılgılı daha onceler calısmalar yapılmış onları ıncelemenızı tavsıye ederım..boylece hızlı bır cozum bulursunuz....

 

[ismailayan]

'Yazdır
For i = 1 To 351
Range("A" & i).Select
'
Sheets("Antetli Kağidi").Select
' ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("isim listesi").Select
Range("C" & i).Select


Next i

 

[veyselemre]

basit bir örnek hazırladım