Eliminating Unwanted Lines numeric value

[TrudyL]

I used the solution posted by Sal Ricciardi, on 9-20-2004 for "Eliminating
unwanted blank lines in labels and reports" and although it worked, I have a
problem. The lines I want eliminated are numeric and the solution uses a
text string so $80.00 appears as 80 Is there a way to get the currency
format back or is there another solution that does not dim the data as a
string. I tried to modify the module but the "vbcrlf" causes an error.

 

[Douglas J Steele]

I assume you're talking about
http://office.microsoft.com/en-us/assistance/HA011494721033.aspx and the
function CanShrinkLines contained within it.

Try something like:

strLine = strLine & Format(arrLines(x), "Currency") & vbCrLf

 

[TrudyL]

That did it. Thanks
--
TrudyL

I assume you're talking about
http://office.microsoft.com/en-us/assistance/HA011494721033.aspx and the
function CanShrinkLines contained within it.

Try something like:

strLine = strLine & Format(arrLines(x), "Currency") & vbCrLf