If true is found then clear the content of that complete sheet

agog1 · Feb 7th 2018

If true is found in any cell, anywhere in a sheet then clear the content of that sheet completely means clear all the data in that sheet, make a sheet blank

luzmen · Feb 7th 2018

Code

Sub ClearIfTrue()


For Each cell in Range("RangeStart:RangeEnd")
     If cell.value >  TRUE  Then
              Range("RangeStart:RangeEnd").ClearContents
     End If


Next cell 
    End Sub

Display More

Note: I used selected range instead of entire range of the cell because it will take long time to finish the command.

Hope it helps (i did not test it).

agog1 · Feb 13th 2018

Thnx

If true is found then clear the content of that complete sheet

Participate now!

Share