Çözüldü Aktif Hücreye En Yakın Boş Satıra gitme

Bu sorun verilen destek sayesinde çözüme ulaştırılmıştır.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Feylosof

Bronz Üye
Kullanıcı Bilgileri
Katılım
10 Ağu 2021
Mesajlar
314
Çözümler
6
Aldığı beğeni
130
Excel Versiyonu
Office 2010 TR
Konuyu Başlatan
İyi pazarlar diliyorum herkese;

VBA ile olmak şartıyla aktif hücre veya seçili hücrenin bulunduğu satırın altında ilk boş satırı nasıl seçtirebilirim veya veri girişi yaptırabilirim. Daha aşağı satırlarda yine veriler mevcut bu nedenle son dolu SATIR kodunu kullanamıyorum.
 
Çözüm
Ben C sütunu için verdim.
Siz kendi çalışmanıza hangisi uygunsa uyarlarsınız.
Kolay gelsin.

saT = Range("C10").End(xlDown).Row
saT = Range("C" & ActiveCell.Row).End(xlDown).Row
saT = Cells(ActiveCell.Row, 3).End(xlDown).Row
MsgBox (saT)

excelcan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
26 Eyl 2021
Mesajlar
577
Çözümler
138
Aldığı beğeni
717
Excel Versiyonu
Office 2010 TR
Ben C sütunu için verdim.
Siz kendi çalışmanıza hangisi uygunsa uyarlarsınız.
Kolay gelsin.

saT = Range("C10").End(xlDown).Row
saT = Range("C" & ActiveCell.Row).End(xlDown).Row
saT = Cells(ActiveCell.Row, 3).End(xlDown).Row
MsgBox (saT)
 
Çözüm

Feylosof

Bronz Üye
Kullanıcı Bilgileri
Katılım
10 Ağu 2021
Mesajlar
314
Çözümler
6
Aldığı beğeni
130
Excel Versiyonu
Office 2010 TR
Konuyu Başlatan
Sayın excelcan ilgi ve desteğiniz. için çok teşekkür ederim. Zihnimde kurduğum tarzda bir sonuç almaya muvaffak olamadım. Tüm yardımlarınız için bir kez daha teşekkür ederim. Olmazsa bu konuyu kapatabiliriz.
 

excelcan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
26 Eyl 2021
Mesajlar
577
Çözümler
138
Aldığı beğeni
717
Excel Versiyonu
Office 2010 TR
Sayın Feylosof
Muvaffak olamadığınız kısmı açarsanız
bir sonuca ulaşılır.
Yukarda verdiğim kodlara +1 eklerseniz boş satırı bulursunuz.
Olmayan kısım bu muydu ?
 

Feylosof

Bronz Üye
Kullanıcı Bilgileri
Katılım
10 Ağu 2021
Mesajlar
314
Çözümler
6
Aldığı beğeni
130
Excel Versiyonu
Office 2010 TR
Konuyu Başlatan
Sayın Feylosof
Muvaffak olamadığınız kısmı açarsanız
bir sonuca ulaşılır.
Yukarda verdiğim kodlara +1 eklerseniz boş satırı bulursunuz.
Olmayan kısım bu muydu ?
Üstadım +1 olayını yaptım. Dosya 8 farklı fasıldan oluşmakta ve ara boşluklara veri girmem gerekiyor. Tüm fasıllar aynı standartta olmamasından ve aralarda birleştirilmiş hücrelerden oluşması nedeniyle zannımca beceremedim. Dosyanın orijinal formatını değiştiremiyoruz, değiştirmemiz istenmiyor.
 

excelcan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
26 Eyl 2021
Mesajlar
577
Çözümler
138
Aldığı beğeni
717
Excel Versiyonu
Office 2010 TR
Sayın Feylosof birleştirilmiş hücreler kod yazımında
her zaman ciddi bir sıkıntı. Sorunuzu devam ettirmek isterseniz
örnek bir dosya eklemenizde fayda var.
Ya değilse konuyu kapatabilirsiniz.
Kolay gelsin.
 

Feylosof

Bronz Üye
Kullanıcı Bilgileri
Katılım
10 Ağu 2021
Mesajlar
314
Çözümler
6
Aldığı beğeni
130
Excel Versiyonu
Office 2010 TR
Konuyu Başlatan
Üstadım çok haklısınız. Dosya özel bilgilerden oluştuğu için demo formuna getirmek konuyu anlamsızlığa sürükleyecek korkarım. Öyleyse konu kapatılabilir. Uğraştırdığım için kusura bakmayın. Kalın Sağlıcakla
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Konuyu okuyanlar

Üst