VBA

[2077delta]

What is the VBA code to test a cell for its contents i.e. blank, text, number formula etc. Essentially the same info you get with =cell("Type",ref).

 

[Jay Petrulis]

On 2002-03-24 12:36, 2077delta wrote:
What is the VBA code to test a cell for its contents i.e. blank, text, number formula etc. Essentially the same info you get with =cell("Type",ref).

Test if cell has a formula:
ActiveCell.HasFormula

If cell is empty:
IsEmpty(ActiveCell)

Best way to test if cell is blank or is a formula blank (courtesy of Aladin Akyurek):
Len(ActiveCell)

If cell is number:
WorksheetFunction.IsNumber(ActiveCell)

If text:
WorksheetFunction.IsText(ActiveCell)

To match your formula EXACTLY:
Evaluate("=Cell(""Type""," & ActiveCell.Address & ")")

Regards,
Jay

 

[2077delta]

Thanks,

This is just what I was looking for.