Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
 If Target.row > 9 Then
     Call Makro1
 end if
End Sub

wenn es noch auf ein bestimmtes Tabellenblatt eingeschränkt werden soll, dann mußt du auch noch Sh abfragen. Oder du schreibst den Code in das doppelclickevent des Blattes und nicht dem von der Mappe.