supposing you have your quantities in column "A" (cells(cnt1,1)):

sub deletingrows()
dim cnt1 as integer
for cnt=1 to 100 'or put the number of rows
if cells(cnt1,1)=empty then 'for column "B":cells(cnt1,2) or for "C":
cells(cnt1,3)
rows(cnt1).delete
cnt1=cnt1-1
end if
next
end sub

other way is doing it with the sort command (Data--Sort) .

"STIG" wrote:

I have a table with many rows. I place quantity in one column for few rows.
How can I have ONLY the rows with quantity printed?