Add text to cell

[superkopite]

Hiya guys and gals,

How can I create a Macro that when i select a range of sells will add a predifined text to the end of the text already in each selected cell.

I konw this is possible and have tried lots of variants of code, all turning out to be incorrect.

Kind Regards

James

[Bob Phillips]

Sub AddText()
For Each cell In selection
cell.Value = "cell.value & "more text"
Next cell
End SUb

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"superkopite" <[email protected]>
wrote in message
news:[email protected]...
>
> Hiya guys and gals,
>
> How can I create a Macro that when i select a range of sells will add a
> predifined text to the end of the text already in each selected cell.
>
> I konw this is possible and have tried lots of variants of code, all
> turning out to be incorrect.
>
> Kind Regards
>
> James
>
>
> --
> superkopite
> ------------------------------------------------------------------------
> superkopite's Profile:
http://www.excelforum.com/member.php...o&userid=29496
> View this thread: http://www.excelforum.com/showthread...hreadid=515405
>

[superkopite]

Thanks a lot Bob

There was an extra " in there but when i removed it it worked fantastically

Cheers

James

[Bob Phillips]

so there was, sorry about that.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"superkopite" <[email protected]>
wrote in message
news:[email protected]...
>
> Thanks a lot Bob
>
> There was an extra " in there but when i removed it it worked
> fantastically
>
> Cheers
>
> James
>
>
> --
> superkopite
> ------------------------------------------------------------------------
> superkopite's Profile:
http://www.excelforum.com/member.php...o&userid=29496
> View this thread: http://www.excelforum.com/showthread...hreadid=515405
>