Inserting Data

C

CJ

I have a column with license numbers in them. I have about 2000 rows in this
column. I need to insert a ; (semicolon) at the end of each license number.
Is there a way I can do this without having to go through all 2000 rows?
Thanks.
 
A

Ardus Petus

In a staging column, enter formula
=A1&";"
and copy it down 2000 rows

Select the staging row
Copy
Select A1
Paste Special Values

HTH
 
B

bpeltzer

If the license numbers are in column A, select column B and Insert > Column.
Then, in B1 enter the formula =A1 & ";". Autofill that formula through all
rows of column B. Then select column B and Edit > Copy, then Edit > Paste
Special, select the Values radio button and click OK. If everything looks
okay, you can delete column A and you'll have effectively appeneded a
semicolon to each of the license numbers in column A. (If you may ever need
the old version w/o the ; you should probably skip the delete step and keep
both columns).
 
D

Don Guillett

try
Sub addsemicolontoend()
For Each c In Selection
c.NumberFormat = "@"
If Len(c) > 1 And IsNumeric(c) Then c.Value = c & ":"
Next
End Sub
 
E

elephant

I would also go to menu > format > cells > custom > type 0";" then use
format painter to copy the same thru the 2000 rows
 
C

CJ

elephant said:
I would also go to menu > format > cells > custom > type 0";" then use
format painter to copy the same thru the 2000 rows
Click to expand...

Thanks for this. The others above helped me out with the general changes but
then I couldn't figure out how to do dates because it would change it to a
general format and the date would change to a 5 digit number but this fixed
that. Thanks again.
 
Top