delete blank rows macro

hi

cause doing macros in excel is rather new for me, so i need some help

i googled for macro to delete blank rows and found this page http://www.ozgrid.com/VBA/VBACode.htm
this would be great, but problem is that my "blank" rows contain formula and it displays null string in some results, and i want that rows deleted, but i cant cause they arent empty. is there a way to delete rows if a value of the result of the formula is empty string.

Hi

You should be able to use Autofilter for this:

'assume you want to delete rows which are blank (or "") in column B

Dim r As Range

Set r = Range("A1:G1000")

Activesheet.AutofilterMode = False

r.Autofilter Field:=2, Criteria1:="="

r.Offset(1).Delete

Activesheet.AutofilterMode = False