I have the following code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row = 100 Then Rows(3).Delete
End Sub

Using this code how can I then insert a row at the bottom of the spreadsheet?
--
hol