Need Help to repeat a symbol in each cell in a column

  • Thread starter MicrosoftUserDarren
  • Start date
M

MicrosoftUserDarren

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 ?
 
R

Rajesh Mehmi

Try the function ....... CONCATENATE


=CONTENATE(EMAIL_CELL,COMMA_CELL)


REGARDS
Rajesh Mehmi
 
S

Shane Devenshire

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
 
M

MicrosoftUserDarren

Could you expand on that more please.

Shane Devenshire said:
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
 
J

Jacob Skaria

What Shane provided is a macro which will do the same on the selection. You
dont need to have a additional column. to try out set the Security level to
low/medium in (Tools|Macro|Security). From workbook launch VBE using
short-key Alt+F11. From menu 'Insert' a module and paste the below code.
Save. Get back to Workbook.

Select the range of cells with email and run macro from Tools|Macro|Run
<selected macro()>

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

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top