satır kopyalamak

[ockucukay]

Merhaba arkadaşlar

benim yapmak istediğime benzer konular buldum, ancak dosyalar silinmiş çözüme ulaşamadım. basitçe anlatmak gerekirse teklif listesindeki b2 : p2 aralığını kopyalayıp özel yapıştır-değerler olarak listenin sonuna kaydetmek istiyorum. ama makroyla listenin sonunu bulup altına yazdıramadım. yardımlarınız için şimdiden teşekkürler.

 

[Kemal Demir]

Merhaba,

Listenin sonunu bulma işlemi için aşagıdaki kod'u deneyiniz.

b kolonuna yazıldıgı varsayıldı.

.kodlarınız
[b]son=[b65536].End(3).Row+1[/b]
[b]Cells(son,2).PasteSpecial xlPasteAll[/b]
.kodlarınız

 

[ockucukay]

hay allah razı olsun bende count kullanmaya çalışıyordum sağolun.