Using XL2000

I have a range A1:E:1 in worksheet1 containing numerical values.
I need to concatenate this range into cell F1 but exclude the cell(s) where
a zero may appear.

Solution needs to function through 50 rows.

Any programatic ideas appreciated.

Thanks, Paul

In F1
=if(A1=0,"",A1)&if(B1=0,"",B1)&if(C1=0,"",C1)&if(D 1=0,"",D1)&if(E1=0,"",E1)

then drag fill down the column

--
Regards,
Tom Ogilvy

"Paulc" wrote in message
...
Using XL2000

I have a range A1:E:1 in worksheet1 containing numerical values.
I need to concatenate this range into cell F1 but exclude the cell(s)
where
a zero may appear.

Solution needs to function through 50 rows.

Any programatic ideas appreciated.

Thanks, Paul