Need Help to repeat a symbol in each cell in a column
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
--
If this post helps click Yes
---------------
Jacob Skaria
"MicrosoftUserDarren" wrote:
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 ?
|