Worksheet_Change that ignores specific characters?

[jmpatrick]

Hello again. I have this Worksheet_Change event that runs when data changes in a specific column. Works great, however I want to ignore (not run FloorOrderNumber) if the cell has nothing but a space (" ") entered.

Is it possible?

Private Sub Worksheet_Change(ByVal Target As Range)
   
    Set KeyCells = Range("CalendarFloorsOrderNumberColumn")
    If Not Application.Intersect(KeyCells, Range(Target.Address)) Is Nothing Then
    
    Application.EnableEvents = False
                   
    Call FloorOrderNumber
        
    Application.EnableEvents = True
    
    End If
    
End Sub

 

[mumps]

Maybe:

Private Sub Worksheet_Change(ByVal Target As Range)
    Set KeyCells = Range("CalendarFloorsOrderNumberColumn")
    If Application.Intersect(KeyCells, Range(Target.Address)) Is Nothing Then Exit Sub
    If Target <> " " Then
        Application.EnableEvents = False
        Call FloorOrderNumber
        Application.EnableEvents = True
    End If
End Sub