Where do I add (.Text) in the line? I noticed that when I first ran
your original code it changed non-currency numbers also by adding
".00" at the end.

Example: 12345 to | 12345.00 |

So I added a $ sign to "$00.00" hoping that it would only change
currency numbers. This worked great on a Win98 - Office XP but when
it was ran on a WinXP - Office XP it added the "$" and ".00" to all
the non-currency numbers too. I apologize for not mentioning this
initially on my first post, I didn't think it would be an issue
between the two operating systems. Is there any way to work around
this?

Thank you,
Barb

"J.E. McGimpsey" wrote in message
...
| Note that using .Text will include the "$" in the text file, which
| may be OK but wasn't in the original specification.
|
| In article ,
| "James S" wrote:
|
| Hi Barb,
|
| Another way you could do it would be to
|
| CHANGE
| CurrTextStr = CurrTextStr & CurrCell.Value & ListSep
|
| TO
| CurrTextStr = CurrTextStr & CurrCell.Text & ListSep
|
| Hope that helps as well.