Question

When a user inputs a value in a certain column then this value should automatically be picked up and added as a suffix.

For example, user inputs “3”, convert this to “Incident ” & Cell.Value.

I am having problems with the OnChange Sub routine and I’m thinking I’m taking the wrong path to automatically get this converted when the user changes cell selection.

Any Tips anyone may give me perhaps please?

Answer 1

Put this code in the Change event of your sheet:

Private Sub Worksheet_Change(ByVal Target As Range)
    If (IsNumeric(Target.Value)) Then
        Application.EnableEvents = False
        Target.Value = "Incident " & Target.Value
        Application.EnableEvents = True
    End If
End Sub

IsNumeric assures you won’t end up with “Incident Incident 9” when a cell is focused.
Application.EnableEvents = False will prevent from recursively call the Change event.