Sınırlı Aktif Satır Seçimi..

[EKREM1661]

tüm forum çalışanlarına selamlar..

arkadaşlar..sınırlandırılmış bir satır aralığını seçmek için nasıl bir kod yazmamız gerekir. Tabiiki belirli bir satır değil, aktif satır..
yani, S sütunu ile CB sütunu arasında kalan herhangi bir Aktif Satır ın seçimi..

hayırlı çalışmalar..

 

[alpi]

Range("S1", "CB65536").Activate

 

[EKREM1661]

sayın alpi ilginiz için teşekkürler..konuyu tam ifade edemediğim için özür beyan ediyorum..
yukarıda verdiğiniz kodu denedim..düşündüğüm tarzda uyarlamaya çalıştım fakat olmadı..
"S" ile "CB" sütunlarını seçmek değil de, bu iki sütun arasında kalan aktif satırın seçilmesini istiyorum.(butona atanarak)..

örneğin, ben fare işaretçisini 6.satırda her hangi bir hücrede bulundurup, butona tıkladığımda, S6:CB6 aralığını seçsin..(bu seçim aktif hücre hangi satırda ise o satırla ilgili seçim olacak)

 

[alpi]

Sub SatirSec()
    Dim Satir As Long
    Satir = ActiveCell.Row
    Range("S" & Satir, "CB" & Satir).Activate
End Sub

 

[EKREM1661]

sayın alpi hocam..! gerçekten güzel olmuş, eline sağlık..sizleri hayırla yad ederim..