Could you expand on that more please.

"Shane Devenshire" wrote:

Hi,

You can use the following code to add ; to every cell in any selection you
make:

Sub AddSemiColon()
Dim cell As Range
For Each cell In Selection
cell = cell & ";"
Next cell
End Sub

--
If this helps, please click the Yes button.

Cheers,
Shane Devenshire


"MicrosoftUserDarren" wrote:

I have a database full of information. In one of the columns I have emails,
Im wondering is there anyway that I can add a ";" in every cell at the end of
the email without having to go to each cell and add ; at the end ?