cell update includes original text
Aircode:
Sub AppendStringToCellA1
OriginalText = Sheet1.range("A1").value
NewText = OriginalText & " Yes, this is my place"
Sheet1.range("A1").value = NewText
end sub
"Souris" wrote in message
...
I need update one cell which includes original text and new text.
For example, sheet1 and cell A1 has text " Here we are"
I need add new text " Yes, this is my place" to make Cell A1 contains
"Here we are Yes, this is my place"
Any code example to do this?
Your information is great appreciated,
|