Çift tıklanan satırı, diğer sayfaya aktarma hk.

EKREM1661

Altın Üye
Katılım
10 Kasım 2006
Mesajlar
1,286
Excel Vers. ve Dili
Excel-2016
Altın Üyelik Bitiş Tarihi
03-02-2026
Saygıdeğer arkadaşlar.. Eklı dosyada, Rapor sayfası "V6" str/stn itibariyle, çift tıklanan satırı RaPoR sayfasına aktarıyor..
Amacım;
1-Aktarımı 2.ncı satırdan başlatıyor. . 6.ncı satır itibariyle başlatsın..
2-Verileri formülleriyle aktarıyor.. Metinsel aktarsın..
3-Dolgu rengi de aktarıyor.. "V" stn hariç, aktarmasın..
Buna ait DoubleClick kodunu bu amaçlar doğrultusunda düzenleyebilir miyiz ?
 

Ekli dosyalar

Son düzenleme:

EKREM1661

Altın Üye
Katılım
10 Kasım 2006
Mesajlar
1,286
Excel Vers. ve Dili
Excel-2016
Altın Üyelik Bitiş Tarihi
03-02-2026
Saygıdeğer hocam, öncelik itibariyle elinize sağlık.. Dosya yine sizin önünüze düşmüş.. Yalnız "Q" sütunu, bölme işlemi olduğu için, sayısal formatını koruyamadı. Yani 47,06 değil de 47,06736 olmuş.. Neyse o çok önemli değil..
Bunun dışında tek pürüz var..
Sayfa1 deki aktarım kod'u; içerisindeki "Bulunamadı" ifadesini sayfanın olur olmaz hücrelere atıyor. Şu anki 2 nolu mesajlı dosyada aynısını yapmış.. (Ocak sayfası "F" stn.da) Bunun da nedinini anlayamadım.
Fırsatınız varsa bakarsınız, ziyadesiyle teşekkürler..
 
Son düzenleme:

Muzaffer Ali

Destek Ekibi
Destek Ekibi
Katılım
5 Haziran 2006
Mesajlar
6,394
Excel Vers. ve Dili
2019 Türkçe
3 isteğinizi de yaptım.
Kodların başına "On Error Resume Next" eklemeyin. Eğer hatalı bir kod varsa hata uyarısı ermesini engellemeyin, uyarı versin ki çözüm bulunsun.
 

Ekli dosyalar

EKREM1661

Altın Üye
Katılım
10 Kasım 2006
Mesajlar
1,286
Excel Vers. ve Dili
Excel-2016
Altın Üyelik Bitiş Tarihi
03-02-2026
Evet doğrudur.. Yeterince yük olduk üstad, her şey için teşekkürler ve hayırlı ömürler..
 

EKREM1661

Altın Üye
Katılım
10 Kasım 2006
Mesajlar
1,286
Excel Vers. ve Dili
Excel-2016
Altın Üyelik Bitiş Tarihi
03-02-2026
Hocam selamlar olsun, istemeyerek rahatsız ediyorum.. DoubleClick aktarma koduna sayfa ismi nasıl ilave edebiliriz ? Yani rapor sayfasına aktarılan satırın, hangi aya ait olduğu anlaşılsın diye.. Satır sonunda ("V" stn olabilir) ocak şubat...diye not düşülecek şekilde..
 

Muzaffer Ali

Destek Ekibi
Destek Ekibi
Katılım
5 Haziran 2006
Mesajlar
6,394
Excel Vers. ve Dili
2019 Türkçe
Aleykümselam.

Bu satırın altına
Kod:
Sheets("RapoR").Cells(son + 1, "B") = son
Bu satırı ekleyin.
Kod:
Sheets("RapoR").Cells(son + 1, "V") = Me.Name
 
Üst