If Cell in Range Contains Value Then Insert file path in Cell to the left

The title above should explain what I am trying to succeed here. Can anyone help me?

Dim csv_ap As String
Dim path_report As String

Sheets("Mail Report").Activate
csv_ap = Range("C65000").End(xlUp).Offset(1).Value

If csv_ap = "NO" Then
path_report = MAIN_PATH & "For Resolution\" & Format(today, "dd_mm_yy") & "manual_handling_" & Range("A65000").End(xlUp).Value

End If

Range("B65000").End(xlUp).Offset(1).Value = path_report