satır silme

[osmandemir]

herkese kolay gelsin .sayenizde güzel şeyler öğreniyoruz.bir sorum olacak .sayfa1 e bir buton kayup, sayfa3 de ilk 12 satırı silebilirmiyiz.yalnız içeriği temizleme değil satır silme yapabilirmiyiz.yardımlarınızı bekliyorum.teşekkürler.

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu kullanabilirsiniz.

Sub SATIR_SİL()
    Sheets("Sayfa3").Select
    Rows("1:12").Select
    Selection.Delete Shift:=xlUp
    Range("A1").Select
    Sheets("Sayfa1").Select
    Range("A1").Select
End Sub

 

[osmandemir]

kotları kullandım ama birinci sayfada butona bastığımda sayfa3 e geçiyor ve 400 diye bir hata veriyor.anlamadım

 

[Levent Menteşoğlu]

Aşağıdaki gibi deneyin.

[vb:1:4272a09ba2]Sub SATIR_SİL()
Sheets("Sayfa3").Rows("1:12").Delete
End Sub
[/vb:1:4272a09ba2]

 

[osmandemir]

ellerinize sağlık çok teşekkürler hepinizede iyiki varsınız