Adding a “/001” to code on extra row (Excel 2003)

Adding a “/001” to code on extra row (Excel 2003)


I have the following code and I need to add a /001 to the new row in Column Q

So when the user will select “Amendment” from column X it will add a new row with the information from column A to M and also add /001 to Cell Q.

Code:

If LCase(Trim(Target.Value)) = "amendment" Then
Target.Offset(1).EntireRow.Insert
Range("A" & Target.Row + 1).Resize(, 16).Value = Range("A" & Target.Row).Resize(, 16).Value
Range("X" & Target.Row).Resize(, 2).ClearContents
End If

Please help.