Inserting text within a cell

H

Hayley

I would like to insert a , with a cell.

i have Wood T 3,1

i would like to have
Wood T,3/1
 
V

Vicar

If cell A1 contains (surname)(single space)(single initial)(single
space)(score), the following will achieve what you want:

=LEFT(A1,FIND(" ",A1)+1)&","&RIGHT(A1,LEN(A1)-LEN(LEFT(A1,FIND(" ",A1)+1)))

HTH
 
D

Dave Peterson

How about:

=REPLACE(A1,SEARCH(" ",A1,1)+2,2,", ")

It looks for the first space character, comes over two more, and replaces the
space with a space-comma.
 
R

Rachael

Do you know how I would go about adding a ' at the beginning of each cell in
a column without changing the information already in each cell?
 
D

Dave Peterson

Is a macro ok?

Option Explicit
Sub testme()
Dim myRng As Range
Dim myCell As Range

Set myRng = Nothing
On Error Resume Next
Set myRng = Intersect(Selection, _
Selection.Cells.SpecialCells(xlCellTypeConstants))
On Error GoTo 0

If myRng Is Nothing Then
MsgBox "No constants in selection!"
Exit Sub
End If

For Each myCell In myRng.Cells
If myCell.PrefixCharacter <> "'" Then
myCell.Value = "'" & myCell.Text
End If
Next myCell

End Sub

Select a range and try it out.

If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm
 
Top