VBA or Conditional Formatting to Insert a new row of data base on cell value.

[raj_1026]

Hey y'all. I've been scouring the internet to piece together codes that would be able to accomplish the task at hand.
I currently have a worksheet that has the names of clients (a), when their next meeting is (b), and was the meeting completed? (c).

I'm trying to make it so, once a meeting has been completed and the worker puts in the txt "Yes" a new row appears beneath the client, copying down the client name and adding 84 days the the cell above (in B). I've already tested a code that then moves the completed meeting to a new sheet.

[TABLE="width: 500"]
<tbody>[TR]
[TD]Name[/TD]
[TD]Current Meeting Date[/TD]
[TD]Completed?[/TD]
[/TR]
[TR]
[TD]John Smith[/TD]
[TD]7/25/2018[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]Morgan Freeman[/TD]
[TD]8/1/2018[/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]

 

[Fluff]

How about

Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.CountLarge > 1 Then Exit Sub
   If Target.Column = 3 And LCase(Target.Value) = "yes" Then
      Application.EnableEvents = False
      Rows(Target.Row + 1).Insert
      Target.Offset(, -2).Resize(2).FillDown
      Target.Offset(1, -1).Value = Target.Offset(, -1).Value + 84
      Application.EnableEvents = True
   End If
End Sub

This needs to go in the sheet module

 

[raj_1026]

Hey Fluff that code looks perfect.
I copied it to my sheet module and when I hit run the Macros window should up with the code that I have to move the row base on cell value. What am I doing wrong?

 

[Fluff]

You do not need to run that macro (it's event code).
It will run automatically whenever to type yes into col C