How to Delete Numeric Cells leaving Cells with Formulas with VBA

How to Delete Numeric Cells leaving Cells with Formulas with VBA

You want to delete all cell with numeric values but not those with formulas in them. This simple VBA snippet helps you to do so.

• Copy and Paste the code
• Select you Range of cell and RUN the Macro

 
Option Explicit  
  
Sub deleteNumeric()
Dim cell As Range
 For Each cell In Selection
    If IsNumeric(cell.Value) And cell.HasFormula = False Then
       cell.Clear
     End If
     
 Next cell
End Sub