To protect and hide  rows, you could try:

Cells.Locked = False
Rows("RowNum:RowNum").Locked = True
Rows("RowNum:RowNum").Hidden = True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, _
Scenarios:=True

This would keep the row from being deleted, but the user would get the
"... is protected and is therfore read-only." Excel error  message when
the data is mistakenly deleted. I don't know how to avoid this error
message without what would probably be a great deal of work.