Çözüldü Kaydedilen Verilerin Son Satırda Görülmesi Hakkında.

[yesimgurol]

Merhaba,
Sayfa içerisinde Textboxlar ile B10: I10 dan başlamak sureti ile verileri kaydede biliyorum. Veriler çoğaldıkça haliyle kaydedilen veriler listenin en alt kısmına geçtiğinden göremiyorum. Acaba en son kaydedilen verilerin olduğu son satırı nasıl görebilirim:-(

 

[Muzaffer Ali]

Merhaba.
kaydet buton kodlarının en son satırına aşağıdaki satırı ekleyebilrsiniz.

Sheets("CIKIS").Range("A" & vt).Activate

 

[yesimgurol]

Merhaba.
kaydet buton kodlarının en son satırına aşağıdaki satırı ekleyebilrsiniz.

Sheets("CIKIS").Range("A" & vt).Activate

Muzaffer bey, çok teşekkür ederim. Evet istediğim şekilde şimdi kaydedilen veri satırını görebildim. Bu haliyle de gayet güzel hiç bir sorun teşkil etmeyecektir benim için yalnız hani olur mu bilemiyorum da o son satır hafif renkli olabilir mi?

 

[Muzaffer Ali]

B:I Sütunlarının tamamını seçin.
Giriş Sekmesi / Koşullu Biçimlendirme / Yeni Kural seçin
Listeden "... ... ... formül kullan" seçin.
Formül kutusuna =(EĞERSAY($B:$B;"<>")+8)=SATIR($B1) formülünü kopyalayın
Biçimlendir tıklatıp, istediğiniz dolgu rengini seçip tamamı tıklatarak pencereleri kapatın.

 

[yesimgurol]

B:I Sütunlarının tamamını seçin.
Giriş Sekmesi / Koşullu Biçimlendirme / Yeni Kural seçin
Listeden "... ... ... formül kullan" seçin.
Formül kutusuna =(EĞERSAY($B:$B;"<>")+8)=SATIR($B1) formülünü kopyalayın
Biçimlendir tıklatıp, istediğiniz dolgu rengini seçip tamamı tıklatarak pencereleri kapatın.

Muzaffer bey, çok teşekkür ederim gerçekten. Harika oldu. Saygılarımla, iyi çalışmalar.