Thanks for the help.

t = clng("0" & Trim(TextBox4.Value)) 'pack left
t2 = clng("0" & trim(TextBox5.Value)) 'pack right

seemd to tell me there was no object reference, so i sacked it off and
went for the just the CLng option, I assume it means change to long?
This didn't really work either, so instead i put in On error resume
next for both the lines, which worked out OK.
I think it's because there is no value i one of the textboxes, maybe i
should of wrote some code to handle that criterea, but it works now so
maybe not!

Thanks again.
CAA


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/

~~Now Available: Financial Statements.xls, a step by step guide to creating financial statements