Will,

Can you supply a copy of your code (do not attach a file).

You might want to integrate some of the following (untested code):
(modify to fit your situation).

The 'Application.ScreenUpdating' part helps speed up the code.

Also there are ways to automate the range selection to work with tables
that have a different number of rows.

hth
steve b

'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''
Sub ChangeMyCell()
Dim cel As Range
Application.ScreenUpdating = False
For Each cel In Range("B1:B500")
If IsNumeric(cel.Value) Then
cel.Formula = "ABC" & cel.Value
End If
Next
Application.ScreenUpdating = True
End Sub
'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''


"Will" wrote in message
...
Hi all,
I need your help to solve this problem.
I receive the table with some product value. I need to
concatenate the value in column B with "ABC" text string
and once the whole range is completed to export/save it as
a text file in a specific location with no column heading,
just the plain value. I have tried to apply macros and
various functions but it get vey time-consuming. Need to
apply only to the cell that have value.
I will really appreciate your help!!!!

********
column *
********
424
23424

need to get this and save it in the text file, .txt:

abc424
abc23425

Will