G'day guys!
Should be an easy one for you pros. Here is my current script:
Columns("R:R").Select
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.FormulaR1C1 = "FALSE"
Goal: replace blanks in column R with the text "FALSE".
Issue: This works fine except when there are no blanks in the column - the script crashes and the line has to be removed to continue execution.
So, all I need is a method to get this script to exit gracefully when there are no blanks to convert. Can anyone help?
Should be an easy one for you pros. Here is my current script:
Columns("R:R").Select
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.FormulaR1C1 = "FALSE"
Goal: replace blanks in column R with the text "FALSE".
Issue: This works fine except when there are no blanks in the column - the script crashes and the line has to be removed to continue execution.
So, all I need is a method to get this script to exit gracefully when there are no blanks to convert. Can anyone help?