Hi Werner


Instead of Range("B1").Value = "*" + Range("A1").Value . Try
Range("A1") = Range("B1").Value & Range("A1").Value . (where
Range("B1").Value = "*"). The & is the equivalent to Concatenate in
VBA.

to Remove Later the "*" Use


Code:
--------------------
Size = Len(Range("A1").Text) - 1 ' The Len function returns the lenght of the string minus 1 to eliminate the *

Range("A1") = Right(Range("A1").Value, Size ) 'The right function returns the SIZE characters FROM the right of the string.

or in one line: Range("A1") = Right(Range("A1").Value, Len(Range("A1").Text) - 1)
--------------------


Check in the Help for a detailed explaination of the Right and Len
Functions

Hope this helps you

Saludos

Jose Luis


Werner Wrote:
Hi,

I would like to concatenate the results of copying a cell and adding an
* to left of the number value, in the same cell.

For example, it would look like Range("B1").Value = "*" +
Range("A1").Value .
But it does not work. For sure, trying to mathematically sum a String
and a number isn't a good idea in the form I've just written. So I
imagine I would have to convert the number into String. How, I'd like
too know. But then, if I want to use again the value in B1 (so removing
the * in VBA and do maths with those numbers), how could I reverse this
process?

Thx!

Werner


--
jose luis
------------------------------------------------------------------------
jose luis's Profile: http://www.excelforum.com/member.php...o&userid=13312
View this thread: http://www.excelforum.com/showthread...hreadid=382935