bulundugum hucrenin satirini silme

[arkanonur]

Merhaba Arkadaslar,

Makro'yu yazarken o an bulundugum hucrenin satirini silmeyi istiyorum.

ActiveCell.Row.Activate
Selection.Delete Shift:=xlUp

Boyle bir kod denedim ama hata veriyor. Yardimci olabilecek arkadaslara simdiden tesekkurler.

Saygilarimla,

Onur Arkan

 

[Necdet]

Sanırım aşağıdaki kod size bir fikir verir.

Public Sub sil()
For i = 1 To 10
If i = 5 Then Rows(i).Delete
Next
End Sub

 

[veyselemre]

ActiveCell.EntireRow.Delete shift:=xlUp

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki şekilde kullanabilirsiniz.

ActiveCell.EntireRow.Delete Shift:=xlUp

Not: Veysel bey benden hızlı davranmış.

 

[Necdet]

Kısaca aşağıdaki kodda çalışıyor,
ActiveCell.Delete

Örnek olarak Sayın veyselemre ve COST CONTROL'un verdikleri kod ile bu çalışan kısa kod arasındaki fark ne olabilir?

 

[Ali]

Necdet Bey

ActiveCell.Delete ile o an aktif olan hücreyi silersiniz.

ActiveCell.EntireRow.Delete ile aktif hücrenin satırını silersiniz.

 

[Necdet]

Pardon pardon Sayın fructuose yaşlılık işte entireRow un row unu görmemişim

 

[Seyit Tiken]

Alternatif :

Sub Düğme1_Tıklat()
ActiveCell.EntireRow = ""
End Sub