2 If Statements In Macro?

I've done a few searches and found the 2 macros I need. They are:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 4 And Target.Count = 1 Then
If InStr(1, Target.Value, "REL", vbTextCompare) Then
If IsEmpty(Target.Offset(0, -1)) Then
Target.Offset(0, -1).Value = Date
Target.Offset(0, 1).NumberFormat = "mm/dd/yyyy"
Target.EntireColumn.AutoFit
End If
End If
End If
End Sub

and
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Target
If .Count > 1 Then Exit Sub...........................

I know very little about VBA. The first program I use to enter a static date to the cell (Column C) to the left when I type "REL" into a cell (Column D) and the second will be used to enter a static date into the cell next to the one above (Column B) when I type anything into a cell (Column E).

They both work individually but I am now trying to compile them together and get the compile error (Because they have the same worksheet_change name). I do not know how to rename or make them in the same.