VBA

2077delta · Mar 24th, 2002, 01:36 PM

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 · Mar 24th, 2002, 02:56 PM

Quote:

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 · Mar 24th, 2002, 04:27 PM

Thanks,

This is just what I was looking for.

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Mar 24th, 2002, 01:36 PM	#1
2077delta Board Regular Join Date: Feb 2002 Posts: 217	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).

Mar 24th, 2002, 04:27 PM	#3
2077delta Board Regular Join Date: Feb 2002 Posts: 217	Thanks, This is just what I was looking for.