Hi nordscan,
Try this on a backup copy of your worksheet...

Public Sub Insert_Row_If_C_no()
Application.ScreenUpdating = False
Dim iLastRow As Long
iLastRow = ActiveSheet.Range("C" & Range("C:C"). _
Rows.Count).End(xlUp).Row
Do While iLastRow 1
If Cells(iLastRow, 3).Value = "no" Then
Cells(iLastRow, 3).EntireRow.Insert
End If
iLastRow = iLastRow - 1
Loop
End Sub

Ken Johnson