• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Soru Çift tıklayınca üst satır niye bir alt satıra kopyalanmıyor?

assenucler

Altın Üye
Katılım
19 Ağustos 2004
Mesajlar
3,588
Excel Vers. ve Dili
Ofis 365 TR 64 Windows 11 Pro x64 TR
Merhabalar;

Daha önce Ömer üstadın makro koduyla, Harcamalar sayfasında üstteki satırdaki kayıtlar, bir alt satıra çift tıklayınca kopyalanıyordu.

2020 yılı için yarattığım kopyada makro niye çalışmıyor? Sorun nasıl aşılabilir?
 

Ekli dosyalar

şu kodları deneyin
Kod:
    If Intersect(Target, Range("A:A")) Is Nothing Then Exit Sub
    son = WorksheetFunction.CountA(Range("A:A")) + 1
    If Target.Row <> son Then Exit Sub
    Rows(son - 1).Copy Range("A" & son)
 
Sayın systran,

Üstadım kısa süredeki yanıtınız için teşekkürler. Sorunum çözüldü.

Sevgi ve saygıl
 
Geri
Üst