activecell

[musculus]

Seçilen aktif hücrenin kaçıncı satır olduğunu nasıl bulabiliriz ?

 

[Ali]

Makro ile ActiveCell.Row komutu

Fonksiyon ile SATIR() fonksiyonu

 

[musculus]

Makro ile ActiveCell.Row komutu

Fonksiyon ile SATIR() fonksiyonu

activecell.row komutunu yazınca
incalid use of prpperty hatası veriyor
((((

 

[Ali]

Bunu kodlarınız içinde kullanacaksınız.

Sub satırno()
MsgBox ActiveCell.Row
End Sub

 

[baydeniro]

Sayın Ali paylaşım için çok teşekkürler.

 

[baydeniro]

Sayın Ali. İmzanız çok hoşuma gitti. Gerçek yaşamı çok güzel özetliyor. Bugün tüm tanıdıklarıma mail atarak bu sözü gönderdim.

 

[Ali]

Sayın Ali. İmzanız çok hoşuma gitti. Gerçek yaşamı çok güzel özetliyor. Bugün tüm tanıdıklarıma mail atarak bu sözü gönderdim.

Teşekkürler Serdar Bey, Hz Mevlananın bir sözüdür.

Ok gibi dogru olsam, yabana atarlar beni
Yay gibi egri olsam, elde tutarlar beni
Eğri yay elde kalır,menzil alır doğru ok
Doğruda ne bir aç gördüm,eğride asla bir tok

 

[musculus]

malesef beceremedim

msgbox activecell.row yazınca stır numarsını alabiliyorum

ama benim yapmaya çalıştığım satırı komple silmek
activecell.row.select diyorum olmuyor

a=activecell.row
range("a:a").select
Selection.Delete Shift:=xlUp
diyorum yine olmuyorum

 

[Ali]

Sub sil()
ActiveCell.EntireRow.Delete
End Sub

 

[baydeniro]

Sayın Ali. Sizin kodunuzu Doubleclick olayına bağlamak için nasıl revize etmem gereklidir ?

 

[Ali]

İlgili sayfanızın kod bölümüne aşağı kodları yazmalısınız.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
ActiveCell.EntireRow.Delete
End Sub

 

[Orion1]

Çalışma sayfassının kod bölümüne aşağıdaki kodu yapıştırıp deneyiniz.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Target.EntireRow.Delete
End Sub

 

[baydeniro]

Çok çok teşekkürler.

 

[musculus]

ellerinize,bilgilerinize sağlık teşekkür ederim