Satır silince çalışacak makro

[merakli_72]

Değerli arkadaşlar 2 sorum olacaktı. Yardımcı olacaklara şimdiden teşekkür ederim.

1.Satır silindiğinde hangi satırın silindiğini anlayıp çalışacak bir makro yapılabilirmi.
2.Workbooks.Open Filename: komutu ile bir dosya gizli olarak açılabilirmi (Dosya açılsın fakat ekranda içeriği görünmesin)

Saygılarımla..

 

[N.Ziya Hiçdurmaz]

Yanıt

Sayfa kod bölümüne yapıştırınız.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim DEG As Integer
DEG = Target.Row
MsgBox "Silinene satır nosu " & DEG
End Sub

 

[merakli_72]

Cevap için teşekkürler ama bu sheets içindeki her tür değişiklikte aktif oluyor (Satır ekleme/silme sutun ekleme/silme) bana sadece satır silince çalışacak bir makro lazımda
Yardımlarınız için teşekkür ederim