title: Macro to replace text if value is less than 1 character - Excel Macro
body: <p>I have found a macro perfect for my use on here, so thank you already stackoverflow community! I'm just struggling to amend the end last part of the below:</p>
  
  <pre><code>Sub Forename()
  
  ' Macro to delete rows if there are less than 4 in the NAME column
  
  Dim LR As Long, i As Long
  Application.ScreenUpdating = False
  LR = Range("NAME" &amp; Rows.Count).End(xlUp).Row
  For i = LR To 1 Step -1
      If Len(Range("NAME" &amp; i).Value) &lt; 4 Then Rows(i).Delete
  Next i
  Application.ScreenUpdating = True
  
  End Sub
  </code></pre>
  
  <p>This is perfect but instead of deleting the row containing the &lt;1 value, i'd like to replace it with some text. e.g. Customer.</p>
  
  <p>Thanks In advance</p>