Seçtirilen hücrenin 2 satır altına yazdırmak

[NaShi]

Denemediğim arama yöntemi kalmadı ama bir türlü bulamadım. Çok, çok basit olduğuna emin olduğum bu ufak şeyi nasıl yapacağımı bana gösterirmisiniz ?

Makromuzu çalıştırdığımızda belirttiğimiz sütundaki en son satırı bulup onun 2 satır altına paste yapacak. Selection.End(xlDown).Select ile en son satıra yönlendiriyorum ama iki satır altına alamıyorum.

Şimdiden teşekkür ederim.

 

[Ergün Güler]

Selam,
Bence örnek dosya ekleyin ve Sorunuzu Makro-VBA altında sorun. Sorunuz döngü içeriyor.
İyi çalışmalar.

 

[NaShi]

örnek dosya ekleyecek kadar birşey yok aslında bana sadece o an seçili olan hücrenin 2 hücre altına gidecek komut lazım. kısaca işlem;
B sütunundaki dolu hücreyi bul (örn: son dolu hücre B35)
onun 2 altındaki hücreyi panodakini yapıştır (B37 ye)

 

[Skorpiyon]

Sayın NaShi,

Komutu şu şekilde deneyin.

Selection.End(xlDown).Offset(2, 0).Select

NOT : Bu komut, eğer seçimin altında bir değer yok ise Excel'de en son satıra gidecek ve var olmayan bir adresi seçmeye çalışacaktır. Bu da hata almanıza neden olacaktır.

 

[NaShi]

Çok teşekkür ederim hocam sorunum çözüldü.