Satır ekeleme

[denksal123]

arkadaşlar ekdeki örnekte satır ekleniyor ama aktif hüyreye ekleniyor benim istediğim a12 satırından itibaren satır eklemek yardımcı olarsanız sevinirim

 

[ynmcan]

arkadaşlar ekdeki örnekte satır ekleniyor ama aktif hüyreye ekleniyor benim istediğim a12 satırından itibaren satır eklemek yardımcı olarsanız sevinirim

Aşağıdaki kodu dener misiniz

Sub Düğme1_Tıklat()
Sayfa1.Range("a12").EntireRow.Insert
Sayfa1.Range("a12").EntireRow.Copy Sayfa1.Range("a12").EntireRow
End Sub

.