View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Rick Rothstein \(MVP - VB\) Rick Rothstein \(MVP - VB\) is offline
external usenet poster
 
Posts: 2,202
Default check for FALSE values in a range of cells in VBA

I have a macro which prompts the user to input a variety of values,
which values are put into a range of cells for the purposes of
calculation.

Say the range is A1:A7.

If the user hits the cancel button on the pop-up window, FALSE is
returned; this FALSE generates errors in the formulas that depend upon
these cells. Is there VBA code I can use that essentially says "if
any cell in the range A1:A7 contains the value FALSE, replace the
contents of all those cells with "" ? (i.e., an empty string.)


Are you looking for code something like this?

Dim R As Range
Application.EnableEvents = False
For Each R In Range("A1:A7")
If R.Value = False Then R.Value = ""
Next
Application.EnableEvents = True

Rick