As you have only two conditions to act on, just extend your IF Then ... End IF
IF Then ... IFELSE Then ... End If
If Not objISect Is Nothing And UCase(Target.Text) = "YES" Then
'Move the row to the next row on the appropriate sheet
'based on names in column C - but check that column C is not empty
strDestSheet = Target.Offset(0, -2).Text
If strDestSheet <> "" Then
'find next row on appropriate worksheet
strNxtRow = CStr(Worksheets(strDestSheet).Range("A65534").End(xlUp).Row + 1)
'copy existing row
'Paste special to next available row on appropriate worksheet
Worksheets(strDestSheet).Range("A" & strNxtRow).PasteSpecial _
Application.CutCopyMode = False
ElseIf Not objISect Is Nothing And UCase(Target.Text) = "NO" Then
'add code to move/delete row here
You can still use Target.EntireRow.Copy
then use your new destination, finding the next empty row as before, but with a different worksheet.
PS When posting code put your data between <pre> and </pre> tags that you can insert using the 'Pre' icon above the reply box. Then use the Preview button and edit, as required. To preview again, check the 'Check To Show Confirmation Page Again' box and click 'Confirm and see post'
Using the tags ensures that code retains its indenting.